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