高校数学の質問スレ(医者・東大卒専用) Part438 (899レス)
上下前次1-新
抽出解除 必死チェッカー(本家) (べ) 自ID レス栞 あぼーん
798: 04/29(火)10:05 ID:pY4WJf3b(1/4) AAS
alphaResult = FindRoot[
CDF[BetaDistribution[{x, 5*x}], 1/5] - CDF[BetaDistribution[{x, 5*x}], 1/7] == 0.95,
{x, 15} (* 初期値を設定 *)
];
alpha = x /. alphaResult;
beta = 5 * alpha;
fp[ones_] := CDF[BetaDistribution[{alpha + ones, beta}], 1/7] + (1 - CDF[BetaDistribution[{alpha + ones, beta}], 1/5]);
省5
799: 04/29(火)10:38 ID:pY4WJf3b(2/4) AAS
questtion="良品サイコロは1の目の出る確率の95%信頼区間が[1/7,1/5]に収まるサイコロと定義する。それ以外はFランサイコロと呼ぶ。
チンパンフェチが発狂してサイコロを齧ってしまった。
このサイコロが良品のままかFランかを調べたい。
(1)2回投げたらどちらも1の目がでたときこのサイコロがFランである確率を求めよ。
(2)最初から何回1の目が続いてでたらFランである確率が0.5を超えるか?
計算に必要な条件は適宜決定してよい。
"
省7
800(1): 04/29(火)18:09 ID:pY4WJf3b(3/4) AAS
library(RcppAlgos)
library(fmsb)
library(matrixStats)
N <- 50
# Generate all combinations
cm <- comboGeneral(0:N, 3, repetition = FALSE)
# Pre-allocate
省38
802: 04/29(火)21:05 ID:pY4WJf3b(4/4) AAS
options(warn = -1)
library(RcppAlgos)
N=50
alpha=0.01
cm=comboGeneral(0:N,3,repetition=FALSE)
f=\(x,Yates=FALSE){
n=rep(N,3)
省24
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 2.138s*