|
%I #18 Dec 22 2019 16:20:52
%S 0,1,3,4,9,12,15,16,22,25,27,31,33,34,36,37,42,45,48,49,55,58,60,64
%N Squares mod 66.
%t Union[PowerMod[Range[66], 2, 66]] (* _Alonso del Arte_, Dec 22 2019 *)
%o (Sage) [quadratic_residues(66)] # _Zerinvary Lajos_, May 24 2009
%o (Scala) (1 to 66).map(n => (n * n) % 66).toSet.toSeq.sorted // _Alonso del Arte_, Dec 22 2019
%Y Row 66 of A096008.
%Y Cf. A028779.
%K nonn,fini,full,easy
%O 1,3
%A _N. J. A. Sloane_
|
