get cluster function parameter control
clustFunParamsUI()
cluster params
clustFunParamsUI
x <- clustFunParamsUI()