|
|
A174475
|
|
G.f.: exp( Sum_{n>=1} A174476(n)*x^n/n ) where A174476(n) = Sum_{d|n} d^phi(d).
|
|
2
|
|
|
1, 1, 2, 5, 10, 138, 155, 17102, 18016, 94540, 154798, 2358249307, 2360592955, 1796879611368, 1804105210014, 3608243138940, 9287964281688, 2862441341177866833, 2862710702184279822, 5486112024184013303138
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
phi(n) = A000010(n) = Euler totient function of n.
|
|
LINKS
|
|
|
PROG
|
(PARI) {a(n)=polcoeff(exp(sum(m=1, n, x^m/m*sumdiv(m, d, d^eulerphi(d)))+x*O(x^n)), n)}
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|