Question

在“ R TestMyCode”上，我试图解决尺寸为60，概率为1/3的二项式的 P（X = a4）= 0.034 。由于某些原因，即使接受qbinom，也会拒绝以下uniroot。这两个函数的输出有什么区别吗？还是我只需要接受正在运行的测试是错误的？

    f <- function(x) (pbinom(x, size = 60, prob = (1/3), lower.tail = TRUE)-0.034)
    a4 <- uniroot(f, lower=0.1, upper=100000000)$root

vs。

    a4 <- qbinom(0.034, size = 60, prob = (1/3))

根据str均为数字，而“ is.double”均为TRUE，因此我无法根据结果变量理解如何接受一个而拒绝另一个。使用uniroot时的TMC错误消息很简单：

    exercises 1a : fail

    message: "areEqual(a4, a4_correct) isn't true."

此消息表明，它们仅控制结果，但是，如果结果相同，则一个不能被拒绝，而另一个被接受。事实就是如此。

由于他们不熟悉uniroot，因此课程的支持无法帮助我。因此，我向所有人提出这个问题：我遗漏的这两段代码的结果之间是否存在差异，还是我应该假设一些隐性函数相关的测试导致我的代码被拒绝？ >