OFFSET
1,1
COMMENTS
Integer cycle modulo ten of symbols {0,1,2,3,4,5,6,7,8,9,0} modulated with the primes modulo 9.
Concerned with the maximum amount of information that can be hidden as a typo in a modulo-10 cycle and the information regenerated.
MATHEMATICA
digits=200 a=Table[Mod[n+(Mod[Prime[n], 9]-4), 10], {n, 1, digits}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Jan 17 2004
STATUS
approved