A028771 Nonsquares mod 58.

2, 3, 8, 10, 11, 12, 14, 15, 17, 18, 19, 21, 26, 27, 31, 32, 37, 39, 40, 41, 43, 44, 46, 47, 48, 50, 55, 56

Offset: 1

Author

N. J. A. Sloane

Keywords

• nonn
• fini
• full

Crossrefs

Cf. A010419, A028742 (subsequence).

Programs

Mathematica

Complement[Range[0, 57], PowerMod[Range[58], 2, 58]] (* Alonso del Arte, Nov 29 2019 *)

Scala

val squaresMod58 = (1 to 58).map(n => n * n).map(_ % 58)
(0 to 57).diff(squaresMod58) // Alonso del Arte, Nov 29 2019

Extensions

Incorrect term 29 removed by Alonso del Arte, Nov 29 2019