A079656 Cubes using only the digits 0, 3, 6, 8 and 9.

0, 8, 8000, 3869893, 8000000, 3869893000, 3996969003, 8000000000, 99060039883, 339630096833, 630966396033, 688933306368, 869889903336, 3869893000000, 3996969003000, 8000000000000, 63836938680696, 99060039883000, 339630096833000, 630966396033000, 688933306368000

Offset

1,2

Links

Table of n, a(n) for n=1..21.

Mathematica

Do[ If[ Union[ Join[ IntegerDigits[n^3], {0, 3, 6, 8, 9}]] == {0, 3, 6, 8, 9}, Print[n^3]], {n, 0, 50000}]

Crossrefs

Cf. A072960, A074100.

Sequence in context: A115442 A216936 A090494 * A114773 A057107 A320864

Adjacent sequences: A079653 A079654 A079655 * A079657 A079658 A079659

Keyword

base,nonn

Author

Shyam Sunder Gupta, Jan 23 2003

Extensions

More terms from Robert G. Wilson v, Jan 24 2003

Status

approved