[go: up one dir, main page]

login
A246442
Nonnegative integers k satisfying cos(k)*sin(k+1) < 0.
4
2, 5, 8, 11, 24, 27, 30, 33, 46, 49, 52, 55, 68, 71, 74, 77, 90, 93, 96, 99, 112, 115, 118, 121, 134, 137, 140, 143, 156, 159, 162, 165, 178, 181, 184, 187, 200, 203, 206, 209, 222, 225, 228, 231, 244, 247, 250, 253, 266, 269, 272, 275, 288, 291, 294, 297
OFFSET
1,1
LINKS
MATHEMATICA
z = 420;
Select[Range[0, z], Cos[#] Sin[# + 1] < 0 &] (* A246442 *)
Select[Range[0, z], Cos[#] Sin[# + 1] > 0 &] (* A246443 *)
CROSSREFS
Cf. A246443 (complement of A246442), A246450.
Sequence in context: A261578 A264613 A285293 * A056661 A229883 A135050
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Aug 26 2014
STATUS
approved