A028802 Nonsquares mod 89.

3, 6, 7, 12, 13, 14, 15, 19, 23, 24, 26, 27, 28, 29, 30, 31, 33, 35, 37, 38, 41, 43, 46, 48, 51, 52, 54, 56, 58, 59, 60, 61, 62, 63, 65, 66, 70, 74, 75, 76, 77, 82, 83, 86

Offset

1,1

Links

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

Mathematica

Select[Range[88], JacobiSymbol[#, 89] == -1 &] (* Harvey P. Dale, Mar 01 2015 *)

Prog

(Scala) (0 to 88).diff((1 to 89).map(n => n * n % 89)) // Alonso del Arte, Jan 24 2020

Crossrefs

Cf. A010450 (complement), A096013 (row 89).

Sequence in context: A333790 A333001 A092150 * A141742 A004755 A004760

Adjacent sequences: A028799 A028800 A028801 * A028803 A028804 A028805

Keyword

nonn,fini,full,easy

Author

N. J. A. Sloane

Status

approved