OFFSET
1,1
EXAMPLE
23 = 43 (base 5) which contains no 0.
MAPLE
The following stores the first 200 digits of the sequence in K: for i from 1 to 200 do if i=i then x[i]:=convert(ithprime(i), base, 5) else x[i]:=0 end if: end do: S:={}: for i from 1 to 200 do if evalb(`in`(0, x[i]))=false then S:=S union {i} fi od; for i from 1 to nops(S)do z[i]:=ithprime(S[i]) od: K:=[seq((z[i]), i=1..nops(S))];
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Jonathan D. B. Hodgson, Oct 08 2010
STATUS
approved