A028766 Nonsquares mod 53.

2, 3, 5, 8, 12, 14, 18, 19, 20, 21, 22, 23, 26, 27, 30, 31, 32, 33, 34, 35, 39, 41, 45, 48, 50, 51

Offset

1,1

Links

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

Mathematica

Complement[Range[0, 52], PowerMod[Range[53], 2, 53]] (* Alonso del Arte, May 03 2020 *)

Prog

(Scala) (0 to 52).diff((1 to 53).map(n => n * n % 53)) // Alonso del Arte, May 03 2020

Crossrefs

Cf. A010414.

Sequence in context: A067288 A308075 A211181 * A342494 A022487 A305377

Adjacent sequences: A028763 A028764 A028765 * A028767 A028768 A028769

Keyword

nonn,fini,full,easy

Author

N. J. A. Sloane.

Status

approved