R/nextSample.R

Defines functions nextSample

nextSample <-
function(x, Theta, iters)
{
  for (i in 1:iters)
  {
    x = GibbsIteration(x, Theta)
  }
  return(x)
}
jingmafdu/TestBMN documentation built on Feb. 20, 2022, 5:24 p.m.