OFFSET
1,1
COMMENTS
5166592 generates a 41 digit prime. Some consecutive terms are (74,75) (152,153) (325,326) ... Conjecture: there are infinitely many consecutive values.
EXAMPLE
a(5)=26 because 26=2*13 and 2^2 + 13^2 = 173, a prime.
MATHEMATICA
pfnvQ[n_]:=Module[{fi=Flatten[Table[#[[1]], #[[2]]]&/@FactorInteger[n]]}, CompositeQ[n]&&PrimeQ[Total[fi^PrimeOmega[n]]]]; Select[Range[600], pfnvQ] (* Harvey P. Dale, Jul 21 2018 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Jun 30 2005
STATUS
approved