login
A216957
a(1)=2; for n > 1, a(n) = 2^(n-2) + (1/(2n-2)) * Sum_{ d divides n-1 } phi(2d)*2^((n-1)/d).
2
2, 2, 4, 6, 12, 20, 40, 74, 148, 286, 568, 1118, 2228, 4412, 8788, 17480, 34836, 69392, 138388, 275942, 550560, 1098516, 2192572, 4376666, 8738324, 17448308, 34845304, 69594398, 139011816, 277691852, 554767744, 1108378658, 2214594580, 4425117884, 8842583584, 17670722600, 35314182976, 70576759892, 141055781836
OFFSET
1,1
LINKS
MAPLE
with(numtheory);
f:=n-> if n=1 then 2 else 2^(n-2) + (1/(2*n-2)) * add(phi(2*d)*2^((n-1)/d), d in divisors(n-1)); fi;
CROSSREFS
Different from, but easily confused with, A003000 and A122536.
Sequence in context: A030435 A063886 A003000 * A122536 A238014 A052953
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Sep 26 2012
STATUS
approved