|
|
A095243
|
|
a(n) = concatenation of 1,2,3,...,n mod prime(n).
|
|
2
|
|
|
1, 0, 3, 2, 3, 8, 10, 10, 11, 25, 24, 27, 3, 36, 6, 25, 50, 58, 16, 64, 14, 40, 25, 12, 67, 74, 60, 26, 7, 11, 116, 113, 40, 90, 143, 36, 41, 156, 152, 155, 128, 118, 19, 87, 194, 92, 103, 163, 218, 118, 194, 142, 104, 238, 181, 83, 191, 107
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
EXAMPLE
|
The concatenation of the first 4 integers is 1234. The fourth prime is 7. Therefore a(4) = 1234 mod 7 = 2.
|
|
MATHEMATICA
|
a = {}; b = {}; For[n = 1, n < 80, n++, a = Join[a, IntegerDigits[n]]; AppendTo[b, Mod[FromDigits[a], Prime[n]]]]; b
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn,less
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|