%I #4 May 13 2018 09:55:32

%S 17,2685817,4555386192335572300559213161,

%T 371616904162662789429456905017,

%U 8591830681082909151487632391785043782074371844781522582861081817,15210163976423790740121668878903464496715921225994590375394324312407011207180253342612172354203245908479382157462960757179523559095554271755561

%N Primes of the form : 9^n-8^n.

%t lst={};Do[p=9^n-8^n;If[PrimeQ[p],AppendTo[lst,p]],{n,6!}];lst

%t Select[Table[9^n-8^n,{n,150}],PrimeQ] (* _Harvey P. Dale_, May 13 2018 *)

%Y Cf. A016185, A059803

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Nov 10 2008