OFFSET
1,9
COMMENTS
a(n) > 0 for n >= 19 since 19 is n written in base n-9.
The only perfect k-th powers (k >= 2) that can appear in this sequence are m^k with 2 <= m <= 9 and k a prime number.
LINKS
Nathan Fox, Table of n, a(n) for n = 1..10000
MATHEMATICA
Table[SelectFirst[Range[10, 1200], DigitCount[n, #, 9] > 0 &], {n, 19, 120}] (* Michael De Vlieger, Mar 10 2016, Version 10 *)
PROG
(PARI) a(n) = if ((n<19) && (n!=9), 0, my(b=10); while(!vecsearch(Set(digits(n, b)), 9), b++); b); \\ Michel Marcus, Mar 10 2016
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Nathan Fox, Mar 08 2016
STATUS
approved