|
%I #10 Dec 31 2019 06:47:10
%S 3,6,11,12,13,15,17,21,22,23,24,26,27,29,30
%N Nonsquares mod 31.
%t Complement[Range[0, 30], PowerMod[Range[31], 2, 31]] (* _Alonso del Arte_, Dec 31 2019 *)
%o (Scala) (0 to 30).diff((1 to 31).map(n => n * n % 31)) // _Alonso del Arte_, Dec 31 2019
%Y Cf. A010392.
%K nonn,fini,full,easy
%O 1,1
%A _N. J. A. Sloane_
|
