Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #21 Mar 16 2021 01:25:28
%S 1,6,32,179,243,352,2705,3063,8601,25560,144770,516060,2605860,
%T 31786380,66178620,1024465680,1090644300,6477687180,7568331480
%N Positive integers k with record-setting smallest values of abs(cos(k) - cos(k*Pi/180)).
%C Equivalently, positive integers k with record-setting smallest differences between cos(k) in radians and cos(k) in degrees.
%e 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...
%o (Python)
%o from math import pi,cos
%o def record_smallest():
%o ...n = 0
%o ...record = None
%o ...while True:
%o ......n+=1
%o ......v = abs(cos(n)-cos(n*pi/180.0))
%o ......if record is None or v<record:
%o .........yield n
%o .........record = v
%o (PARI) f(n)=abs(cos(n)-cos(n*Pi/180))
%o 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
%K nonn,more
%O 1,2
%A _Christian Perfect_, Jul 01 2015
%E a(13)-a(19) from _Giovanni Resta_, Jul 16 2015