如果 ( ! 要求( 开发工具 )){ 安装.包( " 开发工具 " ) 图书馆( " 开发工具 " ) } 安装github( " jvparidon/lmer多成员 " )
佤邦 <- 权重_来自_向量( 数据流 $ 作者 ) Wj公司 <- 矩阵 :: fac2解析( 数据流 $ 杂志 ) # 使用fac2sparse()将单个成员变量转换为指示符矩阵
瓦杰 <- 交互权重( 佤邦 , Wj公司 ) lmer公司( 引用 ~ 单词_计数 + ( 1 | 杂志 ) + ( 1 | 作者Xjournal ), 成员资格 = 列表 ( 作者Xjournal = Waj公司 ))