A332483 Numbers k such that sin(k) < 0 and cos(k) < 0.

4, 10, 16, 17, 22, 23, 29, 35, 36, 41, 42, 48, 54, 60, 61, 66, 67, 73, 79, 80, 85, 86, 92, 98, 104, 105, 110, 111, 117, 123, 124, 129, 130, 136, 142, 148, 149, 154, 155, 161, 167, 168, 173, 174, 180, 186, 192, 193, 198, 199, 205, 211, 212, 217, 218, 224, 230

Offset

1,1

Comments

The sequences A332480-A332483 partition the positive integers.

Links

Table of n, a(n) for n=1..57.

Mathematica

Select[Range[300], Sin[#] > 0 && Cos[#] > 0 &] (* A332480 *)
Select[Range[300], Sin[#] > 0 && Cos[#] < 0 &] (* A332481 *)
Select[Range[300], Sin[#] < 0 && Cos[#] > 0 &] (* A332482 *)
Select[Range[300], Sin[#] < 0 && Cos[#] < 0 &] (* A332483 *)

Crossrefs

Cf. A070751, A246444, A332480, A332482, A332483.

Subsequence of A327422.

Sequence in context: A055103 A285629 A030332 * A310473 A310474 A310475

Adjacent sequences: A332480 A332481 A332482 * A332484 A332485 A332486

Keyword

nonn,easy

Author

Clark Kimberling, Apr 14 2020

Status

approved