|
%I #10 Nov 21 2013 13:12:27
%S 2,3,5,6,9,12,14,15,18,20,21,24,30,33,35,36,39,42,44,45,51,54,60,63,
%T 65,66,69,75,81,84,90,96,99,102,104,105,111,114,117,119,120,126,129,
%U 135,141,144,150,156,159,165,168,170,171,174,180,186,189,195,201,204,207
%N Numbers of the form (p^2-q^2)/8, p, q odd primes, p>q.
%C Primes in a(n) are {2, 3, 5).
%t Take[Union[Flatten[Table[(Prime[p]^2 - Prime[q]^2)/8, {p, 2, 100}, {q, 2, p - 1}]]], 60] (* _Alonso del Arte_, Jul 14 2011 *)
%Y Cf. A124865 Numbers of the form p^2-q^2, p, q primes, p>q. Cf. A045636 Numbers of the form p^2+q^2, p, q primes.
%K nonn
%O 1,1
%A _Alexander Adamchuk_, Nov 10 2006
|
