|
%I #13 Nov 09 2023 11:37:00
%S 3,4,7,8,14,20,22,62,139,254,272,430,907,1906,2278,2827,3598,6812,
%T 15266,20915,26180,26342,27022,48275,65186,69247,86647
%N Numbers k such that 3^k - 8 is prime.
%C a(28) > 2*10^5. - _Robert Price_, Sep 02 2013
%t Select[Range[2, 5000], PrimeQ[3^# - 8] &]
%o (PARI) for(n=2, 5*10^3, if(isprime(3^n-8), print1(n", ")))
%Y Cf. A014224, A051783, A058958, A058959.
%K nonn
%O 1,1
%A _Vincenzo Librandi_, Oct 01 2012
%E a(18)-a(27) from _Robert Price_, Sep 02 2013
|
