|
%I #19 Nov 29 2019 01:35:54
%S 0,1,4,5,6,7,9,13,16,20,22,23,24,25,28,29,30,33,34,35,36,38,42,45,49,
%T 51,52,53,54,57
%N Squares mod 58.
%t Union[PowerMod[Range[58], 2, 58]] (* _Alonso del Arte_, Nov 29 2019 *)
%o (Sage) [quadratic_residues(58)] # _Zerinvary Lajos_, May 24 2009
%o (Scala) (1 to 58).map(n => n * n).map(_ % 58).toSet.toSeq.sorted // _Alonso del Arte_, Nov 29 2019
%Y Row 58 of A096008.
%Y Cf. A010391, A028771.
%K nonn,fini,full
%O 1,3
%A _N. J. A. Sloane_
|
