%I #6 Nov 02 2024 19:57:12
%S 23,163,137438953657,2305843009213694257,
%T 862718293348820473429344482784628181556388621521298319395315527976057,
%U 19239260838083241802870625048898248928261591440656956380834127638791856333738872368854622194768025215237611325257
%N Primes of the form q*p+2^p where p is prime, q=5.
%C The next term has 4702 digits. - _Harvey P. Dale_, Nov 02 2024
%t lst={};Do[p=Prime[n];If[PrimeQ[p=5*p+2^p],AppendTo[lst,p]],{n,5!}];lst
%t Select[Table[5p+2^p,{p,Prime[Range[100]]}],PrimeQ] (* _Harvey P. Dale_, Nov 02 2024 *)
%Y Cf. A057664, A155841
%K nonn,changed
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Jan 28 2009