A245594 Numbers k that divide 2^k + 10.
1, 2, 3, 9, 14, 161, 261, 5727, 12127, 16394, 20029238, 577738261, 2637324098, 45019843643, 54756012358, 142046769201, 2144325306742, 2247950127743, 34462584090334, 223385072880447
Offset: 1
Examples
3 divides 2^3 + 10 = 18. Thus 3 is a term of this sequence.
Links
- OEIS Wiki, 2^n mod n
Programs
-
Mathematica
Select[Range[10^5], Divisible[2^# + 10, #] &] (* Robert Price, Oct 12 2018 *)
-
PARI
for(n=1,10^9,if(Mod(2,n)^n==Mod(-10,n),print1(n,", ")))
Extensions
a(13)-a(20) from Max Alekseyev, Oct 01 2016
Comments