A191066 Primes p that have Kronecker symbol (p|30) = -1.

7, 19, 41, 53, 61, 71, 73, 83, 89, 97, 103, 107, 109, 127, 139, 173, 181, 191, 193, 197, 211, 223, 227, 229, 239, 281, 293, 311, 313, 317, 331, 337, 347, 349, 359, 367, 379, 401, 421, 431, 433, 443, 449, 457, 463, 467, 479, 487, 499, 521, 541, 557, 563, 569

Offset

1,1

Comments

Originally erroneously named "Primes that are not squares mod 30". - M. F. Hasler, Jan 18 2016

References

Hirschhorn, Michael D. "On the 2-and 4-dissections of the Rogers-Ramanujan functions." The Ramanujan Journal 40.2 (2016): 227-235.

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Mathematica

Select[Prime[Range[200]], JacobiSymbol[#, 30]==-1&]

Prog

(Magma) [p: p in PrimesUpTo(569) | KroneckerSymbol(p, 30) eq -1]; // Bruno Berselli, Sep 11 2012

Crossrefs

Sequence in context: A239359 A120720 A098422 * A087762 A195349 A160422

Adjacent sequences: A191063 A191064 A191065 * A191067 A191068 A191069

Keyword

nonn,easy

Author

T. D. Noe, May 25 2011

Extensions

Definition corrected, following a suggestion from David Broadhurst, by M. F. Hasler, Jan 18 2016

Status

approved