A070753 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A070753

Primes p such that sin(p) < 0.

4

5, 11, 17, 23, 29, 31, 37, 41, 43, 61, 67, 73, 79, 113, 131, 137, 149, 157, 163, 167, 173, 181, 193, 199, 211, 251, 257, 263, 269, 281, 293, 307, 313, 331, 337, 349, 383, 389, 401, 419, 431, 433, 439, 443, 457, 463, 487, 521

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

A070748(A049084(a(n))) = A070747(a(n)) = -1.

LINKS

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

MATHEMATICA

Select[Prime[Range[200]], Sin[#]<0&] (* Harvey P. Dale, May 07 2012 *)

PROG

(PARI) select(p->p/Pi%2\1, primes(100)) \\ Charles R Greathouse IV, Jun 13 2013

CROSSREFS

Cf. A070754, A070748, A002145 (sin((Pi/2)*p) < 0 instead of sin(p) < 0), A070751.

Sequence in context: A277571 A000966 A031480 * A038939 A314243 A357253

Adjacent sequences: A070750 A070751 A070752 * A070754 A070755 A070756

KEYWORD

nonn

AUTHOR

Reinhard Zumkeller, May 04 2002

STATUS

approved