OFFSET
1,1
COMMENTS
Sorted along increasing n of the definition. [From R. J. Mathar, Oct 10 2010]
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..45
MATHEMATICA
Select[Table[n*2^EulerPhi[n]+1, {n, 1, 1000}], PrimeQ] (* Vincenzo Librandi, Jul 13 2012 *)
CROSSREFS
KEYWORD
hard,nonn
AUTHOR
EXTENSIONS
More terms from R. J. Mathar, Oct 10 2010
STATUS
approved