A235808 Numbers n such that n^3 has one or more occurrences of exactly six different digits.

59, 66, 69, 73, 75, 76, 84, 88, 93, 97, 107, 112, 113, 115, 116, 118, 124, 128, 129, 131, 139, 147, 148, 151, 156, 159, 161, 166, 168, 169, 174, 178, 181, 183, 184, 187, 189, 193, 194, 196, 207, 219, 226, 232, 234, 235, 236, 238, 240, 241, 246, 253, 255, 262

Offset

1,1

Links

Colin Barker, Table of n, a(n) for n = 1..1000

Example

59 is in the sequence because 59^3 = 205379, which contains exactly six different digits: 0, 2, 3, 5, 7, 9.
107 is in the sequence because 107^3 = 1225043, which contains exactly six different digits: 0, 1, 2, 3, 4, 5.

Mathematica

Select[Range[300], Length[Union[IntegerDigits[#^3]]] == 6 &] (* Bruno Berselli, Jan 19 2014 *)

Prog

(PARI) s=[]; for(n=1, 300, if(#vecsort(eval(Vec(Str(n^3))), , 8)==6, s=concat(s, n))); s
(Magma) [n: n in [0..300] | #Set(Intseq(n^3)) eq 6]; // Bruno Berselli, Jan 19 2014
(Python)
A235808_list, m = [], [6, -6, 1, 0]
for n in range(1, 10**4+1):
....for i in range(3):
........m[i+1] += m[i]
....if len(set(str(m[-1]))) == 6:
........A235808_list.append(n) # Chai Wah Wu, Nov 05 2014

Crossrefs

Cf. A030292, A155146, A155147, A235807, A235809-A235811, A119735.

Sequence in context: A172256 A172056 A032648 * A290170 A033237 A139894

Adjacent sequences: A235805 A235806 A235807 * A235809 A235810 A235811

Keyword

nonn,base

Author

Colin Barker, Jan 19 2014

Status

approved