A097489 a(n) = product of first n terms of A001359.

3, 15, 165, 2805, 81345, 3335145, 196773555, 13970922405, 1411063162905, 150983758430835, 20684774905024395, 3082031460848634855, 551683631491905639045, 105371573614953977057595, 20758200002145933480346215, 4712111400487126900038590805

Offset: 1

Author

Cino Hilliard, Aug 24 2004

Keywords

• nonn

Links

• Amiram Eldar, Table of n, a(n) for n = 1..279

Crossrefs

Cf. A001359, A097492.

Programs

Mathematica

FoldList[Times,Select[Partition[Prime[Range[50]],2,1],#[[2]]-#[[1]]==2&][[All,1]]] (* Harvey P. Dale, Oct 09 2020 *)

PARI

twinl(n) = { local(c,x); c=0; x=1; while(c
				

Extensions

Edited by Don Reble, Apr 16 2007

a(15)-a(16) from Amiram Eldar, Jul 07 2024