A028797 Nonsquares mod 84.

2, 3, 5, 6, 7, 8, 10, 11, 12, 13, 14, 15, 17, 18, 19, 20, 22, 23, 24, 26, 27, 29, 30, 31, 32, 33, 34, 35, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 50, 51, 52, 53, 54, 55, 56, 58, 59, 61, 62, 63, 65, 66, 67, 68, 69, 70, 71, 73, 74, 75, 76, 77, 78, 79, 80, 82, 83

Offset

1,1

Links

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

Mathematica

Complement[Range[0, 83], PowerMod[Range[84], 2, 84]] (* Alonso del Arte, Dec 21 2019 *)

Prog

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

Crossrefs

Cf. A010445.

Sequence in context: A028812 A039251 A283296 * A028773 A028813 A158276

Adjacent sequences: A028794 A028795 A028796 * A028798 A028799 A028800

Keyword

nonn,fini,full,easy

Author

N. J. A. Sloane

Status

approved