|
| |
|
|
A094151
|
|
Remainder when concatenation 1,2,3,...up to (n-1) is divided by n.
|
|
1
| |
|
|
0, 1, 0, 3, 4, 3, 4, 7, 0, 9, 4, 3, 12, 9, 9, 7, 1, 9, 7, 19, 12, 15, 18, 15, 24, 9, 0, 11, 27, 9, 7, 7, 15, 9, 9, 27, 29, 21, 21, 39, 22, 33, 5, 15, 9, 39, 45, 39, 39, 49, 27, 51, 33, 27, 4, 23, 15, 49, 49, 39, 32, 13, 54, 7, 9, 15, 41, 59, 0, 39, 47, 63, 41, 17, 24, 23, 37, 21, 75, 39
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,4
|
|
|
EXAMPLE
| a(5) = 15 hence a(6) = least integer multiple of 15/6 = 5.
|
|
|
MATHEMATICA
| Table[st = ""; For[i = 0, i <= n - 1, i++, st = st <> ToString[i]]; Mod[ ToExpression[st], n], {n, 1, 100}] (Handler)
|
|
|
CROSSREFS
| Sequence in context: A100867 A128200 A061988 * A135800 A178152 A006984
Adjacent sequences: A094148 A094149 A094150 * A094152 A094153 A094154
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Apr 29 2004
|
|
|
EXTENSIONS
| More terms from Sam Handler (sam_5_5_5_0(AT)yahoo.com), Nov 12 2004
|
| |
|
|
