login
Numbers expressible as the sum of squares of two distinct primes.
3

%I #4 Nov 16 2013 09:42:07

%S 13,29,34,53,58,74,125,130,146,170,173,178,194,218,290,293,298,314,

%T 338,365,370,386,410,458,482,530,533,538,554,578,650,698,818,845,850,

%U 866,890,962,965,970,986,1010,1082,1130,1202,1250,1322,1370,1373,1378,1394

%N Numbers expressible as the sum of squares of two distinct primes.

%e a(1)=3*3+2*2=13, a(2)=5*5+2*2=29.

%t Union[Total/@(Subsets[Prime[Range[20]],{2}]^2)] (* _Harvey P. Dale_, Nov 16 2013 *)

%Y Cf. A001481, A088908.

%K nonn

%O 1,1

%A _Hugo Pfoertner_, Oct 22 2003