|
%I #9 Dec 25 2019 15:31:12
%S 2,3,5,7,8,10,12,13,15,17,18,20,22,23,27,28,30,32,33,35,37,38,40,42,
%T 43,45,47,48
%N Nonsquares mod 50.
%t Complement[Range[0, 49], PowerMod[Range[50], 2, 50]] (* _Alonso del Arte_, Dec 25 2019 *)
%o (Scala) (0 to 49).diff((1 to 50).map(n => (n * n) % 50)) // _Alonso del Arte_, Dec 25 2019
%Y Cf. A010411.
%K nonn,fini,full,easy
%O 1,1
%A _N. J. A. Sloane_
|
