OFFSET
1,1
COMMENTS
LINKS
Dana Jacobsen, Table of n, a(n) for n = 1..10000
Baris Paksoy, Derived Ramanujan primes: R'_n, arXiv:1210.6991 [math.NT], 2012.
EXAMPLE
The only negative term is a(1) = 2*R(1) - R(2) = 2*2 - 11 = -7.
MATHEMATICA
nn = 100;
R = Table[0, {nn}]; s = 0; Do[If[PrimeQ[k], s++]; If[PrimeQ[k/2], s--]; If[s < nn, R[[s + 1]] = k], {k, Prime[3*nn]}]; R = R + 1;
PROG
(Perl) use ntheory ":all"; say 2*nth_ramanujan_prime($_)-nth_ramanujan_prime($_+1) for 1..10 # Dana Jacobsen, Sep 02 2017
CROSSREFS
KEYWORD
sign
AUTHOR
Jonathan Sondow, Dec 16 2013
STATUS
approved