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

Author

Michel Marcus, Jul 03 2014

Keywords

• nonn

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

Examples

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

Links

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

Crossrefs

Cf. A045637, A048261, A121518, A185077.

Programs

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 *)