OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
3*5-3-5=7, 5*7-5-7=23, 11*13-11-13=119.
MATHEMATICA
ss={7}; Do[If[PrimeQ[p1=6m-1]&&PrimeQ[p2=6m+1], p=-1-12 m+36 m^2; AppendTo[ss, p]], {m, 300}]; ss
Times@@#-Total[#]&/@Select[Partition[Prime[Range[200]], 2, 1], #[[2]]-#[[1]] == 2&] (* Harvey P. Dale, Jun 14 2014 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Apr 09 2008
STATUS
approved