我在R中创建了一个名为calibrate
的函数,调用如下:
calibrate<-function(prior, p1=NULL, p2=NULL, p3=NULL, q13, q23,
accuracy=1e-7, sol=4, data, name_col=1, pval_col=2, tier_col=NULL)
此功能发生的第一件事是:
if(!is.null(tier_col))
{
work<-as.data.frame(table(data[tier_col]))
p1<-work[,2][work[1]==1]
p2<-work[,2][work[1]==2]
p3<-work[,2][work[1]==3]
}
此后发生了很多其他事情,但功能并没有超越这个。
我正在打电话:
calibrate(prior=0.10, q13=3, q23=2, accuracy=1e-7, sol=4,
data=read.csv("C:/Users/C191131/Desktop/calibrate_test.csv"),
name_col=1, pval_col=2, tier_col=3)
其中数据文件有3列,一列用于名称,一列用于p值,一列用于层。如您所见,tier_col
被设置为3,然后在进入函数时立即检查它是否为空。
当我拨打电话时,我收到以下错误:
Error in calibrate(prior = 0.1, q13 = 3, q23 = 2, accuracy = 1e-07, sol = 4, :
unused argument (tier_col = 3)
我不明白这是怎么回事,因为我在输入函数时做的第一件事是调用tier_col
变量。
任何帮助/想法?我研究过这个错误无济于事。
谢谢!