A246442 Nonnegative integers k satisfying cos(k)*sin(k+1) < 0.

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

Clark Kimberling, Table of n, a(n) for n = 1..1000

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

Adjacent sequences: A246439 A246440 A246441 * A246443 A246444 A246445

Keyword

nonn,easy

Author

Clark Kimberling, Aug 26 2014

Status

approved