|
|
A104191
|
|
Sum of Euler totient function between successive powers of two.
|
|
1
|
|
|
1, 3, 14, 54, 236, 920, 3730, 14862, 59776, 238856, 956110, 3823410, 15299542, 61193632, 244779854, 979111158, 3916558030, 15666093384, 62664665094, 250658276292, 1002634426882, 4010536846838, 16042149531756, 64168594080686, 256674403929154, 1026697590590342, 4106790388347028
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = phi(2^n) + phi(2^n + 1) + ... + phi(2^(n+1) - 2) + phi(2^(n+1) - 1).
|
|
MATHEMATICA
|
Table[Sum[EulerPhi[i], {i, 2^n, 2^(n + 1) - 1}], {n, 0, 24}]
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|