login
Positive integers n such that 13^n == 8 (mod n).
12

%I #8 Apr 10 2020 22:49:34

%S 1,5,371285,3957661,70348567451,42831939409247

%N Positive integers n such that 13^n == 8 (mod n).

%C No other terms below 10^15.

%t Join[{1, 5}, Select[Range[4000000], PowerMod[13, #, #] == 8 &]] (* _Robert Price_, Apr 10 2020 *)

%Y Cf. A116609, A127821, A015922, A277630.

%Y Sequences 13^n == k (mod n): A116621 (k=1), A116622 (k=2), A116629 (k=3), A116630 (k=4), A116611 (k=5), A116631 (k=6), A116632 (k=7), this sequence (k=8), A116636 (k=9), A116620 (k=10), A116638 (k=11), A116639 (k=15).

%K nonn,hard,more

%O 1,2

%A _Max Alekseyev_, Nov 23 2017