A173081 Number of twin prime pairs < 10^n that contain at least one Ramanujan prime (A104272).
0, 6, 28, 167, 964, 6305, 45082, 335919, 2605867, 20841010, 170395131
Offset: 1
Links
- J. Sondow, J. W. Nicholson, and T. D. Noe, Ramanujan Primes: Bounds, Runs, Twins, and Gaps, J. Integer Seq. 14 (2011) Article 11.6.2.
Crossrefs
Programs
-
Mathematica
nn=50000; t=Table[0,{nn}]; s=0; Do[If[PrimeQ[k], s++]; If[PrimeQ[k/2], s--]; If[s
Extensions
a(10)-a(11) from Dana Jacobsen, Apr 29 2015
Comments