OFFSET
1,2
LINKS
John Cerkan, Table of n, a(n) for n = 1..10000
EXAMPLE
1336 is in the sequence because 1336 in base 7 is 3616.
MATHEMATICA
Select[Range@ 13300, Union@ IntegerDigits@ # == Union@ IntegerDigits[#, 7] &] (* Michael De Vlieger, Feb 18 2017 *)
PROG
(PARI) isok(n) = Set(digits(n, 7)) == Set(digits(n)); \\ Michel Marcus, Feb 18 2017
(Python)
from sympy.ntheory import digits
def ok(n): return set(map(int, str(n))) == set(digits(n, 7)[1:])
print([k for k in range(1, 10**6) if ok(k)]) # Michael S. Branicky, Apr 22 2023
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
More terms from Don Reble, Apr 28 2006
Edited by John Cerkan, Feb 17 2017
STATUS
approved