|
%I #13 Aug 02 2021 15:03:40
%S 60,156,160,218,258,314,360,372,478,486,576,616,636,700,748,832,1070,
%T 1108,1152,1250,1564,1614,1636,1644,1686,1710,1738,1846,1862,1878,
%U 1924,2010,2060,2062,2156,2182,2376,2490,2530,2748,2754,2774,2824,2826,2834,2860,2896,2902
%N Numbers n such that n^2 is a sum of 6 consecutive primes.
%H Zak Seidov, <a href="/A252018/b252018.txt">Table of n, a(n) for n = 1..5000</a>
%e 60^2 = 3600 = prime(107) + ... + prime(112) = 587 + 593 + 599 + 601 + 607 + 613,
%e 156^2 = 24336 = prime(557) + ... + prime(562) = 4027 + 4049 + 4051 + 4057 + 4073 + 4079.
%t Select[Sqrt[#]&/@(Total/@Partition[Prime[Range[150000]],6,1]),IntegerQ] (* _Harvey P. Dale_, Aug 02 2021 *)
%Y Cf. A051395, A074924, A252066.
%K nonn
%O 1,1
%A _Zak Seidov_, Dec 14 2014
|
