OFFSET
1,2
LINKS
E. Angelini, Odd/even: integers and digits alternate, SeqFan mailing list, Oct 06 2012
PROG
(PARI) A217556(n, show=0, a=1, u)={for( i=2, n, u+=1<<a; show & print1(a", "); for(t=1, 9e9, bittest(u, t) & next; bittest(t+a, 0) || next; !bittest(a%10 + t\10^(#Str(t)-1), 0) & (t+=10^(#Str(t)-1)-1) & next; a=t; break )); a} \\ - M. F. Hasler, Oct 06 2012
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Eric Angelini and M. F. Hasler, Oct 06 2012
STATUS
approved