如何求解下面的一个概率分布问题？ 第1页
1
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) 计算
注：此处我和题主有一对符号概念互换了，但是我将错就错了，不想改了。声明： 为组数， 为一组球的个数。
设组数 ， 表示第 组红球的个数， 表示第 组第 个球是否是红球，若是则 ；否则为 ，则满足不定方程：
则该方程解的全体 是全空间，显然有
而我们研究的 事件空间对应的不定方程：
设它的解集 ，
……
所求概率即为
其中
1
相关话题
概率为1的事件与任何事件独立怎么证明？一把左轮能装六颗子弹，对着脑袋打，是装五发子弹开一枪死亡几率大，还是装一发子弹开五枪死亡几率大？
目前统计学在国内外的发展现状是怎样的？都有哪些分支？今后的研究方向大致是向哪里走？
为什么日本麻将的立直一发概率那么高？
测度论（measure theory）和实变函数是什么关系？
泊松分布的现实意义是什么，为什么现实生活多数服从于泊松分布？
十赌九输这句话有根据吗?
「羊车门」经典概率题中不换门选中车的概率是多少？
数学中的概率是有漏洞的吗？我随机在R中取一个数，取到1的概率为0，但也是有可能取到的，这是怎么回事？
如何求解下面的一个概率分布问题？
下一个讨论
请问是质数更多还是合数更多还是一样多？
相关的话题
打开概率为 1/8000 的保险箱，8000 次内一定能打开吗？如何评价Yann LeCun宣称『他已经做好放弃概率论的准备』？
两个无偏估计量的方差可能相等吗？如果可能相等，那么此时怎么判断哪个更好呢？
怎样用非数学语言讲解贝叶斯定理（Bayes's theorem）？
关于概率收敛的一个问题，这个命题是真命题么？ 试证明，若是假命题能否给出一个反例？
如何证明对任意给定的正数e，存在M上的矩阵范数||A||，满足不等式||A||<=谱半径+e?
一个普通的赌徒，长期赌下去，会把钱输光吗？
考虑一个半径为 1 的圆，若「随机」选择圆上的弦，求弦长的概率分布？
如何计算投掷多个骰子得到某个给定总点数的概率？
从0,2 中选一个数字,从1,3,5中选两个数字,组成无重复数字的三位数,构成奇数的概率是多少？
概率论中，局部极限定理和积分极限定理不是一回事吗？
以奔着以后能有大概率结婚为标准找对象谈恋爱，可以吗？
一把左轮能装六颗子弹，对着脑袋打，是装五发子弹开一枪死亡几率大，还是装一发子弹开五枪死亡几率大？
如何在一晚内速成概率论与数理统计？
假设我扔一枚硬币，60次有55次正面朝上，我有多大把握认为这枚硬币正面和反面出现概率不相同？
什么是核密度估计？如何感性认识？
「大数定律现象」的成立是数学推出的结果么？
国外有哪些经典的概率统计教材？
小概率事件的必然发生是什么原理？
从概率学上看，输一把睡觉vs赢一把睡觉，哪个胜率更高一些？
A 和 B 在 100 × 100 的平面空间内移动，两种情况下哪一种相遇的概率更大？
如何理解马尔可夫链？
如何评价知乎数据帝@chenqin和NGA用户@verycd00的统计学隔空论战？
圆上任选三点组成三角形，这个三角形是锐角、钝角和直角三角形的概率分别是多少？
为什么医生避免用概率来说明病情的发生概率？
如何求得空间内若干不同大小的球体间相互碰撞所需平均时间或移动距离？
中彩票是什么感觉？
理想细绳随机切为n段，为什么最短段长度的期望为原长的1/n²？
样本数据达到多少统计指标才有意义？
一个袋子里有n个球，都是红球。现在拿一个球出来，放一个蓝的进去，重复n次过后红球占比？