|
|
A163384
|
|
Values of n for which the ratio A161865/A161867 is greater than 1/2.
|
|
1
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
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
|
|
|
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 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Added missing term 58 and terms a(14) onward by G. C. Greubel, Dec 20 2016
|
|
STATUS
|
approved
|
|
|
|