|
|
|
|
1, 2, 3, 6, 10, 26, 30, 86, 154, 350, 514, 1542, 1930, 5882, 9086, 16242, 30098, 93474, 116174, 368318, 547218, 1050842, 1813030, 5703414, 7256850, 19610282, 33509306, 77004470, 122302250, 393465466, 399187282, 1302847262, 2380228834, 4947581482, 8604927394
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
PROG
|
(Sage) P=[euler_phi(i) for i in [0..100]]
Tr=[[prod(P[1:n+1])/(prod(P[1:k+1])*prod(P[1:(n-k)+1])) for k in [0..n]] for n in [0..len(P)-1]]
print([sum(x) for x in Tr])
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|