%I #15 Jun 04 2024 01:26:25
%S 2,2,2,12,6,16,24,80,84,320,360,864,1320,5456,5184,15744,19800,52800,
%T 69120,349520,370080,1036800,1425600,3640896,4741632,13989888,
%U 27091584,76743040,94656000,166387200,412473600,1407389952,1420488192,3459760128,6502788864,14778408960
%N a(n) = A062401(2^n + 1).
%H Amiram Eldar, <a href="/A096855/b096855.txt">Table of n, a(n) for n = 0..400</a>
%F a(n) = A000010(A069061(n)). - _Amiram Eldar_, Jun 04 2024
%t Table[ EulerPhi[ DivisorSigma[1, 2^n+1]], {n, 0, 33}]
%Y Cf. A000010, A062401, A062402, A053287, A096853, A069061, A096854, A096855, A096856.
%K nonn
%O 0,1
%A _Labos Elemer_, Jul 19 2004
%E Edited and extended by _Robert G. Wilson v_, Jul 23 2004
%E Offset changed to 0, a(0) prepended and two more terms added by _Amiram Eldar_, Jun 04 2024
|