cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A019422 Numbers whose sum of divisors is a fourth power.

This page as a plain text file.
%I A019422 #19 Jun 18 2021 21:57:11
%S A019422 1,217,510,642,710,742,782,795,862,935,1177,1207,1219,2667,3937,7590,
%T A019422 7854,8743,9481,9798,9858,10810,10934,11186,11235,11510,11594,11715,
%U A019422 11985,12082,12243,12903,12945,13022,13462,13587,13685,13822,14223,15085
%N A019422 Numbers whose sum of divisors is a fourth power.
%D A019422 J.-M. De Koninck, Ces nombres qui nous fascinent, Entry 217, p. 62, Ellipses, Paris 2008.
%H A019422 Donovan Johnson, <a href="/A019422/b019422.txt">Table of n, a(n) for n = 1..1000</a>
%H A019422 Frits Beukers, Florian Luca and Frans Oort, <a href="http://www.jstor.org/stable/10.4169/amer.math.monthly.119.05.373">Power Values of Divisor Sums</a>, The American Mathematical Monthly, Vol. 119, No. 5 (May 2012), pp. 373-380.
%t A019422 Select[Range[16000],IntegerQ[Power[DivisorSigma[1,#], (4)^-1]]&] (* _Harvey P. Dale_, Jan 22 2012 *)
%o A019422 (PARI) c=0; for(n=1, 8240486, if(ispower(sigma(n), 4), c++; write("b019422.txt", c " " n))) /* _Donovan Johnson_, Jun 13 2013 */
%K A019422 nonn
%O A019422 1,2
%A A019422 _David W. Wilson_