login
Numbers k such that 4^k-3^(k+1) is prime.
0

%I #14 Mar 20 2022 04:26:26

%S 4,8,24,36,48,246,608,734,774,824,948,1244,3230,4656,5448,6360,7598,

%T 15390,48158,86754

%N Numbers k such that 4^k-3^(k+1) is prime.

%C a(21) > 10^5.

%e 8 is a member since 4^8 - 3^9 = 65536-19683 = 45853 which is a prime number.

%t Select[Range[4, 100000], PrimeQ[4^# - 3^(# + 1)] &]

%o (PARI) lista(nn) = for(n=1, nn, if(ispseudoprime(4^n-3^(n+1)), print1(n, ", "))); \\ _Altug Alkan_, Apr 24 2016

%Y Cf. A093713, A082103, A093717, A093793, A096185, A093794, A093795, A096186, A271883.

%K nonn,more

%O 1,1

%A _Robert Price_, Apr 24 2016

%E Typo in a(11) corrected by _Georg Fischer_, Mar 19 2022