The OEIS is looking to hire part-time people to help edit core sequences, upload scanned documents, process citations, fix broken links, etc. - Neil Sloane, njasloane@gmail.com
A139079
Smallest number not yet in the sequence that contains the last digit of the previous term, with a(1) = 1.
a := [1] ; for n from 2 to 100 do ldig := op(-1, a) mod 10 ; for c from 1 do if c in a then ; else dgs := convert(c, base, 10) ; if ldig in dgs then a := [op(a), c] ; break; fi; fi; od: od: print(a) ; # R. J. Mathar