A038347 Sum of first n primes of form 4k-1.
3, 10, 21, 40, 63, 94, 137, 184, 243, 310, 381, 460, 543, 646, 753, 880, 1011, 1150, 1301, 1464, 1631, 1810, 2001, 2200, 2411, 2634, 2861, 3100, 3351, 3614, 3885, 4168, 4475, 4786, 5117, 5464, 5823, 6190, 6569, 6952, 7371, 7802, 8241, 8684, 9147, 9614
Offset: 1
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
Programs
-
Maple
ListTools:-PartialSums(select(isprime, [seq(i,i=3..1000,4)])); # Robert Israel, Feb 27 2017
-
Mathematica
Accumulate[Select[Prime[Range[250]],Mod[#,4]==3&]] (* Harvey P. Dale, Jul 04 2013 *)