A272272 Numbers k such that 4^k-3^(k+1) is prime.
4, 8, 24, 36, 48, 246, 608, 734, 774, 824, 948, 1244, 3230, 4656, 5448, 6360, 7598, 15390, 48158, 86754
Offset: 1
Examples
8 is a member since 4^8 - 3^9 = 65536-19683 = 45853 which is a prime number.
Programs
-
Mathematica
Select[Range[4, 100000], PrimeQ[4^# - 3^(# + 1)] &]
-
PARI
lista(nn) = for(n=1, nn, if(ispseudoprime(4^n-3^(n+1)), print1(n, ", "))); \\ Altug Alkan, Apr 24 2016
Extensions
Typo in a(11) corrected by Georg Fischer, Mar 19 2022
Comments