Plot[x^2 + 2*(3/5*Abs[x]^(2/3)-y)^2=1, {x, -1.5, 1.5}]