|
%I #5 Apr 05 2019 09:29:45
%S 31,271,2311,94151567431,847322163871,450284043329950831,
%T 239299329793567483011391,
%U 13915193059764305948125655305497609574930528737031,123329495011708990974900261530856061081804307325717309329809036625289391
%N Primes of form 2^k+3^k-4.
%C Generated by k = 3, 5, 7, 23, 25, 37, 49, 103, 149, 211,....
%t lst={};Do[If[PrimeQ[p=2^n+3^n-4],AppendTo[lst,p]],{n,6!}];lst
%t Select[Table[2^k+3^k-4,{k,200}],PrimeQ] (* _Harvey P. Dale_, Apr 05 2019 *)
%Y Cf. A082101
%K nonn
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Jun 13 2009
%E Comment added by _R. J. Mathar_, Oct 04 2009
%E One more term (a(9)) from _Harvey P. Dale_, Apr 05 2019
|
