login
A034963
Sums of four consecutive primes.
47
17, 26, 36, 48, 60, 72, 88, 102, 120, 138, 152, 168, 184, 202, 220, 240, 258, 272, 290, 306, 324, 348, 370, 390, 408, 420, 432, 456, 480, 508, 534, 556, 576, 596, 620, 638, 660, 682, 700, 724, 744, 762, 780, 800, 830, 860, 890, 912, 928, 942, 964, 988, 1012
OFFSET
1,1
FORMULA
a(n) = Sum_{k=0..3} A000040(n+k). - Omar E. Pol, Mar 02 2020
EXAMPLE
a(7) = 17 + 19 + 23 + 29 = 88.
MAPLE
A034963 := proc(n)
add(ithprime(i), i=n..n+3) ;
end proc: # R. J. Mathar, Jun 06 2013
MATHEMATICA
Plus@@@Partition[Prime[Range[6! ]], 4, 1] (* Vladimir Joseph Stephan Orlovsky, Feb 18 2010 *)
PROG
(Magma) [&+[ NthPrime(n+k): k in [0..3] ]: n in [1..90] ]; /* Vincenzo Librandi, Apr 03 2011 */
(PARI) a(n)=my(p=prime(n)); p+sum(i=1, 3, p=nextprime(p+1)) \\ Charles R Greathouse IV, Jul 01 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Patrick De Geest, Oct 15 1998
STATUS
approved