A038347 - OEIS

%I #10 May 18 2020 03:44:10

%S 3,10,21,40,63,94,137,184,243,310,381,460,543,646,753,880,1011,1150,

%T 1301,1464,1631,1810,2001,2200,2411,2634,2861,3100,3351,3614,3885,

%U 4168,4475,4786,5117,5464,5823,6190,6569,6952,7371,7802,8241,8684,9147,9614

%N Sum of first n primes of form 4k-1.

%H Robert Israel, <a href="/A038347/b038347.txt">Table of n, a(n) for n = 1..10000</a>

%p ListTools:-PartialSums(select(isprime, [seq(i,i=3..1000,4)])); # _Robert Israel_, Feb 27 2017

%t Accumulate[Select[Prime[Range[250]],Mod[#,4]==3&]] (* _Harvey P. Dale_, Jul 04 2013 *)

%Y Cf. A002145, A038346, A078586.

%K easy,nonn

%O 1,1

%A Den Roussel (DenRoussel(AT)webtv.net)