A163384 Values of n for which the ratio A161865/A161867 is greater than 1/2.

23, 37, 42, 46, 50, 56, 58, 61, 69, 75, 77, 78, 80, 85, 92, 105, 107, 110, 116, 119, 122, 129, 133, 137, 138, 140, 143, 145, 147, 149, 152, 153, 157, 159, 162, 165, 168, 172, 174, 175, 178, 180, 182, 184, 188, 190, 192, 195, 201, 203, 205, 210, 216, 219, 222, 225, 228, 229, 232

Offset: 1

Author

Daniel Tisdale, Jul 25 2009

Keywords

• nonn

Comments

The corresponding values of A161621/A161622 are less than 1/2. For given n, both sequences would not be simultaneously greater than 1/2, although both could be less than 1/2.

Links

• G. C. Greubel, Table of n, a(n) for n = 1..1000

Programs

Mathematica

Select[Range[100], ((2 # + 1) - (PrimePi[(# + 1)^2] - PrimePi[#^2]))/((4 # + 4) - (PrimePi[(# + 2)^2] - PrimePi[#^2])) > 1/2 &] (* G. C. Greubel, Dec 20 2016 *)

Extensions

Added missing term 58 and terms a(14) onward by G. C. Greubel, Dec 20 2016