ClusterComponentUpdate function

Update the component of the Dirichlet process