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