A082670 - OEIS

A082670

Let p(n) = upper member of n-th pair of twin primes; sequence gives a(n) = p(n)!/2.

60, 2520, 3113510400, 60822550204416000, 4111419327088961408862781440000000, 30207631531686917818677566034256998753632256000000000

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,1

LINKS

MATHEMATICA

#!/2&/@Select[Partition[Prime[Range[50]], 2, 1], #[[2]]-#[[1]]==2&][[All, 2]] (* Harvey P. Dale, Nov 27 2016 *)

PROG

(PARI) tpperm2(n) = { forprime(x=3, n, if(isprime(x-2), print1(x!/2" ") ) ) }

CROSSREFS

KEYWORD

easy,nonn

AUTHOR

STATUS

approved