|
| |
| |
|
|
|
0, 1, 2, 3, 4, 3, 6, 3, 2, 8, 10, 5, 12, 3, 8, 3, 16, 6, 18, 6, 0, 14, 22, 9, 9, 16, 11, 11, 28, 18, 30, 3, 26, 3, 33, 2, 36, 3, 6, 34, 40, 26, 42, 0, 2, 26, 46, 17, 41, 43, 27, 24, 52, 42, 28, 43, 12, 32, 58, 26, 60, 3, 60, 3, 23, 11, 66, 45, 62, 17, 70, 42, 72, 3
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,3
|
|
|
LINKS
|
|
|
|
FORMULA
|
a(p) = p - 1 for all prime p.
|
|
|
MATHEMATICA
|
MapIndexed[Mod[#1, First@ #2] &, LinearRecurrence[{-1, 1, -1, 0, 1}, {-1, 3, -7, 11, -16}, 74]] (* Michael De Vlieger, Jul 21 2017, after T. D. Noe at A225984 *)
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
