login
A028733
Nonsquares mod 20.
1
2, 3, 6, 7, 8, 10, 11, 12, 13, 14, 15, 17, 18, 19
OFFSET
1,1
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
KEYWORD
nonn,fini,full,easy
STATUS
approved