|
%I #2 Mar 31 2012 12:38:16
%S 118,61318,32730551749894,233592048827366522661214,
%T 2141662167055484666186673758527328459608763158,
%U 2227825214147655788431110667440233064879987880421955931545425603586478
%N Numbers of the form : p1^p2-p2^p1, p1 and p2 twin primes.
%t lst={};Do[p1=Prime[n];If[PrimeQ[p2=p1+2],p=p1^p2-p2^p1;AppendTo[lst,p]],{n,5!}];lst
%K nonn
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Aug 31 2008
| 