OFFSET
1,18
EXAMPLE
The prime factorization of 360 is 2*2*2*3*3*5, with factors greater than the least 3*3*5, so a(360) = 3.
MATHEMATICA
Table[PrimeOmega[n]-If[n==1, 0, FactorInteger[n][[1, 2]]], {n, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, May 18 2023
STATUS
approved