A028744 Nonsquares mod 31.
3, 6, 11, 12, 13, 15, 17, 21, 22, 23, 24, 26, 27, 29, 30
Offset: 1
Crossrefs
Cf. A010392.
Programs
-
Mathematica
Complement[Range[0, 30], PowerMod[Range[31], 2, 31]] (* Alonso del Arte, Dec 31 2019 *)
-
Scala
(0 to 30).diff((1 to 31).map(n => n * n % 31)) // Alonso del Arte, Dec 31 2019