A010392 Squares mod 31.
0, 1, 2, 4, 5, 7, 8, 9, 10, 14, 16, 18, 19, 20, 25, 28
Offset: 1
Programs
-
Mathematica
Union[PowerMod[Range[31], 2, 31]] (* Alonso del Arte, Dec 31 2019 *)
-
Sage
[quadratic_residues(31)] # Zerinvary Lajos, May 24 2009
-
Scala
(1 to 31).map(n => n * n % 31).toSet.toSeq.sorted // Alonso del Arte, Dec 31 2019