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