A088909 Numbers expressible as the sum of squares of two distinct primes.
13, 29, 34, 53, 58, 74, 125, 130, 146, 170, 173, 178, 194, 218, 290, 293, 298, 314, 338, 365, 370, 386, 410, 458, 482, 530, 533, 538, 554, 578, 650, 698, 818, 845, 850, 866, 890, 962, 965, 970, 986, 1010, 1082, 1130, 1202, 1250, 1322, 1370, 1373, 1378, 1394
Offset: 1
Keywords
Examples
a(1)=3*3+2*2=13, a(2)=5*5+2*2=29.
Programs
-
Mathematica
Union[Total/@(Subsets[Prime[Range[20]],{2}]^2)] (* Harvey P. Dale, Nov 16 2013 *)
Comments