

A127343


Product of 11 consecutive primes.


5



200560490130, 3710369067405, 50708377254535, 436092044389001, 2928046583754721, 14107860812636383, 64027983688118969, 229747470880897477, 810162134158954261, 2500935283708076197
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

a(n) = absolute value of the coefficient of x^0 of the polynomial Product_{j=0..10} (xprime(n+j)) of degree 11; the roots of this polynomial are prime(n), ..., prime(n+10).


LINKS

Table of n, a(n) for n=1..10.


MATHEMATICA

a = {}; Do[AppendTo[a, Product[Prime[x + n], {n, 0, 10}]], {x, 1, 50}]; a
Times@@@Partition[Prime[Range[50]], 11, 1] (* Harvey P. Dale, Oct 21 2011 *)


PROG

(PARI) 1. {m=10; k=11; for(n=0, m1, print1(a=prod(j=1, k, prime(n+j)), ", "))} 2. {m=10; k=11; for(n=1, m, print1(abs(polcoeff(prod(j=0, k1, (xprime(n+j))), 0)), ", "))} \\ Klaus Brockhaus, Jan 21 2007
(MAGMA) [&*[ NthPrime(n+k): k in [0..10] ]: n in [1..50] ]; // Vincenzo Librandi, Apr 03 2011


CROSSREFS

Cf. A006094, A046301, A046302, A046303, A046324, A046325, A046326, A046327, A127342, A127344.
Sequence in context: A104800 A217091 A144173 * A108048 A108496 A185430
Adjacent sequences: A127340 A127341 A127342 * A127344 A127345 A127346


KEYWORD

nonn


AUTHOR

Artur Jasinski, Jan 11 2007


EXTENSIONS

Edited by Klaus Brockhaus, Jan 21 2007


STATUS

approved



