A246451 Nonnegative integers k satisfying sin(k)*cos(k+1) > 0.

13, 16, 19, 22, 35, 38, 41, 44, 57, 60, 63, 66, 79, 82, 85, 88, 101, 104, 107, 110, 123, 126, 129, 132, 145, 148, 151, 154, 167, 170, 173, 176, 189, 192, 195, 198, 211, 214, 217, 220, 233, 236, 239, 242, 255, 258, 261, 264, 277, 280, 283, 286, 299, 302, 305

Offset

1,1

Links

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

Mathematica

z = 200;
Select[Range[0, z], Sin[#] Cos[# + 1] < 0 &]  (* A246450 *)
Select[Range[0, z], Sin[#] Cos[# + 1] > 0 &]  (* A246451 *)

Crossrefs

Cf. A246450 (complement of A246451), A246443.

Sequence in context: A295744 A348787 A064805 * A295327 A179202 A159975

Adjacent sequences: A246448 A246449 A246450 * A246452 A246453 A246454

Keyword

nonn,easy

Author

Clark Kimberling, Aug 26 2014

Status

approved