A028796 Nonsquares mod 83.

2, 5, 6, 8, 13, 14, 15, 18, 19, 20, 22, 24, 32, 34, 35, 39, 42, 43, 45, 46, 47, 50, 52, 53, 54, 55, 56, 57, 58, 60, 62, 66, 67, 71, 72, 73, 74, 76, 79, 80, 82

Offset: 1

Author

N. J. A. Sloane

Keywords

• nonn
• fini
• full
• easy

Crossrefs

Cf. A010444 (complement), A096013 (row 83).

Programs

Magma

[n: n in [0..82] | not IsSquare(R! n) where R := ResidueClassRing(83)]; // Vincenzo Librandi, Jan 24 2020

Mathematica

Complement[Range[0, 82], PowerMod[Range[83], 2, 83]] (* Alonso del Arte, Jan 23 2020 *)

Scala

(0 to 82).diff((1 to 83).map(n => n * n % 83)) // Alonso del Arte, Jan 23 2020