|
2, 5, 6, 14, 8, 27, 20, 33, 24, 65, 28, 90, 48, 68, 72, 152, 60, 189, 88, 138, 120, 275, 104, 270, 168, 261, 180, 434, 128, 495, 272, 350, 288, 444, 228, 702, 360, 492, 336, 860, 264, 945, 460, 564, 528, 1127, 400, 1071, 520, 848, 648, 1430, 504, 1140, 696, 1062, 840, 1769
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
3,1
|
|
COMMENTS
|
The old entry with this sequence number was a duplicate of A082470.
|
|
LINKS
|
|
|
MATHEMATICA
|
Table[(n+1) EulerPhi[n-1]/2, {n, 3, 60}] (* Harvey P. Dale, Apr 22 2012 *)
|
|
PROG
|
(PARI) a(n) = (n+1)*eulerphi(n-1)/2; \\ Michel Marcus, Sep 18 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|