【发布时间】:2020-08-11 13:17:25
【问题描述】:
这可能是一个非常特殊的问题,但我创建了这个函数(见下文),每次我尝试使用正常 =FALSE 又名使用 else 语句运行它时,我都会收到以下错误:加载所需的命名空间: gsl 失败并出现错误:'没有名为'gsl'的包' 如果 normal = TRUE,我不会收到错误消息。 我尝试安装 gsl 包,但无法安装。你们中有人知道为什么错误术语首先出现吗? 谢谢你的帮助!
if(normal==TRUE){
moments1 <- c(mean=0, variance=var1, skewness=0, kurtosis=3.0)
moments2 <- c(mean=0+(-es*(sqrt(((sample1-1) *(var1)+(sample2-1)*(var2))/(sample1+sample2-2)))), variance=var2, skewness=0, kurtosis=3.0)
} else{
moments1 <- c(mean=0, variance=var1, skewness=0.5, kurtosis=5.0)
moments2 <- c(mean=0+(-es*(sqrt(((sample1-1) *(var1)+(sample2-1)*(var2))/(sample1+sample2-2)))), variance=var2, skewness=0.5, kurtosis=5.0)
}
gen1 <- rpearson(n=sample1, moments=moments1)
gen2 <- rpearson(n=sample2, moments=moments2)
Y <- c(gen1, gen2)
group <- as.factor(c(rep(1, times=length(gen1)), rep(2, times=length(gen2))))
SimData <- data.frame(Y,group)
return(SimData)
}
【问题讨论】:
标签: r function error-handling arguments gsl