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, 2366668800, 6920601600, 12081954816

Offset: 1

Author

Labos Elemer, Jul 19 2004

Keywords

• nonn

Links

• Amiram Eldar, Table of n, a(n) for n = 1..392

Crossrefs

Cf. A000010, A000203, A000225, A062401, A062402, A053287, A075708, A096853, A096854, A096855, A096856.

Programs

Mathematica

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

Formula

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

a(n) = A000010(A075708(n)). - Amiram Eldar, Jun 04 2024

Extensions

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

a(33)-a(35) from Amiram Eldar, Jun 04 2024