OFFSET
1,1
COMMENTS
The sequence is much more irregular than suggested by a naive investigation of the first few blocks of 10 digits each.
MAPLE
read("transforms3") : L := BFILETOLIST("b064413.txt") : L13 := [] : for i from 1 to nops(L) do if op(i, L) mod 13 = 0 then L13 := [op(L13), op(i, L) mod 10 ] ; fi; od: op(1..120, L13) ; # R. J. Mathar, Sep 07 2009
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Paul Curtz, Mar 22 2009
EXTENSIONS
Edited and extended by R. J. Mathar, Sep 07 2009
STATUS
approved