A028782 Nonsquares mod 69.

2, 5, 7, 8, 10, 11, 14, 15, 17, 19, 20, 21, 22, 23, 26, 28, 29, 30, 32, 33, 34, 35, 37, 38, 40, 41, 42, 43, 44, 45, 47, 50, 51, 53, 56, 57, 59, 60, 61, 62, 63, 65, 66, 67, 68

Offset

1,1

Links

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

Mathematica

Complement[Range[0, 68], PowerMod[Range[69], 2, 69]] (* Alonso del Arte, Dec 23 2019 *)

Prog

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

Crossrefs

Cf. A010430.

Sequence in context: A285352 A233745 A283778 * A025505 A285413 A184793

Adjacent sequences: A028779 A028780 A028781 * A028783 A028784 A028785

Keyword

nonn,fini,full,easy

Author

N. J. A. Sloane

Status

approved