R Gibbs Sampling parallel