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,1

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

Mathematica

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

Crossrefs

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

Sequence in context: A341477 A317980 A118748 * A362821 A060842 A245834

Adjacent sequences: A118749 A118750 A118751 * A118753 A118754 A118755

Keyword

easy,nonn

Author

Jonathan Vos Post, Apr 29 2006

Extensions

Definition corrected by Harvey P. Dale, Mar 09 2014

Status

approved