A099788 a(n) = Product_{i=1..2n} prime(i).

1, 6, 210, 30030, 9699690, 6469693230, 7420738134810, 13082761331670030, 32589158477190044730, 117288381359406970983270, 557940830126698960967415390, 3217644767340672907899084554130, 23768741896345550770650537601358310, 232862364358497360900063316880507363070

Offset

0,2

Links

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

Maple

a:=n-> mul(ithprime(j), j=1..2*n): seq(a(n), n=0..13); # Emeric Deutsch

Mathematica

Table[Product[Prime[i], {i, 2n}], {n, 0, 20}] (* Wesley Ivan Hurt, Mar 13 2014 *)

Prog

(PARI) a(n) = prod(i=1, 2*n, prime(i)); \\ Michel Marcus, Mar 15 2014
(Magma) [1] cat [&*[NthPrime(j): j in [1..2*n]]: n in [1..20]]; // G. C. Greubel, Sep 04 2019
(Sage) [1]+[product(nth_prime(j) for j in (1..2*n)) for n in (1..20)] # G. C. Greubel, Sep 04 2019

Crossrefs

Cf. A000040, A099800.

Bisection of A002110.

Subset of A030229.

Sequence in context: A359761 A238685 A346017 * A126676 A073100 A093536

Adjacent sequences: A099785 A099786 A099787 * A099789 A099790 A099791

Keyword

nonn,easy

Author

N. J. A. Sloane, Nov 19 2004

Extensions

More terms from Emeric Deutsch, Feb 23 2005

Name revised by Wesley Ivan Hurt, Mar 13 2014

Status

approved