A096855 a(n) = A062401(2^n + 1).

2, 2, 2, 12, 6, 16, 24, 80, 84, 320, 360, 864, 1320, 5456, 5184, 15744, 19800, 52800, 69120, 349520, 370080, 1036800, 1425600, 3640896, 4741632, 13989888, 27091584, 76743040, 94656000, 166387200, 412473600, 1407389952, 1420488192, 3459760128, 6502788864, 14778408960

Offset

0,1

Links

Amiram Eldar, Table of n, a(n) for n = 0..400

Formula

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

Mathematica

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

Crossrefs

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

Sequence in context: A327559 A139518 A335986 * A152662 A135322 A106541

Adjacent sequences: A096852 A096853 A096854 * A096856 A096857 A096858

Keyword

nonn

Author

Labos Elemer, Jul 19 2004

Extensions

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

Offset changed to 0, a(0) prepended and two more terms added by Amiram Eldar, Jun 04 2024

Status

approved