A096853 a(n) = A062401(2^n-1).

1, 2, 4, 8, 16, 48, 64, 144, 288, 512, 576, 2304, 4096, 10240, 18432, 36288, 65536, 184320, 262144, 552960, 718848, 1492992, 2822400, 9123840, 13418496, 44695552, 68762880, 106168320, 109486080, 580386816, 1073741824, 2155507200

Offset

1,2

Links

Table of n, a(n) for n=1..32.

Formula

a(n) = A000010(A000203(A000225(n))). - Michel Marcus, Dec 19 2013

Mathematica

Table[ EulerPhi[ DivisorSigma[1, 2^n - 1]], {n, 33}]

Crossrefs

Cf. A062401, A062402, A053287, A096853, A096854, A096855, A096856.

Sequence in context: A081473 A018627 A289671 * A027155 A129335 A264635

Adjacent sequences: A096850 A096851 A096852 * A096854 A096855 A096856

Keyword

nonn

Author

Labos Elemer, Jul 19 2004

Extensions

Edited and extended by Robert G. Wilson v, Jul 23 2004

Status

approved