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
KEYWORD
nonn
AUTHOR
J. M. Bergot and Robert Israel, Aug 18 2022
STATUS
approved