Plot[(x^(1/3)-1)^2,{x,-.2,5}]