Nothing
plot_ClaDS0_chains = function(sampler,burn=1/2,thin=1,param=c("sigma","alpha","l_0","LP")){
plot(mcmc.list(lapply(sampler,function(x){mcmc(x[seq(max(1,floor(nrow(x)*(burn))),nrow(x),by = thin),param])})))
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.