%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_.