%I #12 Oct 15 2013 22:32:33
%S 313,335,2612,2817,3015,3820,23508,34380,36647,38193,42217,50281,
%T 64972,73535,96404,103180,155991,265364,325847,329823,379953,397068,
%U 452529,476545,584748,624748,661815,668660,867636,928620
%N Numbers n such that the sum of the divisors of 2*n^2 is a square.
%H Donovan Johnson, <a href="/A097023/b097023.txt">Table of n, a(n) for n = 1..200</a>
%e sigma[2*313^2]=543^2
%t Select[Range[950000],IntegerQ[Sqrt[DivisorSigma[1,2#^2]]]&] (* _Harvey P. Dale_, Jul 10 2012 *)
%Y Cf. A008847, A000203, A097024.
%K nonn
%O 1,1
%A _Labos Elemer_, Aug 24 2004
%E Definition clarified by _Harvey P. Dale_, Jul 10 2012
|