login
A332481
Numbers k such that sin(k) > 0 and cos(k) < 0.
4
2, 3, 8, 9, 15, 21, 27, 28, 33, 34, 40, 46, 47, 52, 53, 59, 65, 71, 72, 77, 78, 84, 90, 91, 96, 97, 103, 109, 115, 116, 121, 122, 128, 134, 135, 140, 141, 147, 153, 159, 160, 165, 166, 172, 178, 179, 184, 185, 191, 197, 203, 204, 209, 210, 216, 222, 223, 228
OFFSET
1,1
COMMENTS
The sequences A332480-A332483 partition the positive integers.
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. A070752, A246444, A332480, A332482, A332483. Subsequence of A327423.
Sequence in context: A101471 A137471 A051209 * A331821 A093765 A260020
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Apr 14 2020
STATUS
approved