DSolve[4 + (Cos[x] - 3*Sin[x])*y[x] - Sin[x]^2*y[x]^2 + Sin[x]*Derivative[1][y][x] == 0,y[x],x]