如何解决编码功能
我有一个分配问题,我认为使用函数会更容易。我尝试过并收到一个错误。我的问题是,如何将突出显示的数学代码编码为函数?我希望函数在更改样本大小时返回概率输出。
例如,在突出显示的数学中,样本大小为24,我必须选择20。
下面的图片。
我希望函数基本上像下面的公式,并且我想输入不同的样本大小以产生输出。
P(X = 20)&=&{Sample_Size \ choose 20} *(0.90 ^ 20)*(0.10 ^ 4)=“输出”
这是我尝试做的无济于事的错误
“概率
Probability <- function(Sample_Size) {Probability<- choose(Sample_Size,X)*.9^X *.10^(Sample_Size-X) return(Probability)
解决方法
R中已经有一个函数可以为您完成此操作。它被称为dbinom
(因为您似乎正在使用二项式分布)。
以下是使用方法的示例:
dbinom(x = 20,size = 24,prob = 0.9)
#> [1] 0.1291874
dbinom(x = 21,prob = 0.9)
#> [1] 0.221464
dbinom(x = 22,prob = 0.9)
#> [1] 0.2717968
由reprex package(v0.3.0)于2020-09-13创建
-
第一个参数(x)表示您想要获得概率的成功次数。
-
第二个(大小)为样本大小
-
第三个(概率)采用成功的概率。
它应该看起来像这样:
your_input # sample_size
Probability<-function(Sample_Size,X) {
Probability<- choose(Sample_Size,X)*.9^X *.10^(Sample_Size-X)
return(Probability)
}
Probability(your_input,20) # 20 being a random input number -> depends on your X value
请参阅@Rui Barradas的答案
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。