|
%I #25 Jan 12 2024 06:21:41
%S 0,1,2,4,5,7,8,9,10,14,16,18,19,20,25,28,31,32,33,35,36,38,39,40,41,
%T 45,47,49,50,51,56,59
%N Squares mod 62.
%t Union[PowerMod[Range[62], 2, 62]] (* _Alonso del Arte_, Dec 31 2019 *)
%o (Sage) [quadratic_residues(62)] # _Zerinvary Lajos_, May 24 2009
%o (Scala) (1 to 62).map(n => n * n % 62).toSet.toSeq.sorted // _Alonso del Arte_, Dec 31 2019
%Y Cf. A010392, A028775, A096008 (row 62).
%K nonn,fini,full,easy
%O 1,3
%A _N. J. A. Sloane_
|
