修正在R中使用“复制()”的函数中的错误？
修正在R中使用“复制()”的函数中的错误？
提问于 2017-08-09 03:28:34
我有一个叫RR的R函数。我想知道如何修复以下错误：
Error in rbinom(1, size = n, prob = p) : promise already under evaluation: recursive default argument reference or earlier problems?
RR = function(n, p, n.sim){
fun <- function(n = n, p = p){
x <- rbinom(1, size = n, prob = p)
res <- binom.test(x, n, p)[[4]]
c(Lower = res[1], Upper = res[2])
}
sim <- t(replicate(n.sim, fun()))
mean(sim[,1] <= p & p<= sim[,2])
}
# Example of use:
RR(n = 15, p = .5, n.sim = 5)回答 1
Stack Overflow用户
回答已采纳
发布于 2017-08-09 04:49:30
当您为与函数参数具有相同名称的函数定义默认值时，r抛出此错误消息，然后在另一个函数中使用相同的参数名调用该函数。因此，function(x = x)通常不是一个好主意。如果您只是将乐趣更改为fun <- function(n2 = n, p2 = p)，那么您的代码就会毫无问题地运行。
我不完全理解自己为什么会发生这种情况，但很容易避免。
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/45581228
复制相关文章
相似问题
腾讯云开发者
