OFFSET
1,1
COMMENTS
The asymptotic density of this sequence is 1 - Product_{p prime} (1 - 1/(p^2*(p+1))) * (1 + Sum_{p prime} (1/(p^3+p^2-1))) = 0.0035024748296318122535... .
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
MATHEMATICA
q[n_] := Count[FactorInteger[n][[;; , 2]], _?(# > 1 && OddQ[#] &)] > 1; Select[Range[13000], q]
PROG
(PARI) is(k) = #select(x -> x>1 && x%2, factor(k)[, 2]) > 1;
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Amiram Eldar, Nov 09 2024
STATUS
approved