A010421 Squares mod 60.
0, 1, 4, 9, 16, 21, 24, 25, 36, 40, 45, 49
Offset: 1
Crossrefs
Programs
-
Magma
[n: n in [0..59] | IsSquare(R! n) where R:= ResidueClassRing(60)]; // Vincenzo Librandi, Jan 05 2020
-
Mathematica
Union[PowerMod[Range[60], 2, 60]] (* Alonso del Arte, Jan 03 2020 *)
-
Sage
[quadratic_residues(60)] # Zerinvary Lajos, May 24 2009
-
Scala
(1 to 60).map(n => n * n % 60).toSet.toSeq.sorted // Alonso del Arte, Jan 03 2020
Comments