powered by
bbewarmup(x, costpara, kerntype = c("Gaussian", "Epanechnikov", "Quartic", "Triweight", "Triangular", "Uniform"), warm = 4, sizep = 2)
bbeMCMCrecording
bbelogdensity