怎样用R做贝叶斯检验

求一道题的代码，题目是这样的：选择Gamma（α，α）作为λ的先验分布，累计合适大的随机样本，样本量为10，都来自指数分布（λ*），对于每个样本，计算等尾检验的50%的置信区间，估计λ*落在置信区间的比例。λ*的取值范围是（0.2,5），α取几个不同的值，然后画出图像。
这道题原题是英文版的，如果觉得我说的不明白可以邮件我。。如果有人写出来code也发到我邮箱吧，然后回复注明发的邮箱是什么，我好最后给论坛币。。还有就是如果最后不止一个人回了，我会给其他参与者一些小礼物的。。
我的邮箱 pooh_star@163.com

呵呵，高大上的问题，本人帮不了you