%I #7 Feb 19 2013 05:00:30
%S 1,120,546,1680,2880,7812,14520,34200,40320,40320,53760,68796,63360,
%T 76608,78624,80640,89280,86400,95040,90720,129600,178560,155496,
%U 205920,214272,190080,223200,245520,241920,244800,267840,280800,259200,312480,345600,313560,393120,374976,401760,367200,464256
%N Sigma(A033631(n)) {sigma is the sum of divisors function A000203}.
%H T. D. Noe, <a href="/A115619/b115619.txt">Table of n, a(n) for n = 1..1000</a>
%o (PARI) for(n=1,1e6,if(sigma(eulerphi(n))==sigma(n),print1(sigma(n)", "))) \\ _Charles R Greathouse IV_, Feb 19 2013
%K nonn
%O 1,2
%A _Lekraj Beedassy_, Jan 26 2006
|