A038346 Sum of first n primes of form 4k+1.

5, 18, 35, 64, 101, 142, 195, 256, 329, 418, 515, 616, 725, 838, 975, 1124, 1281, 1454, 1635, 1828, 2025, 2254, 2487, 2728, 2985, 3254, 3531, 3812, 4105, 4418, 4735, 5072, 5421, 5774, 6147, 6536, 6933

Offset: 1

Author

Den Roussel (DenRoussel(AT)webtv.net)

Keywords

• easy
• nonn

Links

• Jianing Song, Table of n, a(n) for n = 1..10001

Crossrefs

Cf. A002144, A002313, A006278, A038347.

Programs

Mathematica

Accumulate[Select[Prime[Range[100]],IntegerQ[(#-1)/4]&]] (* Harvey P. Dale, Jul 25 2011 *)

PARI

a(n) = my(s=0); forprime(p=2, , if(p%4==1, s+=p; if(n--<1, return(s)))) \\ following Charles R Greathouse IV's program for A078586

Formula

a(n) = Sum_{k=1..n} A002144(k). - Michel Marcus, Oct 18 2021

Extensions

Offset corrected by Jianing Song, Oct 18 2021