$n=<>;
$a=$n**(1/3);
print grep($_**3==$n,$a-10..$a+10)?Yes:No;