|
|
A163244
|
|
Squares which can be represented as sum of consecutive primes.
|
|
2
|
|
|
36, 49, 100, 121, 144, 169, 324, 484, 576, 625, 841, 900, 961, 1089, 1156, 1369, 1444, 1681, 1764, 1849, 2116, 2209, 2304, 2916, 3249, 3600, 3844, 4225, 4900, 5184, 5329, 6241, 6889, 7056, 7396, 7744, 8100, 8649, 8836, 9025, 10201, 11449, 11881, 12100, 12769
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
36 = 5 + 7 + 11 + 13.
|
|
MATHEMATICA
|
With[{nn=50}, Take[Table[Select[Total/@Partition[Prime[Range[ 1000]], n, 1], IntegerQ[ Sqrt[ #]]&], {n, 2, nn}]//Flatten//Union, nn]] (* Harvey P. Dale, May 27 2017 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|