login
A297348
Numbers k such that 12*13^k - 1 is prime.
1
0, 2, 7, 11, 36, 164, 216, 302, 311, 455, 738, 1107, 2244, 3326, 4878, 8067, 46466
OFFSET
1,2
COMMENTS
Williams primes to base 12.
LINKS
MATHEMATICA
Select[Range[0, 10000], PrimeQ[12*13^n-1] &]
PROG
(PARI) for(n=0, 10000, if(isprime(12*13^n-1), print1(n, ", ")))
(Magma) [n: n in [0..10000] |IsPrime(12*13^n-1)];
KEYWORD
nonn,more,hard
AUTHOR
EXTENSIONS
a(16) from Michael S. Branicky, Sep 14 2022
a(17) from Michael S. Branicky, Nov 12 2024
STATUS
approved