OFFSET
1,1
COMMENTS
Twin of A185167.
EXAMPLE
(2^1279-1)*6^1047-1 is prime.
MATHEMATICA
Union[Flatten[Table[Select[p*6^Range[0, 30] - 1, # < 10^20 && PrimeQ[#] &], {p, {3, 7, 31, 127, 8191, 131071, 524287, 2147483647, 2305843009213693951}}]]]
PROG
(Magma)
[n: n in [0..3000] | IsPrime((2^1279-1)*6^n-1)];
CROSSREFS
KEYWORD
nonn
AUTHOR
Gilbert Mozzo, Feb 25 2011
STATUS
approved