OFFSET
1,1
COMMENTS
Primes in A038349.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(3) = 211 is a term because 211 = A037349(7) = 7+13+19+31+37+43+61 and is prime.
MAPLE
R:= NULL: count:= 0: t:= 0:
for p from 1 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] == 1 &]], PrimeQ] (* Amiram Eldar, Aug 18 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
J. M. Bergot and Robert Israel, Aug 18 2022
STATUS
approved