A028733 Nonsquares mod 20.

2, 3, 6, 7, 8, 10, 11, 12, 13, 14, 15, 17, 18, 19

Offset

1,1

Links

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

Mathematica

Complement[Range[0, 19], PowerMod[Range[20], 2, 20]] (* Alonso del Arte, Dec 20 2019 *)

Prog

(Scala) (0 to 19).diff((1 to 20).map(n => (n * n) % 20)) // Alonso del Arte, Dec 20 2019

Crossrefs

Cf. A010382.

Sequence in context: A059590 A276156 A144705 * A028789 A038100 A299407

Adjacent sequences: A028730 A028731 A028732 * A028734 A028735 A028736

Keyword

nonn,fini,full,easy

Author

N. J. A. Sloane

Status

approved