|
| |
|
|
A095244
|
|
a(n) = concatenation n,n-1,n-2,...,3,2,1 mod (prime(n)).
|
|
2
| |
|
|
1, 0, 1, 2, 3, 5, 3, 6, 5, 22, 22, 10, 20, 38, 7, 52, 55, 39, 31, 18, 17, 42, 8, 24, 72, 44, 32, 45, 87, 52, 7, 125, 22, 103, 56, 137, 123, 85, 51, 118, 39, 21, 147, 49, 99, 72, 195, 126, 152, 66, 61, 117, 19, 143, 72, 8, 162, 43, 117, 201
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,4
|
|
|
EXAMPLE
| a(4) = 4321 mod prime(4) = 4321 mod 7 = 2
|
|
|
MATHEMATICA
| a = {}; b = {}; For[n = 1, n < 80, n++, a = Join[IntegerDigits[n], a]; AppendTo[b, Mod[FromDigits[a], Prime[n]]]]; b
|
|
|
CROSSREFS
| Sequence in context: A114230 A185191 A103781 * A147593 A108396 A117367
Adjacent sequences: A095241 A095242 A095243 * A095245 A095246 A095247
|
|
|
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 23 2007
|
| |
|
|
