|
%I #8 Aug 08 2018 12:26:49
%S 8,27,343,512,10648,19683,79507,103823,110592,140608,148877,250047,
%T 314432,456533,778688,3869893,5088448,5545233,6539203,6644672,7077888,
%U 10941048,11089567,16003008,18191447,27818127,54010152,67917312,75686967,86350888,96071912
%N Cubes such that digits of cube root of n are not present in n.
%H Giovanni Resta, <a href="/A029786/b029786.txt">Table of n, a(n) for n = 1..1699</a> (terms < 10^57)
%t Select[Range[1000], {} == Intersection @@ IntegerDigits[{#, #^3}] &]^3 (* _Giovanni Resta_, Aug 08 2018 *)
%Y Cf. A029785, A029783, A029784, A111116, A113316.
%K nonn,base
%O 1,1
%A _Patrick De Geest_
%E More terms from _Giovanni Resta_, Aug 08 2018
|
