R语言编程问题R语言编程问题

我想做一个分层贝叶斯模型的参数估计，图片里是一个参数的后验分布，想 请教各位图片里的式子在R语言里应该怎么表示。