A010379 Squares mod 17.
0, 1, 2, 4, 8, 9, 13, 15, 16
Offset: 1
Programs
-
Mathematica
Union[PowerMod[Range[17], 2, 17]] (* Alonso del Arte, Dec 17 2019 *)
-
Sage
[quadratic_residues(17)] # Zerinvary Lajos, May 24 2009
-
Scala
(1 to 17).map(n => (n * n) % 17).toSet.toSeq.sorted // Alonso del Arte, Dec 17 2019