OFFSET
1,1
LINKS
Enrique Pérez Herrero, Table of n, a(n) for n = 1..5000
EXAMPLE
45 is a term because 45 = 3^2 * 5 gives bigomega(45)=3 and omega(45)=2 and 3/2 is not an integer.
MATHEMATICA
Select[Range[2, 1000], !IntegerQ[PrimeOmega[#]/PrimeNu[#]]&] (* Enrique Pérez Herrero, Dec 20 2012 *)
PROG
(PARI) v=[]; for(n=2, 300, if(denominator(bigomega(n)/omega(n))<>1, v=concat(v, n))); v
(PARI) is(n)=my(f=factor(n)[, 2]); n>9 && vecsum(f)%#f!=0 \\ Charles R Greathouse IV, Oct 16 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Rick L. Shepherd, Apr 11 2002
STATUS
approved