A028741 Nonsquares mod 28.

2, 3, 5, 6, 7, 10, 11, 12, 13, 14, 15, 17, 18, 19, 20, 22, 23, 24, 26, 27

Offset

1,1

Links

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

Mathematica

Complement[Range[0, 27], PowerMod[Range[28], 2, 28]] (* Alonso del Arte, Nov 28 2019 *)

Prog

(Scala) val squaresMod28 = (1 to 28).map(n => n * n).map(_ % 28)
(0 to 27).diff(squaresMod28) // Alonso del Arte, Nov 28 2019

Crossrefs

Cf. A010390.

Sequence in context: A361393 A179983 A065872 * A119316 A348964 A349026

Adjacent sequences: A028738 A028739 A028740 * A028742 A028743 A028744

Keyword

nonn,fini,full

Author

N. J. A. Sloane

Status

approved