有没有一种方法可以找到R的pbinom概率p

Question

我认为这是一个相当普遍的问题，但我找不到解决方案。

我想解决以下方程式：pbinom（18,25，p）= 0.05。

是否可以用程序R查找未知p？

感谢所有帮助。

Answer 1

寻根：

print(
  res <- uniroot(function(p) pbinom(18,25,p) - 0.05, c(0, 1), 
          tol = .Machine$double.eps)
)

pbinom(18,25,res$root)
#[1] 0.05