|
Search: id:A095245
|
|
|
| A095245 |
|
(Concatenation of first n primes) modulo prime(n). |
|
+0
2
|
|
| 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; listen)
|
|
|
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 this_sequence A086280 A164976 A083714
Adjacent sequences: A095242 A095243 A095244 this_sequence 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
|
|
|
Search completed in 0.002 seconds
|
