A056022 Numbers k such that k^6 == 1 (mod 7^2).

1, 18, 19, 30, 31, 48, 50, 67, 68, 79, 80, 97, 99, 116, 117, 128, 129, 146, 148, 165, 166, 177, 178, 195, 197, 214, 215, 226, 227, 244, 246, 263, 264, 275, 276, 293, 295, 312, 313, 324, 325, 342, 344, 361, 362, 373, 374, 391, 393, 410, 411, 422, 423, 440, 442

Offset

1,2

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Mathematica

Select[ Range[ 500 ], PowerMod[ #, 6, 49 ]==1& ]

Prog

(PARI) isok(k) = Mod(k, 49)^6 == 1; \\ Michel Marcus, Jun 30 2021

Crossrefs

Cf. A056021, A056024, A056025, A056026, A056027, A056028, A056031, A056034, A056035.

Sequence in context: A031956 A095393 A301601 * A118510 A022108 A041654

Adjacent sequences: A056019 A056020 A056021 * A056023 A056024 A056025

Keyword

nonn,easy

Author

Robert G. Wilson v, Jun 08 2000

Status

approved