OFFSET
1,1
COMMENTS
All terms are prime.
The corresponding primes: 19, 5796673, 92240578673, 167731742895202841, 113345629904382710526197539019199125641, ...
a(9) > 50000. - Michael S. Branicky, Nov 11 2024
MATHEMATICA
Select[Range[1, 10000], PrimeQ[(11^# - 8^#)/3] &]
PROG
(PARI) for(n=1, 10000, if(isprime((11^n - 8^n)/3), print1(n, ", ")))
CROSSREFS
KEYWORD
nonn,more,hard,changed
AUTHOR
Tim Johannes Ohrtmann, May 26 2016
STATUS
approved