|
%I #7 Jan 12 2021 21:32:55
%S 5,16,33,56,85,126,173,226,285,356,439,528,629,736,849,980,1117,1266,
%T 1433,1606,1785,1976,2173,2400,2633,2872,3123,3380,3643,3912,4193,
%U 4486,4797,5114,5461,5814,6173,6556,6945,7346,7765,8196,8639,9088
%N Partial sums of primes congruent to 5 mod 6.
%H Harvey P. Dale, <a href="/A038361/b038361.txt">Table of n, a(n) for n = 1..1000</a>
%e a(4) = 56 = 5+11+17+23.
%t Accumulate[Select[Prime[Range[100]],Mod[#,6]==5&]] (* _Harvey P. Dale_, May 28 2013 *)
%Y Partial sums of A007528.
%K easy,nonn
%O 1,1
%A Den Roussel (DenRoussel(AT)webtv.net)
|
