A028729 Nonsquares mod 16.

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

Offset

1,1

Comments

The elements of A028809 smaller than 16, because 96 is a multiple of 16. - R. J. Mathar, Oct 23 2008

Links

Table of n, a(n) for n=1..12.

Mathematica

Complement[Range[15], Union[PowerMod[Range[15], 2, 16]]]  (* Harvey P. Dale, Apr 30 2011 *)

Prog

(PARI) select(n->!issquare(Mod(n, 16)), [2..15]) \\ Charles R Greathouse IV, Aug 28 2016

Crossrefs

Sequence in context: A039122 A355547 A031975 * A213367 A175084 A171519

Adjacent sequences: A028726 A028727 A028728 * A028730 A028731 A028732

Keyword

nonn,fini,full

Author

N. J. A. Sloane.

Status

approved