A076954 a(n) = Product_{i=1..n} prime(i)^i.

1, 2, 18, 2250, 5402250, 870037764750, 4199506113235182750, 1723219765760312626547490750, 29266411525287522788837599332989370750, 52713275010243038997421106186697438702252144407250, 22176856087751973465466098269669474342964368337745368642450857250

Offset: 0

Author

Amarnath Murthy, Oct 20 2002

Keywords

• nonn

Comments

For n >= 3, a(n) ends in 250 or 750. - Jianing Song, Jan 27 2019

Links

• Gheorghe Coserea, Table of n, a(n) for n = 0..50

Crossrefs

Cf. A076955, A006939.

Partial products of A062457. - Michel Marcus, Jan 28 2019

Programs

Maple

seq(mul(ithprime(i)^i,i=1..n),n=0..13);

Mathematica

Table[Times@@Table[Prime[i]^i, {i, n}], {n, 10}] (* Alonso del Arte, Sep 30 2011 *)
Join[{1},FoldList[Times,Table[Prime[i]^i,{i,10}]]] (* Harvey P. Dale, Dec 16 2022 *)

PARI

a(n) = { if (n <= 0, return(1)); prod(i = 1, n, prime(i)^i); }
vector(11, i, a(i-1))  \\ Gheorghe Coserea, Aug 24 2015

Formula

a(0) = 1, a(n+1) = a(n)*{prime(n+1)^(n+1)}.

Extensions

More terms from Sascha Kurz, Jan 22 2003