%I #4 Dec 14 2012 17:38:50
%S 15,99,195,399,675,1599,12099,15375,21315,42435,62499,106275,115599,
%T 122499,190095,193599,220899,401955,470595,495615,846399,1008015,
%U 1110915,1123599,1263375,1336335,1552515,1628175,1674435,1731855
%N Product of two consecutive odd numbers n such that n+-2 are primes.
%C 3*5 = 15+-2 -> primes, 9*11 = 99+-2 -> primes,..
%t f[n_]:=n*(n+2);Select[Table[f[n],{n,1,7!,2}],PrimeQ[ #-2]&&PrimeQ[ #+2]&]
%t Select[Times@@@Partition[Range[1,2001,2],2,1],And@@PrimeQ[#+{2,-2}]&] (* _Harvey P. Dale_, Dec 14 2012 *)
%K nonn
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Mar 17 2010
|