Plot[{1/D[x^(1/3), x], x^(1/3)}, {x, 0, 1}]