OFFSET
1,1
COMMENTS
All terms are prime.
The corresponding primes: 17, 223, 56989774711, ...
MATHEMATICA
Select[Range[1, 10000], PrimeQ[(11^# - 6^#)/5] &]
PROG
(PARI) for(n=1, 10000, if(isprime((11^n - 6^n)/5), print1(n, ", ")))
CROSSREFS
KEYWORD
nonn,more,hard
AUTHOR
Tim Johannes Ohrtmann, May 26 2016
EXTENSIONS
a(9) from Michael S. Branicky, Nov 10 2024
STATUS
approved