r - 用于条件独立测试的 PC 算法中的“indepTest”错误
问题描述
我正在使用 PC 算法函数,其中条件独立是属性之一。面临以下代码中的错误。请注意,这里的“数据”是我一直在使用的数据,1,6,2
ingaussCItest
是数据的邻接矩阵 x 和 y 中的节点位置。
代码:
library(pcalg)
suffstat <- list(C = cor(data), n = nrow(data))
pc.data <- pc(suffstat,
indepTest=gaussCItest(1,6,2,suffstat),
p=ncol(data),alpha=0.01)
错误:
indepTest(x, y, nbrs[S], suffStat) 中的错误:
找不到函数“indepTest”
解决方案
下面是运行的代码。去掉了 gaussCItest 的参数作为它的一个函数,可以直接使用。
library(pcalg)
suffstat <- list(C = cor(data), n = nrow(data))
pc.data <- pc(suffstat,indepTest=gaussCItest, p=ncol(data),alpha=0.01)
推荐阅读
- node.js - 托管在 bluehost 上的 Node JS https
- javascript - 什么可能导致:“未捕获的 TypeError:this.captcha_ip.form.submit is not a function”在这个(下载的)javascript中?
- excel - 使用 VBA 从 Excel 生成动态 CSV
- oracle - SQL Plus 格式化嵌套表列
- python - 使用 requests 或 selenium 抓取运动数据
- r - 如何避免使用 for 循环
- ruby-on-rails - 未在生产服务器上加载的模块
- javascript - 如何将 js 文件和图片上传到您的 BigCartel 商店?
- r - R data.table 使用变量名作为 data.table 名称的向量?
- c++ - 从 'void *' 到 'vector 的转换
'