[go: up one dir, main page]

login
A259621
Positive integers k with record-setting smallest values of abs(cos(k) - cos(k*Pi/180)).
0
1, 6, 32, 179, 243, 352, 2705, 3063, 8601, 25560, 144770, 516060, 2605860, 31786380, 66178620, 1024465680, 1090644300, 6477687180, 7568331480
OFFSET
1,2
COMMENTS
Equivalently, positive integers k with record-setting smallest differences between cos(k) in radians and cos(k) in degrees.
EXAMPLE
32 belongs to the sequence because no k < 32 has abs(cos(k) - cos(k*Pi/180)) < abs(cos(32) - cos(32*Pi/180)) = 0.01382...
PROG
(Python)
from math import pi, cos
def record_smallest():
...n = 0
...record = None
...while True:
......n+=1
......v = abs(cos(n)-cos(n*pi/180.0))
......if record is None or v<record:
.........yield n
.........record = v
(PARI) f(n)=abs(cos(n)-cos(n*Pi/180))
print1(1); r=f(1); for(n=2, 1e6, t=f(n); if(t<r, r=t; print1(", "n))) \\ Charles R Greathouse IV, Jul 16 2015
CROSSREFS
Sequence in context: A277742 A000558 A047763 * A026993 A238115 A228959
KEYWORD
nonn,more
AUTHOR
Christian Perfect, Jul 01 2015
EXTENSIONS
a(13)-a(19) from Giovanni Resta, Jul 16 2015
STATUS
approved