login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A087315 a(n) = Product_{k=1..n} prime(k)^prime(n-k+1). 6
1, 4, 72, 21600, 190512000, 580909190400000, 428616352408083840000000, 859278392084450410309036800000000000, 2097197194438629126172451944256706311040000000000000 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

G. C. Greubel, Table of n, a(n) for n = 0..23

EXAMPLE

a(3) = 2^5*3^3*5^2 = 21600.

MAPLE

seq(product(ithprime(k)^ithprime(n-k+1), k=1..n), n=0..10);

MATHEMATICA

Table[Product[Prime[k]^Prime[n - k + 1], {k, 1, n}], {n, 0, 10}] (* G. C. Greubel, Oct 14 2018 *)

PROG

(Sage) [prod(nth_prime(i)^nth_prime(k-i+1) for i in (1..k)) for k in (0..10)] # Giuseppe Coppoletta, Nov 03 2014

(PARI) for(n=0, 10, print1(prod(k=1, n, prime(k)^prime(n-k+1)), ", ")) \\ G. C. Greubel, Oct 14 2018

(MAGMA) [1] cat [(&*[NthPrime(k)^(NthPrime(n-k+1)): k in [1..n]]): n in [1..10]]; // G. C. Greubel, Oct 14 2018

CROSSREFS

Cf. A006939, A002110, A025487, A004394, A002093, A002182, A055932, A025487, A089247, A071364, A097320, A046523, A056166, A114129, A053810.

Sequence in context: A152653 A344693 A172478 * A081460 A327040 A327112

Adjacent sequences:  A087312 A087313 A087314 * A087316 A087317 A087318

KEYWORD

nonn

AUTHOR

Amarnath Murthy, Sep 03 2003

EXTENSIONS

More terms from Jorge Coveiro, Dec 22 2004

Corrected by David Wasserman, May 02 2005

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 20 03:04 EDT 2021. Contains 348099 sequences. (Running on oeis4.)