A038925 Primes p such that 46 is a square mod p.

2, 3, 5, 7, 23, 37, 41, 53, 59, 61, 73, 79, 103, 109, 131, 139, 149, 157, 163, 179, 181, 191, 193, 199, 211, 229, 233, 257, 263, 293, 307, 331, 347, 353, 359, 367, 373, 383, 389, 409, 421, 431, 443, 449, 479, 491

Offset

1,1

Links

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

Mathematica

Select[Prime[Range[100]], ! JacobiSymbol[46, #] == -1 &] (* Vincenzo Librandi, Sep 08 2012 *)

Crossrefs

Sequence in context: A309248 A267014 A113611 * A154761 A262098 A074491

Adjacent sequences: A038922 A038923 A038924 * A038926 A038927 A038928

Keyword

nonn

Author

N. J. A. Sloane.

Status

approved