R语言技术分享：混合效应模型及贝叶斯实现