A141332 a(n) = number of positive integers k, k < n, where |the sine of k radians| is < |the sine of n radians|. Also, a(n) = number of positive integers k, k < n, where |the cosine of k radians| is > |the cosine of n radians|.

0, 1, 0, 1, 4, 1, 2, 7, 2, 3, 10, 3, 3, 12, 6, 2, 13, 9, 1, 14, 12, 0, 15, 16, 1, 14, 21, 4, 13, 26, 7, 12, 31, 10, 10, 33, 15, 7, 32, 20, 4, 31, 25, 1, 30, 31, 2, 27, 38, 7, 24, 45, 12, 21, 52, 17, 17, 54, 24, 12, 51, 31, 7, 48, 38, 2, 45, 46, 3, 40, 55, 10, 35, 64, 17, 30, 73, 24

Offset

1,5

Links

Diana Mecum, Table of n, a(n) for n = 1..1000

Mathematica

Total/@Table[If[Abs[Sin[n]]<Abs[Sin[k]], 1, 0], {k, 80}, {n, k-1}] (* Harvey P. Dale, May 10 2018 *)

Crossrefs

Cf. A141330, A141331, A141333, A141334, A141335.

Sequence in context: A076064 A293570 A016685 * A241184 A241185 A243584

Adjacent sequences: A141329 A141330 A141331 * A141333 A141334 A141335

Keyword

nonn

Author

Leroy Quet, Jun 25 2008

Extensions

More terms from Diana L. Mecum, Jul 18 2008

Status

approved