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-4 of 4 results.

A022853 a(n) = integer nearest n*Pi.

Original entry on oeis.org

0, 3, 6, 9, 13, 16, 19, 22, 25, 28, 31, 35, 38, 41, 44, 47, 50, 53, 57, 60, 63, 66, 69, 72, 75, 79, 82, 85, 88, 91, 94, 97, 101, 104, 107, 110, 113, 116, 119, 123, 126, 129, 132, 135, 138, 141, 145, 148, 151, 154, 157, 160, 163, 167, 170, 173, 176, 179
Offset: 0

Views

Author

Keywords

Comments

Since n*Pi is an irrational number, all tie-breaking rounding methods yield the same integer sequence. - Artur Twarecki (numbers(AT)twarecki.ca), Dec 19 2006
Or around of length of oval of constant width n. - Vladimir Shevelev, Oct 07 2013

Examples

			a(100)=314 because round(100*Pi)=314.
		

References

  • V. Shevelev, On ovals of a given function of width, Intern. Geom. School-Seminar Memory N. V. Efimov, Abrau-Durso, 1996, 73-75 (Abstracts in Russian).

Crossrefs

Programs

  • Magma
    R:= RealField(10); [Round(n*Pi(R)): n in [0..60]]; // G. C. Greubel, Sep 29 2018
  • Mathematica
    Table[Round[n Pi], {n, 0, 57}] (* Michael De Vlieger, Jul 27 2015 *)
  • PARI
    vector(100, n, n--; round(n*Pi)) \\ Altug Alkan, Nov 22 2015
    

Extensions

Edited by N. J. A. Sloane, Jul 03 2008 at the suggestion of R. J. Mathar

A332045 Numbers k such that ceiling(Pi/arctan(1/k)) = ceiling(k*Pi)+1.

Original entry on oeis.org

6, 7, 14, 21, 28, 113, 226, 339, 452, 565, 678, 791, 904, 1017, 1130, 1243, 1356, 1469, 1582, 1695, 1808, 1921, 33215, 99532, 364913, 729826, 1725033, 3450066, 5175099, 27235615, 52746197, 131002976, 471265707, 811528438, 2774848045, 4738167652, 567663097408
Offset: 1

Views

Author

Jianing Song, Feb 05 2020

Keywords

Comments

Note that ceiling(Pi/arctan(1/k)) - ceiling(k*Pi) is equal to either 0 or 1, that is, for all other k we have ceiling(Pi/arctan(1/k)) = ceiling(k*Pi).
Numbers k such that there exists some integer m such that Pi/arctan(1/k) > m > k*Pi.
Numbers k such that A331859(k^2) = A121854(k^2)+1 = A121855(k^2).
In A331859 there is a remark that A331859(100^n) = A011545(n). I'm in doubt of this, because if k = 10^n is here, then A331859(100^n) = ceiling(k*Pi), while A011545(n) = ceiling(k*Pi)-1, this equality would be violated.
Note that for k >= 3 we have 1/k < Pi/arctan(1/k)-k*Pi < (Pi/3)/k. As a result, a necessary condition for k being a term here is that there exists some m such that 0 < m/k - Pi < (Pi/3)/k^2, and a sufficient condition is that there exists some m such that 0 < m/k - Pi < 1/k^2.
Let P(n) = A002485(n), Q(n) = A002486(n), then it is known that 1/(Q(n)*(Q(n)*Q(n+1))) < |P(n)/Q(n) - Pi| < 1/(Q(n)*Q(n+1)) for n >= 2; furthermore, P(n)/Q(n) - Pi is positive for odd n and negative for even n. As a result, let n >= 3, then we have:
- If n is even, then Q(n) can never be a term.
- If n is odd, then k = Q(n)*t is a term if t <= sqrt(Q(n+1)/Q(n)), in which case ceiling(Pi/arctan(1/k)) = P(n)*t+1 and ceiling(k*Pi) = P(n)*t. The converse is not true (e.g., n = 3, t = 4745).

Examples

			Pi/arctan(1/6) = 19.0228..., 6*Pi = 18.8495..., so 6 is a term.
113*t is here for t <= 17, because ceiling(Pi/arctan(1/(113*t))) = 355*t+1 and ceiling((113*t)*Pi) = 355*t.
		

Crossrefs

Cf. A121381 (ceiling(n*Pi)), A121854 (floor(sqrt(n)*Pi)), A121855 (ceiling(sqrt(n)*Pi)), A011545 (floor(10^n*Pi)).

Programs

  • Magma
    // See Schoenfield link.
  • PARI
    default(realprecision, 10000); isA332045(n) = ceil(Pi/atan(1/n))!=ceil(n*Pi)
    

Extensions

a(27)-a(32) from Jon E. Schoenfield, Feb 12 2020
a(33)-a(36) from Giovanni Resta, Feb 12 2020
a(37) from Jon E. Schoenfield, Feb 15 2020

A145004 Values of n at which the number of roots of the function x+n*cos(x) increases.

Original entry on oeis.org

0, 3, 7, 10, 13, 16, 19, 22, 26, 29, 32, 35, 38, 41, 44, 48, 51
Offset: 0

Views

Author

Sébastien Dumortier, Sep 28 2008

Keywords

Examples

			For n=0..2, there is 1 root. For n=3..6, there are 3 roots. For n=7..9, there are 5 roots. etc... So first ranks are 0,3,7,10, ...
		

Crossrefs

A247194 a(n) = ceiling(Pi*n^3).

Original entry on oeis.org

0, 4, 26, 85, 202, 393, 679, 1078, 1609, 2291, 3142, 4182, 5429, 6903, 8621, 10603, 12868, 15435, 18322, 21549, 25133, 29095, 33452, 38224, 43430, 49088, 55217, 61836, 68965, 76621, 84824, 93592, 102944, 112900, 123478, 134696, 146575, 159132, 172386, 186357, 201062, 216522, 232755
Offset: 0

Views

Author

Kaylan Purisima, Nov 24 2014

Keywords

Programs

  • Mathematica
    Ceiling[Pi*Range[0,50]^3] (* Harvey P. Dale, May 22 2016 *)
  • PARI
    vector(100,n,ceil(Pi*(n-1)^3)) \\ Derek Orr, Nov 26 2014

Formula

a(n) = A121381(n^3). - R. J. Mathar, Nov 27 2014
Showing 1-4 of 4 results.