|
|
A282944
|
|
Numbers k such that 3*2^k + 1 is a prime factor of a generalized Fermat number 11^(2^m) + 1 for some m.
|
|
1
|
|
|
6, 30, 36, 66, 276, 353, 2816, 3189, 34350, 48150, 80190, 1832496, 2291610, 5082306, 10829346
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
lst = {}; Do[p = 3*2^n + 1; If[PrimeQ[p] && IntegerQ@Log[2, MultiplicativeOrder[11, p]], AppendTo[lst, n]], {n, 3189}]; lst
|
|
PROG
|
(Magma) SetDefaultRealField(RealField(350)); IsInteger := func<k | k eq Floor(k)>; [n: n in [2..353] | IsPrime(k) and IsInteger(Log(2, Modorder(11, k))) where k is 3*2^n+1];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,hard,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|