OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
Times@@#-2&/@Select[Partition[Prime[Range[200]], 2, 1], #[[2]]-#[[1]]==2&] (* Harvey P. Dale, Nov 11 2020 *)
PROG
(PARI) g(n) = forprime(x=1, n, if(isprime(x+2), y=x*(x+2)-2; print1(y", ")))
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Dec 27 2006
STATUS
approved