cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-3 of 3 results.

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

Original entry on oeis.org

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

Views

Author

Daniel Tisdale, Jul 25 2009

Keywords

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.

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

A163161 Values of n at which the sequence A161865/A161867 equals 1/2.

Original entry on oeis.org

5, 9, 14, 30, 44, 47, 64, 67, 72, 89, 99, 124, 125, 194, 198, 200, 208, 213, 214, 249, 267, 270, 320, 333, 372, 373, 374, 393, 455, 460, 475, 519, 586, 603, 643, 701, 704, 712, 770, 774, 789, 814, 825, 828, 836, 891, 906, 930, 941, 970, 974, 982, 983, 988, 1022
Offset: 1

Views

Author

Daniel Tisdale, Jul 21 2009, Jul 24 2009

Keywords

Comments

The corresponding sequence for primes is A144264, and the ratio is given by sequences A161621/A161622.

Programs

  • Mathematica
    t1 = Table[ ((2n+1) - (PrimePi[(n+1)^2] - PrimePi[n^2]))/((4n+4)- (PrimePi[(n+2)^2] - PrimePi[n^2])), {n,1,300}]; t2= Position[t1, 1/2] (* Daniel Tisdale, Jul 24 2009 *)

Extensions

Corrected by the author, Jul 25 2009
Extended beyond 194 by R. J. Mathar, Sep 27 2009

A161867 Denominators of ratio of nonprimes in a square interval to that of nonprimes in that interval and its successor.

Original entry on oeis.org

4, 8, 11, 5, 2, 7, 25, 29, 2, 35, 39, 21, 47, 2, 51, 28, 61, 64, 67, 35, 37, 79, 81, 83, 89, 93, 95, 33, 104, 2, 109, 113, 39, 121, 125, 65, 131, 133, 137, 47, 37, 151, 51, 2, 161, 165, 2, 171, 179, 89, 177, 184, 191, 49, 201, 199, 101, 207, 208, 43, 109, 55, 227, 2, 233, 119
Offset: 1

Views

Author

Daniel Tisdale, Jun 20 2009

Keywords

Examples

			First few ratios are 1/4, 3/8, 5/11, 2/5, 1/2, 3/7, 12/25, 13/29.
		

Crossrefs

Cf. A161865, numerators for this sequence.

Programs

  • Mathematica
    Denominator[Table[((2 n + 1) - (PrimePi[(n + 1)^2] - PrimePi[n^2]))/((4 n + 4) - (PrimePi[(n + 2)^2] - PrimePi[n^2])), {n, 1, 100}]] (* corrected by G. C. Greubel, Dec 20 2016 *)

Formula

The limit of this sequence of ratios is 1/2, as can be shown by setting an increasing lower bound on the ratio of composites in successive square intervals.

Extensions

Keyword:frac added by R. J. Mathar, Jun 30 2009
Extended beyond a(9) by R. J. Mathar, Sep 27 2009
Showing 1-3 of 3 results.