A244637 Primes that are the sum of the squares of distinct primes.

13, 29, 53, 83, 173, 179, 199, 227, 293, 347, 367, 373, 419, 439, 463, 467, 487, 491, 541, 563, 569, 587, 607, 613, 617, 641, 653, 659, 709, 727, 733, 751, 809, 823, 827, 829, 853, 857, 877, 881, 919, 953, 971, 977, 991, 997, 1013, 1019, 1021, 1039, 1049

Offset

1,1

Comments

Primes in A048261.

Provide the prime factors of A185077.

A045637 is a subsequence.

There are only 368 primes not in this sequence, the largest being 12601. - Robert Israel, Jul 04 2014

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..2870

Example

13 is in the sequence since it is prime and 13 = 2^2 + 3^2 (2 and 3 are distinct primes).

Mathematica

nn=10; s={0}; Do[p=Prime[n]; s=Union[s, s+p^2], {n, nn}]; Select[s, (0<#<=Prime[nn]^2)&&PrimeQ[#]&] (* Michel Lagneau, Jul 03 2014 *)

Crossrefs

Cf. A045637, A048261, A121518, A185077.

Sequence in context: A031414 A270361 A010337 * A162579 A286658 A090866

Adjacent sequences: A244634 A244635 A244636 * A244638 A244639 A244640

Keyword

nonn

Author

Michel Marcus, Jul 03 2014

Status

approved