OFFSET
1,3
COMMENTS
First differs from A095231 at a(17)=0.
LINKS
Owen Whitby, Table of n, a(n) for n = 1..200
EXAMPLE
a(17)=0, 112111453114977130=1(mod 17)
MATHEMATICA
digs={1}; Print[1]; Do[notFound=True; a=0; While[notFound, k=FromDigits[dk=digs~Join~IntegerDigits[a]]; If[Mod[k, n]==1, digs=dk; Print[a]; notFound=False, a++ ]], {n, 2, 200}]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Owen Whitby, May 20 2008
STATUS
approved