|
%I #2 Mar 31 2012 12:38:20
%S 191,536871173,2199023255921,10384593717069655257060992658441209
%N Primes of the form q*p+2^p where p is prime, q=9.
%t lst={};Do[p=Prime[n];If[PrimeQ[p=9*p+2^p],AppendTo[lst,p]],{n,5!}];lst
%Y Cf. A057664, A155841, A155842
%K nonn
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Jan 28 2009
|
