A277401 Positive integers n such that 7^n == 2 (mod n).
1, 5, 143, 1133, 2171, 8567, 16805, 208091, 1887043, 517295383, 878436591673
Offset: 1
Examples
7 == 2 mod 1, so 1 is a term; 16807 == 2 mod 5, so 5 is a term.
Crossrefs
Programs
-
Mathematica
Join[{1},Select[Range[5173*10^5],PowerMod[7,#,#]==2&]] (* The program will generate the first 10 terms of the sequence; it would take a very long time to generate the 11th term. *) (* Harvey P. Dale, Apr 15 2020 *)
-
PARI
isok(n) = Mod(7, n)^n == 2; \\ Michel Marcus, Oct 13 2016
Formula
A066438(a(n)) = 2 for n > 1.
Extensions
a(10) from Michel Marcus, Oct 13 2016
a(11) from Max Alekseyev, Oct 18 2016
Comments