[過去ログ] 分からない問題はここに書いてね458 (1002レス)
上下前次1-新
抽出解除 レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
281(3): 2020/02/24(月)13:04 ID:Gl4VKrJQ(1/2) AAS
確率
Aチーム6人 : Bチーム6人でレースゲームを16試合する。
1位15点
2位12点
3位10点
4位9点
5位8点
省8
283(1): 2020/02/24(月)13:28 ID:34cHjcwm(1/2) AAS
>>281
それは計算機マターのやつ。
289(1): 2020/02/24(月)15:06 ID:tf/NWog7(2/3) AAS
>>281
C[12,6]=924通りの「順位分け」を、基準点=41との差で分類し、差が0〜20になるのは、それぞれ次
48,47,47,44,43,39,37,32,30,25,22,18,15,11,10,6,5,3,2,1,1
f=48+47(x+1/x)+47(x^2+1/x^2)+44(x^3+1/x^3)+43(x^4+1/x^4)+39(x^5+1/x^5)+37(x^6+1/x^6)+
32(x^7+1/x^7)+30(x^8+1/x^8)+25(x^9+1/x^9)+22(x^10+1/x^10)+18(x^11+1/x^11)+15(x^12+1/x^12)+
11(x^13+1/x^13)+10(x^14+1/x^14)+6(x^15+1/x^15)+5(x^16+1/x^16)+3(x^17+1/x^17)+2(x^18+1/x^18)+
(x^19+1/x^19)+(x^20+1/x^20)
省3
299(1): 2020/02/24(月)22:15 ID:DLEIbfp6(1) AAS
>>281
シミュレーションプログラムで100万回やって引き分けの頻度を出してみた。
x=c(1:10,12,15)
sim <- function() sum(replicate(16, sum(x[sample(12,6)])))==656
k=1e6
mean(replicate(k,sim()))
> mean(replicate(k,sim()))
省1
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.028s