VectorFieldPlot[{y/sqrt(x^4+y^2), -x^2/sqrt(x^4+y^2)}, {x, -3, 3}, {y, -3, 3}]