%I A079656
%S A079656 0,8,8000,3869893,8000000,3869893000,3996969003,8000000000,99060039883,
%T A079656 339630096833,630966396033,688933306368,869889903336,3869893000000,
%U A079656 3996969003000,8000000000000,63836938680696,99060039883000
%N A079656 Cubes using only the digits 0, 3, 6, 8 and 9.
%t A079656 Do[ If[ Union[ Join[ IntegerDigits[n^3], {0, 3, 6, 8, 9}]] == {0, 3, 
               6, 8, 9}, Print[n^3]], {n, 0, 50000}]
%Y A079656 Cf. A072960.
%Y A079656 Sequence in context: A114133 A115442 A090494 this_sequence A114773 A057107 
               A052152
%Y A079656 Adjacent sequences: A079653 A079654 A079655 this_sequence A079657 A079658 
               A079659
%K A079656 base,nonn
%O A079656 1,2
%A A079656 Shyam Sunder Gupta (guptass(AT)rediffmail.com), Jan 23 2003
%E A079656 More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 24 2003