OFFSET
1,2
FORMULA
a(n)=Sum[CarmichaelLambda[i], {i, 2^n, 2^(n + 1) - 1}]
MATHEMATICA
a= Table[Sum[CarmichaelLambda[i], {i, 2^n, 2^(n + 1) - 1}], {n, 0, 24}]
CROSSREFS
KEYWORD
nonn,less
AUTHOR
Roger L. Bagula, Mar 12 2005
STATUS
approved