DSolve[Derivative[1][y][x] == (1 + Sqrt[x] + 4*x - 8*x^(3/2) + (6*x^3)/5 + (8*x^(7/2))/5 - (24*x^4)/5 + (4*x^6)/25 - (24*x^(13/2))/25 - (8*x^9)/125 - 4*Sqrt[x]*y[x] + 12*x*y[x] - (4*x^3*y[x])/5 + (24*x^(7/2)*y[x])/5 + (12*x^6*y[x])/25 + y[x]^2 - 6*Sqrt[x]*y[x]^2 - (6*x^3*y[x]^2)/5 + y[x]^3)/x,y[x],x]