百科问答小站 logo
百科问答小站 font logo



如何求解下面的一个概率分布问题? 第1页

  

user avatar   liu-yang-zhou-23 网友的相关建议: 
      

程序

       Redball <- function(M, m, N) {     ball = c(rep(1,m), rep(0,M-m))     ball = sample(ball, M)     List = list()     order = 1:M     k = 0     for(i in 1:(M/N))     {         B = sample(order,N)         order = order[-B]         List[[i]] = ball[B]         if(max(ball[B])==1)k = k + 1     }     list(组 = List, 含红球组数 = k) }  pro.Redball <- function(M, m, N, n)    #n为实验重复次数 {     g = M/N + 1     b = rep(0,g)     for(i in 1:n)     {         num = Redball(M,m,N)[[2]] + 1         b[num] = b[num] + 1     }     p = b/n     g = g - 1      barplot(p, names.arg = paste(0:g), col = rgb(0.3,0.5,0.7))     p } pro.Redball(24, 5, 6, 1000)     

计算

注:此处我和题主有一对符号概念互换了,但是我将错就错了,不想改了。声明: 为组数, 为一组球的个数。

设组数 , 表示第 组红球的个数, 表示第 组第 个球是否是红球,若是则 ;否则为 ,则满足不定方程:

则该方程解的全体 是全空间,显然有

而我们研究的 事件空间对应的不定方程:

设它的解集 ,

……

所求概率即为

其中




  

相关话题

  随机变量服从正态分布,同时这个正态分布的均值也服从正态分布。这是什么分布? 
  一维布朗运动的最大回撤的概率密度分布有没有解析解? 
  假设有个游戏,你可以无偿获得五千元,但有百万分之一的几率会当场毙命。那么你会玩多少次游戏? 
  如何求得空间内若干不同大小的球体间相互碰撞所需平均时间或移动距离? 
  一枚硬币,扔了一亿次都是正面朝上,再扔一次反面朝上的概率是多少? 
  黑箱里有n个小球,编号为1, 2, ..., n,随机抽一个球的号码是10,能获得什么关于n的信息? 
  假设有个游戏,你可以无偿获得五千元,但有百万分之一的几率会当场毙命。那么你会玩多少次游戏? 
  以奔着以后能有大概率结婚为标准找对象谈恋爱,可以吗? 
  想买报纸,走了很久没有找到报亭,该换一条路还是走到底? 
  玩抽卡类的游戏时,如果想集齐全套卡片,应该如何估算操作成本? 

前一个讨论
除了 3,4,5 以外是否还有别的三角形,它的三条边是连续自然数,它的面积也是自然数?
下一个讨论
请问是质数更多还是合数更多还是一样多?





© 2025-04-01 - tinynew.org. All Rights Reserved.
© 2025-04-01 - tinynew.org. 保留所有权利