|
| |
|
|
A127336
|
|
Numbers that are the sum of 9 consecutive primes.
|
|
8
| |
|
|
100, 127, 155, 187, 221, 253, 287, 323, 363, 401, 439, 479, 515, 553, 593, 635, 679, 721, 763, 803, 841, 881, 929, 977, 1025, 1067, 1115, 1163, 1213, 1267, 1321, 1367, 1415, 1459, 1511, 1555, 1601, 1643, 1691, 1747, 1801, 1851, 1903, 1951, 1999, 2053
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| a(n) = absolute value of coefficient of x^8 of the polynomial Prod_{j=0,8}(x-prime(n+j)) of degree 9; the roots of this polynomial are prime(n), ..., prime(n+8).
|
|
|
MATHEMATICA
| a = {}; Do[AppendTo[a, Sum[Prime[x + n], {n, 0, 8}]], {x, 1, 50}]; a
|
|
|
PROG
| (PARI) 1. {m=46; k=9; for(n=1, m, print1(a=sum(j=0, k-1, prime(n+j)), ", "))} 2. {m=46; k=9; for(n=1, m, print1(abs(polcoeff(prod(j=0, k-1, (x-prime(n+j))), k-1)), ", "))} - Klaus Brockhaus, Jan 13 2007
(MAGMA) [&+[ NthPrime(n+k): k in [0..8] ]: n in [1..100] ]; - Vincenzo Librandi, Apr 03 2011
|
|
|
CROSSREFS
| Cf. A011974, A001043, A034961, A034963, A034964, A127333, A127334, A127335, A127337, A127338, A127339, A082251.
Sequence in context: A066139 A037139 A109881 * A045211 A108551 A096598
Adjacent sequences: A127333 A127334 A127335 * A127337 A127338 A127339
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Jan 11 2007
|
|
|
EXTENSIONS
| Edited by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Jan 13 2007
|
| |
|
|
