login
Nonsquares mod 16.
0

%I #12 Aug 28 2016 02:53:39

%S 2,3,5,6,7,8,10,11,12,13,14,15

%N Nonsquares mod 16.

%C The elements of A028809 smaller than 16, because 96 is a multiple of 16. - _R. J. Mathar_, Oct 23 2008

%t Complement[Range[15],Union[PowerMod[Range[15],2,16]]] (* _Harvey P. Dale_, Apr 30 2011 *)

%o (PARI) select(n->!issquare(Mod(n,16)), [2..15]) \\ _Charles R Greathouse IV_, Aug 28 2016

%K nonn,fini,full

%O 1,1

%A _N. J. A. Sloane_.