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.

Previous Showing 21-30 of 57 results. Next

A376760 Let c(n) = A002808(n) denote the n-th composite number; a(n) = number of composite numbers c with c(n) <= c <= 2*c(n).

Original entry on oeis.org

3, 5, 7, 7, 7, 9, 12, 12, 12, 15, 17, 17, 17, 19, 20, 21, 21, 22, 24, 26, 27, 27, 28, 28, 30, 31, 31, 33, 36, 36, 37, 40, 40, 41, 41, 41, 43, 43, 44, 44, 45, 48, 51, 52, 52, 53, 53, 56, 56, 56, 59, 62, 62, 62, 63, 64, 66, 67, 67, 69, 70, 71, 71, 72, 74, 74, 75, 76, 77, 78, 78, 80, 80, 80, 83, 86, 87, 87, 90, 93, 94, 94, 96, 96, 97, 97, 98, 99, 99, 99, 100, 101, 102, 103
Offset: 1

Views

Author

N. J. A. Sloane, Oct 22 2024

Keywords

Comments

There are three other versions: composite c with c(n) < c < 2*c(n): a(n)-2; c(n) <= c < 2*c(n): a(n) - 1; and c(n) < c <= 2*c(n): also a(n) - 1.

Examples

			The 5th composite number is 10, and 10, 12, 14, 15, 16, 18, 20 are composite, so a(5) = 7.
		

Crossrefs

Related sequences:
Primes (p) and composites (c): A000040, A002808, A000720, A065855.
Primes between p(n) and 2*p(n): A063124, A070046; between c(n) and 2*c(n): A376761; between n and 2*n: A035250, A060715, A077463, A108954.
Composites between p(n) and 2*p(n): A246514; between c(n) and 2*c(n): A376760; between n and 2*n: A075084, A307912, A307989, A376759.

Programs

  • Maple
    chi := proc(n) if n <= 3 then 0 else n - numtheory:-pi(n) - 1; fi; end; # A065855
    t := []: for n from 2 to 200000 do if not isprime(n) then t := [op(t), n]; fi; od: # precompute A002808
    ithchi := proc(n) t[n]; end: # returns n-th composite number A002808 for any n <= 182015, analogous to ithprime
    A376760 := proc(n) chi(2*ithchi(n)) - n + 1; end;
    [seq(A376760(n),n=1..120)];
  • Mathematica
    MapIndexed[2*# - PrimePi[2*#] - #2[[1]] &, Select[Range[100], CompositeQ]] (* Paolo Xausa, Oct 22 2024 *)
  • Python
    from sympy import composite, primepi
    def A376760(n): return (m:=composite(n)<<1)-primepi(m)-n # Chai Wah Wu, Oct 22 2024

Formula

a(n) = 2*A002808(n) - A000720(2*A002808(n)) - n. - Paolo Xausa, Oct 22 2024

A376761 Number of primes between the n-th composite number c(n) and 2*c(n).

Original entry on oeis.org

2, 2, 2, 3, 4, 4, 3, 4, 5, 4, 4, 5, 6, 6, 6, 6, 7, 7, 7, 7, 7, 8, 8, 9, 9, 9, 10, 10, 9, 10, 10, 9, 10, 10, 11, 12, 12, 13, 13, 14, 14, 13, 12, 12, 13, 13, 14, 13, 14, 15, 14, 13, 14, 15, 15, 15, 15, 15, 16, 16, 16, 16, 17, 17, 17, 18, 18, 18, 18, 18, 19, 19, 20, 21, 20, 19, 19, 20, 19, 18, 18, 19, 19, 20, 20, 21, 21, 21, 22, 23, 23, 23, 23, 23, 24, 23, 24, 24, 24, 24, 24, 25
Offset: 1

Views

Author

N. J. A. Sloane, Oct 22 2024

Keywords

Comments

Obviously the endpoints are not counted (since they are composite).

Crossrefs

Related sequences:
Primes (p) and composites (c): A000040, A002808, A000720, A065855.
Primes between p(n) and 2*p(n): A063124, A070046; between c(n) and 2*c(n): A376761; between n and 2*n: A035250, A060715, A077463, A108954.
Composites between p(n) and 2*p(n): A246514; between c(n) and 2*c(n): A376760; between n and 2*n: A075084, A307912, A307989, A376759.

Programs

  • Mathematica
    MapIndexed[PrimePi[2*#] + #2[[1]] - # + 1 &, Select[Range[100], CompositeQ]] (* Paolo Xausa, Oct 22 2024 *)
  • Python
    from sympy import composite, primepi
    def A376761(n): return n+1-(m:=composite(n))+primepi(m<<1) # Chai Wah Wu, Oct 22 2024

Formula

a(n) = A000720(2*A002808(n)) - A002808(n) + n + 1. - Paolo Xausa, Oct 22 2024

A084140 a(n) is the smallest number j such that if x >= j there are at least n primes between x and 2x exclusively.

Original entry on oeis.org

2, 6, 9, 15, 21, 24, 30, 34, 36, 49, 51, 54, 64, 75, 76, 84, 90, 91, 114, 115, 117, 120, 121, 132, 135, 141, 154, 156, 174, 175, 184, 187, 201, 205, 210, 216, 217, 220, 231, 244, 246, 252, 285, 286, 294, 297, 300, 301, 304, 321, 322, 324, 327, 330, 339, 360, 364
Offset: 1

Views

Author

Harry J. Smith, May 15 2003

Keywords

Comments

For all m >= a(n) there are at least n primes between m and 2m exclusively. This calculation relies on the fact that pi(2m) - pi(m) > m/(3*log(m)) for m >= 5. This is one more than the terms of A084139 with offset changed from 0 to 1.
For n > 5889, pi(2n) - pi(n) > f(2, 2n) - f(3, n) where f(k, x) = x/log x * (1 + 1/log x + k/(log x)^2). This may be useful for checking larger terms. The constant 3 can be improved at the cost of an increase in the constant 5889. - Charles R Greathouse IV, May 02 2012
A168421(n) = nextprime(a(n)), where nextprime(x) is the next prime >= x. - John W. Nicholson, Dec 21 2012
a(1) = ceiling((A104272(1)+1)/2) modifies the only even prime, 2; which has been stated, in Formula, as a(1) = A104272(1); for all others, a(n) = (A104272(n)+1)/2 = ceiling ((A104272(n)+1)/2). - John W. Nicholson, Dec 24 2012
Srinivasan's Lemma (2014): previousprime(a(n)) = p_(k-n) < (p_k)/2, where the n-th Ramanujan Prime R_n is the k-th prime p_k, and with n > 1. Proof: By the minimality of R_n, the interval ((p_k)/2,p_k] contains exactly n primes, so p_(k-n) < (p_k)/2. - Copied and adapted from a comment by Jonathan Sondow in A168421 by John W. Nicholson, Feb 17 2015

Examples

			a(11)=51 since there are at least 11 primes between m and 2m for all m >= 51 and this is not true for any m < 51. Although a(100)=720 is not listed, for all m >= 720, there are at least 100 primes between m and 2m.
		

References

  • Paulo Ribenboim, The Little Book of Big Primes, Springer-Verlag, 1991, p. 140.
  • Paulo Ribenboim, The Little Book of Bigger Primes, Springer-Verlag, 2004, p. 181.

Crossrefs

Programs

Formula

a(1) = A104272(1); for n >= 2, a(n) = (A104272(n)+1)/2. - Vladimir Shevelev, Dec 07 2012
a(n) = ceiling((A104272(n)+1)/2) for n >= 1. - John W. Nicholson, Dec 24 2012

A060756 a(n) is the smallest number for which exactly n primes are bounded between a(n) and 2a(n) exclusively.

Original entry on oeis.org

1, 2, 4, 9, 10, 16, 22, 27, 34, 36, 40, 51, 52, 55, 57, 70, 82, 87, 91, 96, 99, 100, 120, 121, 126, 135, 136, 142, 147, 159, 175, 177, 187, 190, 205, 210, 216, 217, 220, 222, 232, 246, 250, 255, 262, 289, 297, 300, 301, 304, 309, 310, 324, 327, 330, 339, 342
Offset: 0

Views

Author

Lekraj Beedassy, Apr 23 2001

Keywords

Comments

a(n) is the first occurrence of n in A060715.

Examples

			a(10)=40 since ten primes,namely,41,43,47,53,59,61,67,71,73,79,first arise between 40 and its double.
		

Crossrefs

Programs

  • Haskell
    import Data.List (elemIndex)
    import Data.Maybe (mapMaybe)
    a060756 n = a060756_list !! n
    a060756_list = map (+ 1) $ mapMaybe (`elemIndex` a060715_list) [0..]
    -- Reinhard Zumkeller, Jan 05 2012

Extensions

More terms from Larry Reeves (larryr(AT)acm.org), Jun 05 2001

A143227 (Number of primes between n and 2n) - (number of primes between n^2 and (n+1)^2), if > 0.

Original entry on oeis.org

1, 2, 1, 1, 1, 1, 2, 2, 3, 3, 3, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 2, 2, 1, 1, 3, 2, 1, 1, 2, 2, 6, 3, 3, 1, 1, 1, 2, 1, 1, 1, 1, 6, 3, 8, 3, 2, 3, 2, 3, 1, 1, 4, 3, 10, 2, 1, 1, 2, 3, 1, 3, 4, 2, 2, 9, 7, 2, 2, 4, 3, 3, 1, 2, 3, 5, 1, 2, 3, 2, 11, 3, 1, 2, 4, 7, 1, 1, 1, 1, 1, 5, 1, 2, 3, 3, 4, 2, 2, 9, 5, 1, 4, 2, 2
Offset: 1

Views

Author

Jonathan Sondow, Aug 02 2008

Keywords

Comments

If the sequence is bounded (e.g., if it is finite), then Legendre's conjecture is true: there is always a prime between n^2 and (n+1)^2, at least for all sufficiently large n. This follows from the strong form of Bertrand's postulate proved by Ramanujan (see A104272 Ramanujan primes).

Examples

			The first positive value of ((pi(2n) - pi(n)) - (pi((n+1)^2) - pi(n^2))) is 1 (at n = 42), the 2nd is 2 (at n = 55) and the 3rd is 1 (at n = 56), so a(1) = 1, a(2) = 2, a(3) = 1.
		

References

  • M. Aigner and C. M. Ziegler, Proofs from The Book, Chapter 2, Springer, NY, 2001.
  • G. H. Hardy and E. M. Wright, An Introduction to the Theory of Numbers, 5th ed., Oxford Univ. Press, 1989, p. 19.
  • S. Ramanujan, Collected Papers of Srinivasa Ramanujan (G. H. Hardy, S. Aiyar, P. Venkatesvara and B. M. Wilson, eds.), Amer. Math. Soc., Providence, 2000, pp. 208-209.

Crossrefs

Cf. A000720, A014085, A060715, A104272, A143223, A143224, A143225, A143226 = corresponding values of n.

Programs

  • Mathematica
    L={}; Do[ With[ {d=(PrimePi[2n]-PrimePi[n])-(PrimePi[(n+1)^2]-PrimePi[n^2])}, If[d>0, L=Append[L,d]]], {n,0,1000}]; L
    Select[Table[(PrimePi[2n]-PrimePi[n])-(PrimePi[(n+1)^2]-PrimePi[n^2]),{n,1000}],#>0&] (* Harvey P. Dale, Jun 19 2019 *)

Formula

a(n) = |A143223(A143226(n))|.

A143223 (Number of primes between n^2 and (n+1)^2) - (number of primes between n and 2n).

Original entry on oeis.org

0, 2, 1, 1, 1, 1, 2, 1, 2, 0, 1, 1, 1, 2, 1, 2, 2, 1, 2, 2, 3, 2, 1, 1, 3, 2, 1, 1, 2, 2, 1, 3, 2, 3, 1, 2, 0, 0, 3, 2, 2, 2, -1, 3, 2, 3, 0, 4, 6, 0, 1, 4, 4, 1, 1, -2, -1, 3, -1, 3, 3, 1, 5, 3, 1, 3, 1, 2, 4, -1, 6, 1, 1, 4, 4, 4, 7, -1, 3, 8, -2, 5, 3, 5, 1, 0, 5, 5, 1, 2, 3, 2, 1, 5, 3, 3, 2, 3, 4, 1, 2
Offset: 0

Views

Author

Jonathan Sondow, Jul 31 2008

Keywords

Comments

Legendre's conjecture (still open) says there is always a prime between n^2 and (n+1)^2. Bertrand's postulate (actually a theorem due to Chebyshev) says there is always a prime between n and 2n.
Hashimoto's plot of (1 - a(n)) shows that |a(n)| is small compared to n for n < 30000.
From Jonathan Sondow, Aug 07 2008: (Start)
It appears that there are only a finite number of negative terms (see A143226).
If the negative terms are bounded, then Legendre's conjecture is true, at least for all sufficiently large n. This follows from the strong form of Bertrand's postulate proved by Ramanujan (see A104272 Ramanujan primes). (End)

Examples

			There are 4 primes between 6^2 and 7^2 and 2 primes between 6 and 2*6, so a(6) = 4 - 2 = 2.
a(1) = 2 because there are two primes between 1^2 and 2^2 (namely, 2 and 3) and none between 1 and 2. [_Jonathan Sondow_, Aug 07 2008]
		

References

  • M. Aigner and C. M. Ziegler, Proofs from The Book, Chapter 2, Springer, NY, 2001.
  • G. H. Hardy and E. M. Wright, An Introduction to the Theory of Numbers. 5th ed., Oxford Univ. Press, 1989, p. 19.
  • S. Ramanujan, Collected Papers of Srinivasa Ramanujan (G. H. Hardy, S. Aiyar, P. Venkatesvara and B. M. Wilson, eds.), Amer. Math. Soc., Providence, 2000, pp. 208-209.

Crossrefs

Negative terms are A143227. Cf. A104272 (Ramanujan primes).

Programs

  • Mathematica
    L={0,2}; Do[L=Append[L,(PrimePi[(n+1)^2]-PrimePi[n^2]) - (PrimePi[2n]-PrimePi[n])], {n,2,100}]; L
  • PARI
    a(n)=sum(k=n^2+1,n^2+2*n,isprime(k))-sum(k=n+1,2*n,isprime(k)) \\ Charles R Greathouse IV, May 30 2014

Formula

a(n) = A014085(n) - A060715(n) (for n > 0) = [pi((n+1)^2) - pi(n^2)] - [pi(2n) - pi(n)] (for n > 1).

Extensions

Corrected by Jonathan Sondow, Aug 07 2008, Aug 09 2008

A143224 Numbers n such that (number of primes between n^2 and (n+1)^2) = (number of primes between n and 2n).

Original entry on oeis.org

0, 9, 36, 37, 46, 49, 85, 102, 107, 118, 122, 127, 129, 140, 157, 184, 194, 216, 228, 360, 365, 377, 378, 406, 416, 487, 511, 571, 609, 614, 672, 733, 767, 806, 813, 863, 869, 916, 923, 950, 978, 988, 1249, 1279, 1280, 1385, 1427, 1437, 1483, 1539, 1551, 1690
Offset: 1

Views

Author

Jonathan Sondow, Jul 31 2008

Keywords

Comments

The sequence gives the positions of zeros in A143223. The number of primes in question is A143225(n).
Legendre's conjecture (still open) says there is always a prime between n^2 and (n+1)^2. Bertrand's postulate (actually a theorem due to Chebyshev) says there is always a prime between n and 2n.

Examples

			There is the same number of primes (namely 3) between 9^2 and 10^2 as between 9 and 2*9, so 9 is a term.
		

References

  • M. Aigner and C. M. Ziegler, Proofs from The Book, Chapter 2, Springer, NY, 2001.
  • G. H. Hardy and E. M. Wright, An Introduction to the Theory of Numbers. 5th ed., Oxford Univ. Press, 1989, p. 19.
  • S. Ramanujan, Collected Papers of Srinivasa Ramanujan (G. H. Hardy, S. Aiyar, P. Venkatesvara and B. M. Wilson, eds.), Amer. Math. Soc., Providence, 2000, pp. 208-209. [Jonathan Sondow, Aug 03 2008]

Crossrefs

Programs

  • Maple
    with(numtheory): A143224:=n->`if`(pi((n+1)^2)-pi(n^2) = pi(2*n)-pi(n), n, NULL): seq(A143224(n), n=0..2000); # Wesley Ivan Hurt, Jul 25 2017
  • Mathematica
    L={}; Do[If[PrimePi[(n+1)^2]-PrimePi[n^2] == PrimePi[2n]-PrimePi[n], L=Append[L,n]], {n,0,2000}]; L
    (* Second program *)
    With[{nn = 2000}, {0}~Join~Position[#, {0}][[All, 1]] &@ Map[Differences, Transpose@ {Differences@ Array[PrimePi[#^2] &, nn], Array[PrimePi[2 #] - PrimePi[#] &, nn - 1]}]] (* Michael De Vlieger, Jul 25 2017 *)
  • PARI
    is(n) = primepi((n+1)^2)-primepi(n^2)==primepi(2*n)-primepi(n) \\ Felix Fröhlich, Jul 25 2017

Formula

A143223(a(n)) = 0.

A143225 Number of primes between n^2 and (n+1)^2, if equal to the number of primes between n and 2n.

Original entry on oeis.org

0, 3, 9, 9, 10, 10, 16, 20, 19, 21, 23, 23, 24, 25, 28, 31, 32, 36, 38, 56, 57, 59, 59, 62, 65, 71, 75, 84, 88, 88, 96, 102, 107, 115, 116, 119, 120, 126, 125, 129, 132, 132, 163, 168, 168, 182, 189, 189, 192, 197, 198, 213, 236
Offset: 1

Views

Author

Jonathan Sondow, Jul 31 2008

Keywords

Comments

Legendre's conjecture (still open) says there is always a prime between n^2 and (n+1)^2. Bertrand's postulate (actually a theorem due to Chebyshev) says there is always a prime between n and 2n.
See the additional reference and link to Ramanujan's work mentioned in A143223. [Jonathan Sondow, Aug 03 2008]

Examples

			There are 3 primes between 9^2 and 10^2 and 3 primes between 9 and 2*9, so 3 is a member.
		

References

  • M. Aigner and C. M. Ziegler, Proofs from The Book, Chapter 2, Springer, NY, 2001.
  • G. H. Hardy and E. M. Wright, An Introduction to the Theory of Numbers. 5th ed., Oxford Univ. Press, 1989, p. 19.

Crossrefs

Programs

  • Mathematica
    L={}; Do[If[PrimePi[(n+1)^2]-PrimePi[n^2] == PrimePi[2n]-PrimePi[n], L=Append[L,PrimePi[2n]-PrimePi[n]]], {n,0,2000}]; L

Formula

a(n) = A014085(A143224(n)) = A060715(A143224(n)) for n > 0.

A143226 Numbers n such that there are more primes between n and 2n than between n^2 and (n+1)^2.

Original entry on oeis.org

42, 55, 56, 58, 69, 77, 80, 119, 136, 137, 143, 145, 149, 156, 174, 177, 178, 188, 219, 225, 232, 247, 253, 254, 257, 261, 263, 297, 306, 310, 325, 327, 331, 335, 339, 341, 344, 356, 379, 395, 402, 410, 418, 421, 425, 433, 451, 485, 500
Offset: 1

Views

Author

Jonathan Sondow, Jul 31 2008

Keywords

Comments

Legendre's conjecture (still open) says there is always a prime between n^2 and (n+1)^2. Bertrand's postulate (actually a theorem due to Chebyshev) says there is always a prime between n and 2n.
It appears that this sequence is finite; searching up to 10^5, the last n appears to be 48717. [T. D. Noe, Aug 01 2008]
If the sequence is finite, then, by Bertrand's postulate, Legendre's conjecture is true for sufficiently large n. - Jonathan Sondow, Aug 02 2008
No other n <= 10^6. The plot of A143223 shows that it is quite likely that there are no additional terms. - T. D. Noe, Aug 04 2008
See the additional reference and link to Ramanujan's work mentioned in A143223. - Jonathan Sondow, Aug 03 2008

Examples

			There are 10 primes between 42 and 2*42, but only 9 primes between 42^2 and 43^2, so 42 is a member.
		

References

  • M. Aigner and C. M. Ziegler, Proofs from The Book, Chapter 2, Springer, NY, 2001.
  • G. H. Hardy and E. M. Wright, An Introduction to the Theory of Numbers. 5th ed., Oxford Univ. Press, 1989, p. 19.

Crossrefs

Programs

  • Mathematica
    L={}; Do[If[PrimePi[(n+1)^2]-PrimePi[n^2] < PrimePi[2n]-PrimePi[n], L=Append[L,n]], {n,0,500}]; L

Formula

A143223(n) < 0.

A084139 a(n) is the largest number for which exactly n primes are bounded between a(n) and 2a(n) exclusively.

Original entry on oeis.org

1, 5, 8, 14, 20, 23, 29, 33, 35, 48, 50, 53, 63, 74, 75, 83, 89, 90, 113, 114, 116, 119, 120, 131, 134, 140, 153, 155, 173, 174, 183, 186, 200, 204, 209, 215, 216, 219, 230, 243, 245, 251, 284, 285, 293, 296, 299, 300, 303, 320, 321, 323, 326, 329, 338, 359, 363
Offset: 0

Views

Author

Harry J. Smith, May 15 2003

Keywords

Comments

a(n) is the index of last occurrence of n in A060715. This calculation relies on the fact that Pi(2*m)-Pi(m) > m/(3*Log(m)) for m>=5. It can be shown that every integer >= 0 occurs in A060715, so there is no problem in finding the last occurrence.
A168421(n) = nextprime(a(n)), where nextprime(x) is the next prime > x. Note: some a(n) may be prime, therefore nextprime(x) not equal to x. - John W. Nicholson, Oct 11 2013

Examples

			a(10) = 50 since ten primes last arise between 50 and 100: 53, 59, 61, 67, 71, 73, 79, 83, 89, 97.
		

References

  • P. Ribenboim, The Little Book of Big Primes. Springer-Verlag, 1991, p. 140.

Crossrefs

Programs

  • Mathematica
    nn = 100; t = Table[0, {nn}]; Do[m = PrimePi[2*n] - PrimePi[n]; If[0 < m <= nn, t[[m]] = n], {n, 15*nn}]; Join[{1}, t] (* T. D. Noe, Dec 31 2012 *)

Formula

a(n) = floor((A104272(n)+1)/2) for n >= 1. - John W. Nicholson, Oct 11 2013
a(n) = A084140(n+1) - 1. - John W. Nicholson, Oct 11 2013
Previous Showing 21-30 of 57 results. Next