%I A127337
%S A127337 129,158,192,228,264,300,340,382,424,468,510,552,594,636,682,732,780,
%T A127337 824,870,912,954,1008,1060,1114,1164,1216,1266,1320,1376,1434,1494,1546,
%U A127337 1596,1650,1704,1752,1800,1854,1914,1974,2030,2084,2142,2192,2250,2310
%N A127337 Numbers that are the sum of 10 consecutive primes.
%C A127337 a(n) = absolute value of coefficient of x^9 of the polynomial Prod_{j=0,
9}(x-prime(n+j)) of degree 10; the roots of this polynomial are prime(n),
..., prime(n+9).
%t A127337 a = {}; Do[AppendTo[a, Sum[Prime[x + n], {n, 0, 9}]], {x, 1, 50}]; a
%o A127337 (PARI) 1. {m=46;k=10;for(n=1,m,print1(a=sum(j=0,k-1,prime(n+j)),","))}
2. {m=46;k=10;for(n=1,m,print1(abs(polcoeff(prod(j=0,k-1,(x-prime(n+j))),
k-1)),","))} - Klaus Brockhaus, Jan 13 2007
%Y A127337 Cf. A011974, A001043, A034961, A034963, A034964, A127333, A127334, A127335,
A127336, A127338, A127339.
%Y A127337 Sequence in context: A025332 A025324 A060878 this_sequence A034072 A157951
A043383
%Y A127337 Adjacent sequences: A127334 A127335 A127336 this_sequence A127338 A127339
A127340
%K A127337 nonn
%O A127337 1,1
%A A127337 Artur Jasinski (grafix(AT)csl.pl), Jan 11 2007
%E A127337 Edited by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Jan 13 2007
|