A repost. R gurus: I have a 10 or so functions that use R’s qnbinom() function. Until now, they have worked without any problems whatsoever. I created a new function, which involved the integration, using R’s integrate(), of a function that in turn uses the qnbinom() function. The function failed because of my programming stupidity. It has been deleted from my source file. Now I cannot get any function using qnbinom() to work. I get the following error.
Error in qnbinom(1 - tol, size = q, prob = r) : promise already under evaluation: recursive default argument reference or earlier problems? An example function that that used to work splendidly but now fails is #Distribution of R2: 0 to x pRsq.Rhosq <- function(x, n, p, Rhosq,tol=tol){ a <- p /2; b <- (n-p-1)/2; q <- (n-1)/2 r <- 1-Rhosq k <- 0:qnbinom(1-tol,size=q,prob=r) sum(dnbinom(k,size=q,prob=r)*pbeta(x,a+k,b)) } Tracebacks from more complicated functions, which have worked before, always return to the above error. When I re-source the source file without the offending function, I still get the error. How do I get rid of this error? What can I do to avoid it error in the future? TIA Joe Lucke [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.