A118752 a(n) = product[k=0..n] P(k), where P(k) is the smallest prime > 3*n. a(n) = product[k=0..n] A118751(k).

2, 10, 70, 770, 10010, 170170, 3233230, 74364290, 2156564410, 62540367890, 1938751404590, 71733801969830, 2654150672883710, 108820177588232110, 4679267636293980730, 219925578905817094310, 11656055682008305998430

Offset: 0

Author

Jonathan Vos Post, Apr 29 2006

Keywords

• easy
• nonn

Comments

Analogous to A118456 a(n) = product{k=1..n} P(k), where P(k) is the smallest prime >= k.

Links

• Vincenzo Librandi, Table of n, a(n) for n = 0..200

Crossrefs

Cf. A020482, A049653, A060266-A060268, A060264, A060265, A060308, A118455, A118456, A118748-51.

Programs

Mathematica

Rest[FoldList[Times,1,Table[NextPrime[3n],{n,0,20}]]] (* Harvey P. Dale, Mar 09 2014 *)

Extensions

Definition corrected by Harvey P. Dale, Mar 09 2014