A010419 -id:A010419 - cp's OEIS frontend

0, 1, 4, 5, 6, 7, 9, 13, 16, 20, 22, 23, 24, 25, 28

Offset: 1

A070451 sorted, duplicates removed. - R. J. Mathar, Jan 12 2024

Union[PowerMod[Range[29], 2, 29]] (* Alonso del Arte, Nov 29 2019 *)

[quadratic_residues(29)] # Zerinvary Lajos, May 24 2009

(1 to 29).map(n => n * n).map( % 29).toSet.toSeq.sorted // _Alonso del Arte, Nov 29 2019

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

Cf. A010419, A028742 (subsequence).

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

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

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

cp's OEIS Frontend