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