%I #14 May 22 2015 11:23:45
%S 0,17,34,52,69,87,104,121,139,156,173,190,207,224,241,258,275,292,309,
%T 325,342,358,374,390,406,422,438,453,469,484,500,515,529,544,559,573,
%U 587,601,615,629,642,656,669,681,694,707,719,731,743,754,766,777,788,798,809,819,829,838,848,857,866
%N Integer part of sine of n degrees multiplied by 1000.
%C Due to multiplication by 1000 almost all a(n) are different for n<90, the only exception is a(89)=a(88)=999.
%F a(n) = round(1000*sin(pi*n/180)), where round() is the rounding towards zero function.
%F a(360+n) = a(n).
%F a(180+n) = -a(n).
%e sin(pi/2) = sin(90 deg.) = 1, so a(90)=1000.
%t Table[IntegerPart[1000*Sin[n Degree]],{n,0,60}] (* _Harvey P. Dale_, May 22 2015 *)
%o (Python)
%o import math
%o for n in range(381): print str(int(math.trunc(1000*math.sin(math.pi*n/180))))+',',
%Y Cf. A000493, A000494, A000484, A000480, A249989.
%K nonn
%O 0,2
%A _Alex Ratushnyak_, Nov 11 2014
%E Corrected and extended by _Harvey P. Dale_, May 22 2015
|