cp's OEIS Frontend

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.

A097492 a(n) = product of first n terms of A006512.

This page as a plain text file.
%I A097492 #9 Oct 19 2017 03:14:36
%S A097492 5,35,455,8645,267995,11523785,702950885,51315414605,5285487704315,
%T A097492 576118159770335,80080424208076565,12092144055419561315,
%U A097492 2188678074030940598015,422414868287971535416895
%N A097492 a(n) = product of first n terms of A006512.
%t A097492 Rest[FoldList[Times,1,Transpose[Select[Partition[Prime[Range[100]],2,1], Last[#]- First[#] == 2&]][[2]]]] (* _Harvey P. Dale_, Nov 02 2011 *)
%o A097492 (PARI) fu(n) = p=1;for(x=1,n,p*=twinu(x);print1(p",")) \The n-th upper twin prime twinu(n) = { local(c,x); c=0; x=1; while(c<n, if(isprime(prime(x)+2),c++); x++; ); return(prime(x)) }
%Y A097492 Cf. A006512, A097489.
%K A097492 nonn
%O A097492 1,1
%A A097492 _Cino Hilliard_, Aug 24 2004
%E A097492 Edited by _Don Reble_, Apr 16 2007