|
%I #13 Mar 14 2020 18:53:21
%S 2,3,7,43,31,47059,3109,1729101023519
%N Largest prime factor of the n-th primary pseudoperfect number A054377(n).
%C See A054377 for comments, references, and links.
%e 42 = 2*3*7 is the third primary pseudoperfect number, so a(3) = 7.
%t A054377 = Cases[Import["https://oeis.org/A054377/b054377.txt", "Table"], {_, _}][[All, 2]];
%t Max /@ FactorInteger[A054377] (* _Robert Price_, Mar 14 2020 *)
%Y Cf. A054377, A216825, A236433.
%K nonn,hard,more
%O 1,1
%A _Jonathan Sondow_, Sep 20 2012
|
