login
Numbers k such that A073837(k) is prime.
2

%I #9 Feb 17 2021 10:53:32

%S 2,7,9,14,19,27,28,29,30,36,44,60,61,68,70,71,87,88,89,100,101,104,

%T 105,108,109,112,113,138,157,174,192,193,199,201,202,203,204,210,274,

%U 275,276,277,304,305,306,364,365,366,372,373,384,387,388,389,399,400,401,405,471,472,473,511,512,513

%N Numbers k such that A073837(k) is prime.

%C Numbers k such that the sum of primes from k to 2*k is prime.

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

%e a(3) = 9 is in the sequence because A073837(9) = 11+13+17 = 41 is prime.

%p R:= 2: S:= [2, 3]: s:= 5: q:= 5: count:= 1:

%p for n from 3 while count < 100 do

%p if n = S[1]+1 then S:= S[2..-1]; s:= s-n+1 fi;

%p if q <= 2*n then S:= [op(S), q]; s:= s+q; q:= nextprime(q) fi;

%p if isprime(s) then count:= count+1; R:= R, n; fi;

%p od:

%p R;

%Y Cf. A073837, A341280, A341632.

%K nonn

%O 1,1

%A _J. M. Bergot_ and _Robert Israel_, Feb 16 2021