|
%I #18 Sep 08 2019 19:09:53
%S 12,126,152,216,245,392,490,63872,259856,16750592,4294541312
%N Numbers k such that phi(k) + 3 | sigma(k).
%C a(12) > 10^12. - _Donovan Johnson_, Feb 28 2012
%t Select[Range[100000],
%t Divisible[DivisorSigma[1, #], EulerPhi[#] + 3] &] (* _David Nacin_, Feb 28 2012 *)
%K nonn
%O 1,1
%A _Robert G. Wilson v_
%E Offset corrected and a(8)-a(11) from _Donovan Johnson_, Feb 28 2012
|
