A219039 Numbers k such that 3^k - 16 is prime.
3, 5, 11, 15, 51, 69, 99, 227, 381, 537, 9135, 9737, 58437, 105567, 121779, 123645
Offset: 1
Examples
For k = 3, 3^3 - 16 = 11 and 11 is prime. Hence k = 3 is included in the sequence.
Crossrefs
Programs
-
Mathematica
Do[If[PrimeQ[3^n - 16], Print[n]], {n, 1, 10000}]
-
PARI
is(n)=isprime(3^n-16) \\ Charles R Greathouse IV, Feb 17 2017
Extensions
a(13)-a(16) from Robert Price, Sep 29 2013
Comments