OFFSET
1,1
EXAMPLE
(5^2-2^2)/3=7, (5^5-2^5)/3=1031, (5^7-2^7)/3=25999, ...
MATHEMATICA
a={}; Do[p=(5^n-2^n)/3; If[PrimeQ[p], AppendTo[a, p]], {n, 20^2}]; Print[a];
Select[Table[(5^n-2^n)/3, {n, 0, 500}], PrimeQ] (* Harvey P. Dale, Aug 12 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, May 16 2008
EXTENSIONS
More terms from Harvey P. Dale, Aug 12 2012
STATUS
approved