OFFSET
0,2
EXAMPLE
The concatenation of the first 3 primes is 235. The third prime is 5. Therefore a(3) = 235 mod 5 = 0.
MATHEMATICA
a = {2}; b = {0}; For[n = 2, n < 100, n++, a = Flatten[Join[a, IntegerDigits[ Prime[n]]] ]; AppendTo[b, Mod[FromDigits[a], Prime[n]]]]; b
CROSSREFS
KEYWORD
base,nonn,less
AUTHOR
Amarnath Murthy, Jun 17 2004
EXTENSIONS
Edited, corrected and extended by Stefan Steinerberger, Jun 26 2007
STATUS
approved