A122907 Numbers n such that in Z/nZ the number of squares is greater than or equal to the number of invertible elements.

1, 2, 3, 4, 6, 10, 12, 14, 18, 22, 26, 30, 34, 38, 42, 46, 50, 54, 58, 62, 66, 70, 74, 78, 82, 86, 90, 94, 98, 102, 106, 114, 118, 122, 134, 138, 142, 146, 150, 158, 162, 166, 174, 178, 186, 194, 202, 206, 210, 214, 218, 222, 226, 242, 246, 250, 254, 258, 262, 274

Offset

1,2

Links

Ivan Neretin, Table of n, a(n) for n = 1..10000

Formula

n such that A000224(n) >= A000010(n). Union of A122903 and A122905. Complement of A122904 in positive integers.

Mathematica

Select[Range@275, Length@Union@Mod[Range[#]^2, #] >= EulerPhi[#] &] (* Ivan Neretin, Dec 14 2016 *)

Crossrefs

Cf. A122903, A122904, A122905, A122906.

Sequence in context: A225651 A191149 A344552 * A070519 A177913 A098392

Adjacent sequences: A122904 A122905 A122906 * A122908 A122909 A122910

Keyword

nonn

Author

Max Alekseyev, Sep 18 2006

Status

approved