|
%I #12 Dec 31 2019 06:47:24
%S 2,3,5,6,8,11,12,13,14,15,17,20,21,22,23,24,26,27,29,30,32,34,35,37,
%T 38,41,42,43,44,46,47,48,50,52,53,54,55,56,57,58,59,60,61,62,65,68,71,
%U 73,74,75,77,79,80,83,84,85,86,88,89,91,92
%N Nonsquares mod 93.
%t Complement[Range[0, 92], PowerMod[Range[93], 2, 93]] (* _Alonso del Arte_, Dec 31 2019 *)
%o (Scala) (0 to 92).diff((1 to 93).map(n => n * n % 93)) // _Alonso del Arte_, Dec 31 2019
%Y Cf. A010454.
%K nonn,fini,full,easy
%O 1,1
%A _N. J. A. Sloane_
|
