OFFSET
1,1
COMMENTS
All terms are primes.
No other terms < 100000.
MATHEMATICA
k=14; Select[ Prime[ Range[1, 200] ], PrimeQ[ ((k+3)^# - 3^#)/k ]& ]
PROG
(PARI) is(n)=isprime((17^n-3^n)/14) \\ Charles R Greathouse IV, Feb 17 2017
CROSSREFS
KEYWORD
hard,more,nonn
AUTHOR
Alexander Adamchuk, Feb 11 2007
EXTENSIONS
a(5)=23029 from Robert Price, Nov 03 2011
STATUS
approved