OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..600
EXAMPLE
sigma(12)/phi(12) = 28/4 = 7, a prime, so 12 is a term of the sequence.
MATHEMATICA
Select[Range[10^5], PrimeQ[DivisorSigma[1, # ]/EulerPhi[ # ]] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Joseph L. Pe, Feb 06 2002
STATUS
approved