A014741 Numbers k such that k divides 2^(k+1) - 2.
1, 2, 6, 18, 42, 54, 126, 162, 294, 342, 378, 486, 882, 1026, 1134, 1314, 1458, 1806, 2058, 2394, 2646, 3078, 3402, 3942, 4374, 5334, 5418, 6174, 6498, 7182, 7938, 9198, 9234, 10206, 11826, 12642, 13122, 14154, 14406, 16002, 16254
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Join[{1,2},Select[Range[17000],PowerMod[2,#+1,#]==2&]] (* Harvey P. Dale, Feb 11 2015 *)
-
PARI
is(n)=Mod(2,n)^(n+1)==2 \\ Charles R Greathouse IV, Nov 03 2016
Formula
For n > 1, a(n) = 2*A014945(n-1). - Max Alekseyev, Nov 14 2012
Comments