A119735 Numbers n such that every digit occurs at least once in n^3.

2326, 2535, 2795, 3123, 3506, 3909, 4602, 4782, 5027, 5048, 5196, 5362, 5394, 5402, 5437, 6215, 6221, 6517, 6687, 6789, 6802, 6993, 7061, 7202, 7219, 7616, 7638, 8124, 8244, 8248, 8288, 8384, 8402, 8443, 8496, 8499, 8817, 9006, 9048, 9142, 9374, 9476

Offset

1,1

Links

T. D. Noe, Table of n, a(n) for n = 1..10000

Mathematica

Select[Range[10000], Union[IntegerDigits[#^3]]==Range[0, 9]&] (* Harvey P. Dale, Apr 11 2014 *)

Prog

(PARI) isok(n) = length(Set(digits(n^3))) == 10; \\ Michel Marcus, Aug 28 2013
(Python)
A119735_list, m = [], [6, -6, 1, 0]
for n in range(1, 10**6+1):
....for i in range(3):
........m[i+1] += m[i]
....if len(set(str(m[-1]))) == 10:
........A119735_list.append(n) # Chai Wah Wu, Nov 05 2014

Crossrefs

Cf. A030292.

Sequence in context: A205636 A347569 A250998 * A115933 A355420 A232107

Adjacent sequences: A119732 A119733 A119734 * A119736 A119737 A119738

Keyword

base,nonn

Author

Dmitry Kamenetsky, Jun 15 2006

Status

approved