|
Search: id:A127343
|
|
|
| A127343 |
|
Product of 11 consecutive primes. |
|
+0
7
|
|
| 200560490130, 3710369067405, 50708377254535, 436092044389001, 2928046583754721, 14107860812636383, 64027983688118969, 229747470880897477, 810162134158954261, 2500935283708076197
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
a(n) = absolute value of the coefficient of x^0 of the polynomial Prod_{j=0,10}(x-prime(n+j)) of degree 11; the roots of this polynomial are prime(n), ..., prime(n+10).
|
|
MATHEMATICA
|
a = {}; Do[AppendTo[a, Product[Prime[x + n], {n, 0, 10}]], {x, 1, 50}]; a
|
|
PROGRAM
|
(PARI) 1. {m=10; k=11; for(n=0, m-1, print1(a=prod(j=1, k, prime(n+j)), ", "))} 2. {m=10; k=11; for(n=1, m, print1(abs(polcoeff(prod(j=0, k-1, (x-prime(n+j))), 0)), ", "))} - Klaus Brockhaus, Jan 21 2007
|
|
CROSSREFS
|
Cf. A006094, A046301, A046302, A046303, A046324, A046325, A046326, A046327, A127342, A127344.
Sequence in context: A104832 A105295 A104800 this_sequence A108048 A108496 A112431
Adjacent sequences: A127340 A127341 A127342 this_sequence A127344 A127345 A127346
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Jan 11 2007
|
|
EXTENSIONS
|
Edited by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Jan 21 2007
|
|
|
Search completed in 0.002 seconds
|
