%I #16 Mar 21 2023 04:55:49
%S 2,3,5,6,7,8,10,11,13,14,15,17,18,19,20,21,22,23
%N Nonsquares mod 24.
%C The first 18 terms of A092206. - _R. J. Mathar_, Mar 21 2023
%t Complement[Range[0, 23], PowerMod[Range[0, 23], 2, 24]] (* _Alonso del Arte_, Nov 24 2019 *)
%o (Scala) val squaresMod24 = (0 to 23).map(n => n * n).map(_ % 24)
%o (0 to 23).diff(squaresMod24) // _Alonso del Arte_, Nov 24 2019
%Y Cf. A010386.
%K nonn,fini,full,easy
%O 1,1
%A _N. J. A. Sloane_
|