OFFSET
1,1
COMMENTS
a(31) > 2*10^5. - Robert Price, Nov 23 2013
EXAMPLE
For k = 4, 3^4 - 34 = 47 and 47 is prime. Hence k = 4 is included in the sequence.
MATHEMATICA
Do[If[PrimeQ[3^n - 34], Print[n]], {n, 1, 10000}]
Select[Range[10000], PrimeQ[3^# - 34] &] (* Alonso del Arte, Nov 10 2012 *)
PROG
(PARI) is(n)=isprime(3^n-34) \\ Charles R Greathouse IV, Feb 17 2017
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Nicolas M. Perrault, Nov 10 2012
EXTENSIONS
a(21)-a(30) from Robert Price, Nov 23 2013
STATUS
approved