A096853 - OEIS

%I #15 Jun 04 2024 01:26:08

%S 1,2,4,8,16,48,64,144,288,512,576,2304,4096,10240,18432,36288,65536,

%T 184320,262144,552960,718848,1492992,2822400,9123840,13418496,

%U 44695552,68762880,106168320,109486080,580386816,1073741824,2155507200,2366668800,6920601600,12081954816

%N a(n) = A062401(2^n-1).

%H Amiram Eldar, <a href="/A096853/b096853.txt">Table of n, a(n) for n = 1..392</a>

%F a(n) = A000010(A000203(A000225(n))). - _Michel Marcus_, Dec 19 2013

%F a(n) = A000010(A075708(n)). - _Amiram Eldar_, Jun 04 2024

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

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

%K nonn

%O 1,2

%A _Labos Elemer_, Jul 19 2004

%E Edited and extended by _Robert G. Wilson v_, Jul 23 2004

%E a(33)-a(35) from _Amiram Eldar_, Jun 04 2024