OFFSET
1,2
COMMENTS
a(18) > 10^5.
EXAMPLE
4 is a member since 4^4 - 3^3 = 256 - 27 = 229 which is a prime number.
MATHEMATICA
Select[Range[0, 100000], PrimeQ[4^# - 3^(# - 1)] &]
PROG
(PARI) lista(nn) = for(n=1, nn, if(ispseudoprime(4^n-3^(n-1)), print1(n, ", "))); \\ Altug Alkan, Apr 16 2016
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Robert Price, Apr 16 2016
STATUS
approved