我一直在尝试学习基于贝叶斯模拟的后验近似方法。虽然理论现在已经很清楚了，但我正在寻找一些带有 R 代码的例子，以便我可以练习并实施到我自己的工作中。

我特别在寻找具有非迭代和迭代蒙特卡罗方法的 R 代码的示例。主要是——

1. 重要性抽样
2. 拒绝抽样
3. 大都会算法
4. Metropolis-Hastings 算法
5. 吉布斯采样器

那么，是否有可能在某个地方共同找到这些模拟方法的 R 代码示例？我的意思是这是一种启发式学习，所以基本上我需要一些教程或一些博客或网站，其中的示例用相应的 R 代码正确描述。

编辑： 很抱歉我忘了提，我实际上是在寻找在 R 中为这些采样方法创建函数以了解这些算法的基本知识。不寻找任何打包软件。