|
%I #23 Dec 23 2019 00:44:25
%S 5,7,10,11,14,15,17,19,20,21,22,28,30,33,34,37,38,40,42,43,44,45
%N Nonsquares mod 46.
%e Since 11 is not a perfect square and there are no solutions to x^2 = 11 mod 46, 11 is in the sequence.
%e Although 12 is not a perfect square either, there are solutions to x^2 = 12 mod 46, such as x = 14, x = 32. Thus 12 is not in the sequence.
%t Complement[Range[45], PowerMod[Range[46], 2, 46]] (* _Alonso del Arte_, Nov 23 2019 *)
%o (Scala) val squaresMod46 = (1 to 46).map(n => n * n).map(_ % 46)
%o (0 to 45).diff(squaresMod46) // _Alonso del Arte_, Nov 23 2019
%Y Cf. A028736 (subset), A010407.
%K nonn,fini,full,easy
%O 1,1
%A _N. J. A. Sloane_
%E Incorrect term 23 removed by _Alonso del Arte_, Dec 01 2019
|
