|
| |
|
|
A095245
|
|
(Concatenation of first n primes) modulo prime(n).
|
|
1
| |
|
|
0, 2, 0, 5, 3, 7, 15, 16, 21, 27, 7, 11, 17, 21, 37, 7, 28, 10, 50, 70, 70, 23, 46, 20, 76, 93, 81, 52, 1, 58, 87, 54, 100, 128, 39, 10, 117, 16, 42, 89, 98, 61, 135, 123, 13, 89, 201, 147, 124, 176, 186, 202, 71, 74, 256, 228, 137, 84, 145
(list; graph; refs; listen; history; internal format)
|
|
|
|
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
| Cf. A095243.
Sequence in context: A071782 A107363 A154954 * A173732 A086280 A164976
Adjacent sequences: A095242 A095243 A095244 * A095246 A095247 A095248
|
|
|
KEYWORD
| base,nonn,less
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Jun 17 2004
|
|
|
EXTENSIONS
| Edited, corrected and extended by Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Jun 26 2007
|
| |
|
|
