This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A097489 #17 Jul 07 2024 03:19:10 %S A097489 3,15,165,2805,81345,3335145,196773555,13970922405,1411063162905, %T A097489 150983758430835,20684774905024395,3082031460848634855, %U A097489 551683631491905639045,105371573614953977057595,20758200002145933480346215,4712111400487126900038590805 %N A097489 a(n) = product of first n terms of A001359. %H A097489 Amiram Eldar, <a href="/A097489/b097489.txt">Table of n, a(n) for n = 1..279</a> %t A097489 FoldList[Times,Select[Partition[Prime[Range[50]],2,1],#[[2]]-#[[1]]==2&][[All,1]]] (* _Harvey P. Dale_, Oct 09 2020 *) %o A097489 (PARI) twinl(n) = { local(c,x); c=0; x=1; while(c<n, if(isprime(prime(x)+2),c++); x++; ); return(prime(x-1)) } \\ The n-th lower twin prime %o A097489 f(n) = p=1; for(x=1,n,p*=twinl(x);print1(p",")) %Y A097489 Cf. A001359, A097492. %K A097489 nonn %O A097489 1,1 %A A097489 _Cino Hilliard_, Aug 24 2004 %E A097489 Edited by _Don Reble_, Apr 16 2007 %E A097489 a(15)-a(16) from _Amiram Eldar_, Jul 07 2024