A354573 Prime partial sums of the primes == 5 (mod 6).

5, 173, 439, 1117, 1433, 2633, 3643, 6173, 11489, 22727, 25867, 36523, 51341, 71707, 80347, 89413, 98947, 102203, 119869, 135209, 155653, 173087, 182233, 196387, 226063, 298031, 353921, 367219, 460127, 483179, 498859, 547387, 555683, 572581, 826201, 932801, 988453, 1057741, 1203421, 1253999

Offset

1,1

Comments

Primes in A038361.

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Example

a(2) = 173 is a term because 173 = A038361(7) = 5+11+17+23+29+41+47 and is prime.

Maple

R:= NULL: count:= 0: t:= 0:
for p from 5 by 6 while count < 100 do
  if isprime(p) then
    t:= t+p;
    if isprime(t) then R:= R, t; count:= count+1 fi
  fi
od:
R;

Mathematica

Select[Accumulate[Select[Prime[Range[1000]], Mod[#, 6] == 5 &]], PrimeQ] (* Amiram Eldar, Aug 19 2022 *)

Crossrefs

Cf. A038361, A354572.

Sequence in context: A198711 A210927 A139986 * A123111 A346541 A303154

Adjacent sequences: A354570 A354571 A354572 * A354574 A354575 A354576

Keyword

nonn

Author

J. M. Bergot and Robert Israel, Aug 18 2022

Status

approved