A147670 Primes of the form 8^k-7^k.
1273609, 6612607849, 2019169299698041, 151522599154859354635552921, 9745744932248196392577951049, 220850092209355591999793321040563526382178219220559368038951319096656329
Offset: 1
Keywords
Examples
8^7-7^7 = 2097152-823543 = 1273609.
Programs
-
Mathematica
lst={};Do[p=8^n-7^n;If[PrimeQ[p],AppendTo[lst,p]],{n,6!}];lst Select[Table[8^n-7^n,{n,100}],PrimeQ] (* Harvey P. Dale, Jul 05 2023 *)
Comments