OFFSET
1,2
COMMENTS
So, also numbers such that bigomega(numerator(sigma(n)/n)) = bigomega(denominator(sigma(n)/n)), that is, A001222(A017665(n)) = A001222(A017666(n)). - Michel Marcus, Apr 20 2014
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[1000], PrimeOmega[DivisorSigma[1, #]]==PrimeOmega[#]&] (* Harvey P. Dale, Oct 15 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Feb 06 2002
STATUS
approved