|
%I #17 Dec 23 2019 06:07:13
%S 0,1,4,8,9,12,13,16,24,25,29,32,36,41,48,49,52,64,69,72,73,77,81,85
%N Squares mod 92.
%t Union[PowerMod[Range[92], 2, 92]] (* _Alonso del Arte_, Dec 23 2019 *)
%o (Sage) [quadratic_residues(92)] # _Zerinvary Lajos_, May 28 2009
%o (Scala) (1 to 92).map(n => (n * n) % 92).toSet.toSeq.sorted // _Alonso del Arte_, Dec 23 2019
%Y Cf. A028805.
%K nonn,fini,full,easy
%O 1,3
%A _N. J. A. Sloane_
|
