DSolve[4x*y[x]-y[x]'=3y[x] , y[1]=5]