|
| |
|
|
A163251
|
|
Primes which are sum of (at least two) consecutive squares.
|
|
1
| |
|
|
5, 13, 29, 41, 61, 113, 139, 149, 181, 199, 271, 313, 421, 509, 613, 677, 761, 811, 1013, 1201, 1279, 1301, 1459, 1741, 1861, 1877, 2113, 2381, 2521, 2539, 2791, 3121, 3331, 3613, 3677, 3919, 4231, 4513, 5101, 7159, 7321, 8011, 8429, 8581, 9661, 9749, 9859
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 3,1
|
|
|
EXAMPLE
| 13 = 2^2 + 3^2
|
|
|
MATHEMATICA
| lst={}; Do[p=m^2; Do[p+=n^2; If[PrimeQ[p]&&p<=101701, AppendTo[lst, p]], {n, m+1, 6!, 1}], {m, 6!}]; Take[Union@lst, 5! ] [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 15 2009]
|
|
|
CROSSREFS
| Sequence in context: A158756 A185086 A159351 * A146286 A065374 A130066
Adjacent sequences: A163248 A163249 A163250 * A163252 A163253 A163254
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Gaurav Kumar (gaurav.kumar.cse06(AT)itbhu.ac.in), Jul 23 2009
|
| |
|
|
