OFFSET
1,2
EXAMPLE
Binomial(6,3) = 2^2*5, for a total of 3 prime divisors (where 2 has multiplicity 2), so 3 is in the list.
MATHEMATICA
u[n_] := PrimeOmega[Binomial[2 n, n]];
Select[Range[120], OddQ[u[#]] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Nov 01 2025
STATUS
approved
