A129525 Numbers n such that all the digits of n^3 are distinct.

1, 2, 3, 4, 5, 6, 8, 9, 12, 13, 16, 17, 18, 19, 21, 22, 24, 27, 29, 32, 35, 38, 41, 59, 66, 69, 73, 75, 76, 84, 88, 93, 97, 135, 145, 203, 289, 297, 302, 319

Offset

1,2

Links

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

Example

319^3 = 32461759, is the largest number with all different digits in its cube.

Mathematica

Select[Range[10000], Length[IntegerDigits[ # ^3]] == Length[Union[IntegerDigits[ # ^3]]] &]
Select[Range[10000], Max[DigitCount[#^3]]==1&] (* Harvey P. Dale, May 01 2012 *)

Crossrefs

Sequence in context: A093110 A165707 A052063 * A351987 A295165 A258023

Adjacent sequences: A129522 A129523 A129524 * A129526 A129527 A129528

Keyword

base,fini,full,nonn

Author

Tanya Khovanova, May 29 2007

Status

approved