A028740 Nonsquares mod 27.

2, 3, 5, 6, 8, 11, 12, 14, 15, 17, 18, 20, 21, 23, 24, 26

Offset

1,1

Links

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

Mathematica

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

Prog

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

Crossrefs

Cf. A010389.

Sequence in context: A028806 A351807 A028731 * A028794 A028966 A028767

Adjacent sequences: A028737 A028738 A028739 * A028741 A028742 A028743

Keyword

nonn,fini,full

Author

N. J. A. Sloane

Status

approved