如何求解下面的一个概率分布问题？ 第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 ~ n 中随机取 m（1≤m≤n）个，其中最大数的数学期望是多少？
这个相关系数背景的证明题如何做？
在打麻将单吊将时，是换牌赢的概率大，还是不换牌赢的概率大？
下一个讨论
请问是质数更多还是合数更多还是一样多？
相关的话题
为何中国的中小学数学教育如此轻视统计和概率？圣彼得堡悖论，期望与实际相差为何这么大？
一个骰子，等概率的能掷出1-5。那么现在有两颗骰子。怎么样才能利用这两颗骰子等概率的得到1-25？
一维布朗运动的最大回撤的概率密度分布有没有解析解？
二项分布的个位数期望怎么算？
从正整数 1~N 中任意取两数 m、n，设 P 为 m/n 可约分的概率，问 N→∞ 时，P为多少？
如何看待大概率发生小概率事件这句话？
阶乘的概念能否推广到全体实数，甚至是全体复数？
泊松分布的现实意义是什么，为什么现实生活多数服从于泊松分布？
怎样算原神up池到第x抽才出up角色的概率（1≤x≤180）？
阶乘的概念能否推广到全体实数，甚至是全体复数？
彩票有规律可循吗？
如何计算投掷多个骰子得到某个给定总点数的概率？
如果子女都随父姓 如何保证稀有姓氏的传承？
甲有101个硬币，乙有100个硬币，两人随机撒在地面上，甲比乙正面朝上多的概率是多少？
随机取牌算不出 24 点的概率是多少？
什么是核密度估计？如何感性认识？
一个普通的赌徒，长期赌下去，会把钱输光吗？
你相信数学吗？
「羊车门」经典概率题中不换门选中车的概率是多少？
时间序列，AR（2）的方差怎么求?
如何通俗易懂地讲解什么是 PCA（主成分分析）？
概率论中，为什么XY独立，X²Y²也独立？
这个相关系数背景的证明题如何做？
小概率事件的必然发生是什么原理？
概率论和实变函数（测度论）有什么联系？
所谓的随机、混沌是否是测量精度不够的而产生的说法？
一道经典的切比雪夫不等式的概率论题目，各位大佬如何解答？
如何推出这两个随机变量都是泊松分布？
为什么彩票大奖没有一个敢露面的中奖者？