高校数学の質問スレ（医者・東大卒専用） Part438 (991ﾚｽ)

高校数学の質問スレ（医者・東大卒専用） Part438 http://rio2016.5ch.net/test/read.cgi/math/1723152147/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞

---

551: １３２人目の素数さん [sage] 2025/01/11(土) 23:13:48.64 ID:WI+T/Kwt ここはRやWolframによる解法のコード置き場。 亀レスとの照合用。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/551

552: １３２人目の素数さん [sage] 2025/01/12(日) 08:08:57.37 ID:ht709xDC >>551 ちがいます >>5 http://rio2016.5ch.net/test/read.cgi/math/1723152147/552

553: １３２人目の素数さん [sage] 2025/01/12(日) 08:45:21.01 ID:jXkNnsH9 >>551 ここはお前専用の隔離スレだよ 医者・東大卒なんだろ？w もうここ以外に書き込むなよ http://rio2016.5ch.net/test/read.cgi/math/1723152147/553

554: １３２人目の素数さん [sage] 2025/01/12(日) 08:45:54.02 ID:Sb0hrOht >>5の日本語すら理解できないチンパンが紛れ込んでいる模様 http://rio2016.5ch.net/test/read.cgi/math/1723152147/554

555: １３２人目の素数さん [sage] 2025/01/12(日) 10:55:46.68 ID:qiFin7nw 【臨床応用問題】 下記のデータから適合する分布を選びそのパラメータを算出せよ。 https://i.imgur.com/N9lQ4Qu.png 算出例 AICやBICで判定すると非負量を定義域にする分布ではWeibull分布が最良だった。 そのパラメータは shape scale 6.404264 1.551445 インフルエンザの潜伏期は形状母数k=2.0,尺度母数θ=1.0のガンマ分布(青色)に従うとする。 https://i.imgur.com/YAI1lc2.png 【臨床応用問題】 発熱外来では呼吸器症状を呈するインフルエンザと消化器症状を呈

するノロウイルス感染に二分されたとする。 発熱外来で働く職員が同時に両方のウイルスに感染したときに同じ日に呼吸器症状と消化器症状が出現する確率を求めよ。 library(fitdistrplus) set.seed(2025) noro=c( runif(2,0,24), runif(2,25,28), runif(16,29,32), runif(16,33,36), runif(14,37,40), runif(2,41,44), runif(5,45,48) )/24 fit=fitdist(noro,'weibull') ; fit gofstat(fit) plot(fit) hist(noro,freq=F,main="",col=4,breaks = 'scott') fit$estimate curve(dweibull(x,shape=fit$estimate[1],scale=fit$estimate[2]),a

dd=TRUE,lwd=2) par=fit$estimate ; par Noro=rweibull(k,shape=par[1],scale=par[2]) plotPost(Noro,freq=FALSE,main='Norovirus',col=7) curve(dweibull(x,shape=fit$estimate[1],scale=fit$estimate[2]),add=TRUE) Flu=rgamma(k,shape=2,scale=1) par(mfrow=c(3,1)) plotPost(Flu,col=4) plotPost(Noro,col=2) plotPost(Flu-Noro,col=7,compVal = 0) mean(abs(Flu-Noro) < 1) http://rio2016.5ch.net/test/read.cgi/math/1723152147/555

556: １３２人目の素数さん [sage] 2025/01/13(月) 05:38:55.68 ID:cjaPfdCl https://i.imgur.com/0tg88Vd.png http://rio2016.5ch.net/test/read.cgi/math/1723152147/556

557: １３２人目の素数さん [sage] 2025/01/13(月) 06:51:55.39 ID:oWSkSukX gr=Tuples[{"+","-","*","/",""},8]; join[x_] := ( {x1,x2,x3,x4,x5,x6,x7,x8}=x; "1"<>x1<>"2"<>x2<>"3"<>x3<>"4"<>x4<>"5"<>x5<>"6"<>x6<>"7"<>x7<>"8"<>x8<>"9" ) op[x_] := ToExpression@join@x re = op /@ gr; so

lve[n_] := join /@ Select[gr,op@#==n&] http://rio2016.5ch.net/test/read.cgi/math/1723152147/557

558: １３２人目の素数さん [sage] 2025/01/13(月) 07:07:22.30 ID:BfHaF1g6 下記のデータから潜伏時間の中央値の９５％信頼区間を求めよ。 https://i.imgur.com/N9lQ4Qu.png 算出方法にはいくつかの流儀があるが、好みの方法で 算出例　 中央値を代表値としてブートストラップ法で算出した結果 BOOTSTRAP CONFIDENCE INTERVAL CALCULATIONS Based on 10000 bootstrap replicates CALL : boot.ci(boot.out = one.boot(dat, median, 10000, student = TRUE, M = 30)) Intervals : Level Normal Basic Studentized 9

5% (33.05, 35.86 ) (34.50, 34.50 ) (34.50, 34.50 ) Level Percentile BCa 95% (34.5, 34.5 ) (30.5, 30.5 ) Calculations and Intervals on Original Scale Warning : BCa Intervals used Extreme Quantiles Some BCa intervals may be unstable http://rio2016.5ch.net/test/read.cgi/math/1723152147/558

559: １３２人目の素数さん [sage] 2025/01/13(月) 08:16:08.96 ID:BfHaF1g6 Min[re] Max[re] solve[Min[re]] solve[Max[re]] Commonest[re] Length[solve[0]] http://rio2016.5ch.net/test/read.cgi/math/1723152147/559

560: １３２人目の素数さん [sage] 2025/01/13(月) 09:19:47.66 ID:GL4RAVeD https://i.imgur.com/uwF2H4N.png http://rio2016.5ch.net/test/read.cgi/math/1723152147/560

561: １３２人目の素数さん [sage] 2025/01/13(月) 17:58:04.04 ID:kvwM3Liy gr=Tuples[{"+","-","*","/",""},8]; join[x_] := "1"<>x[[1]]<>"2"<>x[[2]]<>"3"<>x[[3]]<>"4"<>x[[4]]<>"5"<>x[[5]]<>"6"<>x[[6]]<>"7"<>x[[7]]<>"8"<>x[[8]]<>"9" op[x_] := ToExpression@join@x re = op /@ gr; sol

ve[n_] := join /@ Select[gr,op@#==n&] solve /@ Table[1111*m,{m,1,9}] {{1+23*45+6+78-9, 1*2*3*4*5/6*7*8-9, 1*23*45-6-7+89, 1*23/4*56+789, 1*234*5+6+7-8*9, > 1*234*5+6-7*8-9, 1*234*5-6*7-8-9, 1/2/3*4*5*6*7*8-9, 12+34*5*6+7+8*9, > 12*34-5+6+78*9}, {1+2+34*5/6*78+9}, {}, {}, {}, {12-3*45+6789}, {}, {}, {}} http://rio2016.5ch.net/test/read.cgi/math/1723152147/561

562: １３２人目の素数さん [sage] 2025/01/14(火) 06:30:12.29 ID:6B9y8ZmQ rm(list=ls()) library(fitdistrplus) solve=\(hours){ noro=c( runif(2,21,24), runif(2,25,28), runif(16,29,32), runif(16,33,36), runif(14,37,40), runif(2,41,44), runif(5,45,48) ) #hist(noro) distr=c("norm","lnorm","gamma","weibull") aic=NULL for(i in 1:length(distr)) aic=c(aic,gofstat(fitdist(noro,distr[i]))$aic) fitted=distr[which.min(aic)] fit=fitdist(noro,"fitted") # plot(fit) par=fit

$estimate #hist(noro,freq=F,main='Noro Virus incubation',col=4,axes=FALSE,xlab='hours',ylab='') ; axis(1) #curve(dgamma(x,par[1],par[2]),add=TRUE) #curve(dgamma(x,par[1],par[2]),0,5*24) pgamma(hours,par[1],par[2],lower.tail = FALSE) } solve(48) http://rio2016.5ch.net/test/read.cgi/math/1723152147/562

563: １３２人目の素数さん [sage] 2025/01/14(火) 18:27:07.83 ID:KQCqu9ZF " Fくんが２日前（４８時間とする）に喫食した食材でノロウイルスによる食中毒が発生したとする。 https://i.imgur.com/Aaz7iOi.png のデータから現在無症状のFくんが今後、発症する確率を算出しなさい。 算出に必要な条件は適宜設定してよい。 " rm(list=ls()) library(fitdistrplus) solve=\(hours,distr=c("lnorm","gamma","weibull"),verbose=FALSE){ noro=c( runif(2,21,24), runif(2,25,28), runif(16,29,32), runif(16,33

,36), runif(14,37,40), runif(2,41,44), runif(5,45,48) ) aic=NULL for(i in 1:length(distr)) aic=c(aic,gofstat(fitdist(noro,distr[i]))$aic) best_fit=distr[which.min(aic)] fit=fitdist(noro,best_fit) par=fit$estimate if(verbose){ hist(noro,freq=F,main='Noro Virus incubation',col=4,axes=FALSE,xlab='hours',ylab='') ; axis(1) curve(dgamma(x,par[1],par[2]),add=TRUE) } paste0('p',best_fit,'(hours,par[1],par[2],lower.tail = FALSE)') |> str2lang() |> eval() } solve(48,verbose=TRUE) k=1e4 p48=replicate(k,solve(

48,c("lnorm","gamma","weibull"))) round(HDInterval::hdi(p48),3)[1:2] median(p48) mean(p48) BEST::plotPost(p48,showCurve = F,col='lightgreen',xlab='p[hour>48]') http://rio2016.5ch.net/test/read.cgi/math/1723152147/563

564: １３２人目の素数さん [sage] 2025/01/14(火) 20:19:32.39 ID:KG5WXTP4 太郎くんと花子さんが一緒に食事をしてノロウイルスのいる生牡蠣を食べたとする。 https://i.imgur.com/lro8LGD.png のデータから太郎くんと花子さんが同じ日に発症する確率を求めなさい。 算出に必要な条件は適宜設定してよい、すなわち、好みの方法で計算してよい。 算出例：incubation periodがどんな分布に従うかを前提にしないで乱数発生させて算出。 R言語 calc=\(){ noro=c( runif(2,21,24), runif(2,25,28), runif(16,29,32), runif(16,33,36), runif(14,37,40),

runif(2,41,44), runif(5,45,48)) abs(diff(sample(noro,2,replace = TRUE))) < 24 } mean(replicate(1e6,calc())) Wolfram言語 calc[] := Module[{noro}, noro := Flatten@{ Table[Random[Real,{21,24}], 2], Table[Random[Real,{25,28}], 2], Table[Random[Real,{29,32}],16], Table[Random[Real,{33,36}],16], Table[Random[Real,{37,40}],14], Table[Random[Real,{41,24}], 2], Table[Random[Real,{45,48}], 5]}; (Abs@Differences@RandomChoice[noro,2])[[1]] < 24 // Boole ] Table[calc[],10^6] // Mean // N http://rio2016.5ch.net

/test/read.cgi/math/1723152147/564

565: １３２人目の素数さん [sage] 2025/01/14(火) 22:49:01.71 ID:DQ0smkUQ >>564 寝ても覚めてもレス乞食って虚しくないのかよ http://rio2016.5ch.net/test/read.cgi/math/1723152147/565

566: １３２人目の素数さん [sage] 2025/01/15(水) 06:14:35.86 ID:8YGxCxj9 >>565 レス乞食にまんまとレスしてるアホ http://rio2016.5ch.net/test/read.cgi/math/1723152147/566

567: １３２人目の素数さん [sage] 2025/01/15(水) 06:38:33.01 ID:kBv/ts+F 俺は学生時代には女子医大生には息子が大変お世話になりました。 そういえばFランくんは女子大生には興味がないとかだったな。 FランくんがPhimoseくんと呼ばれた所以。 Rも弄れなくて弄れるのはforeskinだけのようである。 朝飯前の問題 https://i.imgur.com/Cta4OED.png のデータから潜伏時間の中央値とその95%信頼区間を算出せよ。 好みの流儀の算出でよい。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/567

568: １３２人目の素数さん [sage] 2025/01/15(水) 07:08:29.83 ID:hqU0L6Kn もう医者板で脳内医者なのはとっくにバレてるのに妄想止まらないみたいだね 実に哀れ http://rio2016.5ch.net/test/read.cgi/math/1723152147/568

569: １３２人目の素数さん [sage] 2025/01/15(水) 08:04:10.01 ID:hqU0L6Kn 262：卵の名無しさん：[sage]：2025/01/15(水) 06:50:29.35 ID:lJw2j4WX 治療薬ハンドブックに付属のソフトで薬のインタビューフォームが読めるのはありがたい。 商品名の由来を知ると記憶しやすい。 トリバブタンの注射薬サムタスの由来は笑えた。 サムスカは内服薬なのに入院前提なのだが、外来患者に処方して薬局から疑義照会が来た例があったなぁ。 処方したのは循環器医。当然ながら安定ｗのシリツ医。 263：卵の名無しさん：[sage]：2025/01/15(水) 07:07:42.64 ID

:nOEIIGv0 >>262 別に入院で導入したら外来で処方してもいいぞサムスカ その薬剤師が勘違いしただけだろ ていうか何で他の医者の疑義照会をお前が知ってるんだよ 医者の処方した疑義照会を別の医者が聞く機会なんて皆無だろ 薬局から病院への問い合わせを受けた病院薬剤師か医療事務ぐらいじゃん やっぱお前医療事務だな 墓穴掘りすぎだろwww http://rio2016.5ch.net/test/read.cgi/math/1723152147/569

570: １３２人目の素数さん [sage] 2025/01/15(水) 08:16:30.19 ID:q5S9InWc 電カルに処方撤回が記載されていたからだよ。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/570

571: １３２人目の素数さん [sage] 2025/01/15(水) 08:19:06.09 ID:q5S9InWc 朝飯前の問題すらできないって、やっぱりFランなんだろうな。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/571

572: １３２人目の素数さん [sage] 2025/01/15(水) 08:29:57.61 ID:8YGxCxj9 >>571 なるほどスレタイ読めない保育園卒 http://rio2016.5ch.net/test/read.cgi/math/1723152147/572

573: １３２人目の素数さん [sage] 2025/01/15(水) 16:08:56.59 ID:q5S9InWc 朝飯前の問題すらできないって、やっぱりFランなんだろうな。 中央値の区間推定すらできないとは。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/573

574: １３２人目の素数さん [sage] 2025/01/15(水) 17:43:29.99 ID:bNVi3kxj また他人がどうこう言って誤魔化してるwww それしか出来ない無能なのはみんな分かったから無能アピールはいらないぞwww http://rio2016.5ch.net/test/read.cgi/math/1723152147/574

575: １３２人目の素数さん [sage] 2025/01/16(木) 04:27:48.80 ID:jkCW5V3d やっぱりFランなんだろうな。 中央値の区間推定すらできないとは。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/575

576: １３２人目の素数さん [sage] 2025/01/16(木) 07:32:34.86 ID:M9H3tZYu >>575 保読スな 育めレる 園なタほ 卒いイど http://rio2016.5ch.net/test/read.cgi/math/1723152147/576

577: １３２人目の素数さん [sage] 2025/01/16(木) 11:36:50.03 ID:jkCW5V3d set.seed(2025) str=" FLU Log-Normal Distribution for Influenza typical Parameters (based on research): 𝜇: ~0.5–1.0 (log-mean) 𝜎: ~0.3–0.5 (log-standard deviation) Gamma Distribution for Influenza typical Parameters (based on research): Shape (𝑘): ~2.0–3.0 Scale (𝜃): ~0.5 days " par(bty='l') calc=function(){ m=runif(1,0.5,1.0) s=runif(1,0.3,0.5) fl=function(x) dlnorm(x,m,s) fd

l=function(y) integrate(function(x) fl(x+y)*fl(y),0,Inf)$value fdl=Vectorize(fdl) # curve(fdl(x),0,5) integrate(fdl,1,2)$value } p=replicate(1e3,calc()) hist(p) http://rio2016.5ch.net/test/read.cgi/math/1723152147/577

578: １３２人目の素数さん [sage] 2025/01/16(木) 13:07:49.74 ID:p/YB+Wu5 >>577 結局トルバブタンってなんの薬だよ？ やっぱり脳内医療なのか？ww 保育園すら卒業できないみたいだね http://rio2016.5ch.net/test/read.cgi/math/1723152147/578

579: １３２人目の素数さん [sage] 2025/01/17(金) 12:19:30.64 ID:BcOp0/e9 ChatGPTに COVID-19の潜伏期 https://i.imgur.com/9Y6jsFD.png と 抗原検査のウインドウ期間 https://i.imgur.com/u1B5Ne7.png のデータを探してもらった。報告により多少のばらつきがある。 臨床医のための演習問題 上記データを適宜選んで、発症当日に抗原検査を受けた患者の検査結果が陰性である確率を区間推定せよ。 家族がCOVID-19と診断されて自分も発熱したので調べてほしいときた患者の説明に役立つ計算だと思う。 http://rio2016.5ch.net/test/read.cgi/math/1

723152147/579

580: １３２人目の素数さん [sage] 2025/01/17(金) 12:35:11.06 ID:DXezdDGQ >>579 それが役立つと思うなら、先入観に拠った誤診をしている蓋然性が高いな http://rio2016.5ch.net/test/read.cgi/math/1723152147/580

581: １３２人目の素数さん [sage] 2025/01/17(金) 18:02:26.71 ID:BcOp0/e9 # incubation period for COVID-19 incu=\(x){dlnorm(x,m=1.64,s=0.58) # lm=runif(1,1.6,1.8) # s=runif(1,0.4,0.6) } incu=Vectorize(incu) # window period for rapid antigen test wind=\(x) dweibull(x, shape=2.5,scale=4.5) wind=Vectorize(wind) curve(wind,0,14,col=2,xlab='days',ylab='',axes=F) ; axis(1) curve(incu,add=TRUE) legend('top',bty='n',legend=c('incubation period','window period'),lty=1:1,col=1:2) cdf_incu=\(x) integrate(incu,0,x)$val

ue cdf_incu=Vectorize(cdf_incu) cdf_wind=\(x) integrate(wind,0,x)$value cdf_wind=Vectorize(cdf_wind) curve(cdf_wind,0,14,col=2) curve(cdf_incu,add=TRUE) legend('center',bty='n',legend=c('incubation period','window period'),lty=1:1,col=1:2) pdfZ=\(z) integrate(\(x) incu(x)*wind(x-z),0,Inf)$value pdfZ=Vectorize(pdfZ) curve(pdfZ,-10,10,xlab='incubation-window (days)',axes=F,ylab='') ; axis(1) integrate(pdfZ,-Inf,0)$value fnr=\(x) integrate(pdfZ,-Inf,-x)$value # false negative rate after x days since onset of

symtom fnr=Vectorize(fnr) curve(fnr,0,7, xlab='days after onset',ylab='false negative rate') ## k=1e5 inc=rlnorm(k,m=1.64,s=0.58) win=rweibull(k,shape=2.5,scale=4.5) d=inc-win hist(d) mean(inc) mean(win) mean(inc<win) # negative test re=NULL for(i in 1:7) re=c(re,mean((inc+i)<win)) ; re plot(re,pch=16) which(re<0.05)[1] http://rio2016.5ch.net/test/read.cgi/math/1723152147/581

582: １３２人目の素数さん [sage] 2025/01/18(土) 04:44:07.33 ID:SFQH0Se4 >>580 偽陰性の確率を数値化できることが役立つのは自明。 数値がいくつなら再検するか、何日後の再検で偽陰性確率をどれだけ下げられるかがわかる。 まあ、Rすら使えないようなシリツ医には無理だけど。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/582

583: １３２人目の素数さん [sage] 2025/01/18(土) 05:44:50.29 ID:yNjuTl8y >>580 シマウマの確率も含めて 鑑別診断という先入観を事前確率を想定して設定できるのが臨床医（裏口容疑者は除く）。 まあ、スポット診断できる疾患もあるけどね。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/583

584: １３２人目の素数さん [sage] 2025/01/18(土) 06:31:54.51 ID:LJ7sOVNU >>583 トルバブタンって結局なんなの？ http://rio2016.5ch.net/test/read.cgi/math/1723152147/584

585: １３２人目の素数さん [sage] 2025/01/19(日) 06:24:57.50 ID:m50NvR0F rm(list=ls()) g=rep(0:3,c(2700,100,100,100)) " 確率の問題で分からないことがあるので計算方法を教えて下さい あるガチャガチャがあります。 中身は 　アタリA　3.3% 　アタリB　3.3% 　アタリC　3.3% 　ハズレ　90.0% となっておりアタリやハズレを引いても無限に補充され続けます（常にこの確率です）。 また10回毎にアタリ確定がありABCのどれかが1/3で出てきます。 このガチャガチャでアタリ3種を5個づつ手に入れるには何回回せばいいでしょうか？ ＞アタ

リやハズレを引いても無限に補充され続けます（常にこの確率です）。 という設定が現実的ではないので 開始時に アタリA　100 アタリB　100 アタリC　100 ハズレ　 2700 があり、補充はされないとする。 " f=\(g){ i=sample(length(g),10) list(g[i],g[-i]) } sim=\(n=5){ count=10 re=f(g) p=re[[1]] g=re[[2]] while((sum(p==1)<n | sum(p==2)<n | sum(p==3)<n)){ re=f(g) p=c(p,re[[1]]) g=re[[2]] count=count+10 } count } count=replicate(10^6,sim()) BEST::plotPost(count,breaks='scott') http://rio2016.5ch.net/test/read

.cgi/math/1723152147/585

586: １３２人目の素数さん [sage] 2025/01/19(日) 17:45:59.48 ID:B18Hccyf >>585 文章が支離滅裂で怖い 一人で質問して答えてるの？多重人格？ http://rio2016.5ch.net/test/read.cgi/math/1723152147/586

587: １３２人目の素数さん [sage] 2025/01/19(日) 18:13:32.14 ID:an0SnGGk 756：１３２人目の素数さん：[sage]：2025/01/19(日) 15:15:56.37 ID:an0SnGGk 統合失調症の患者さんが経験する 「言葉のサラダ」について、詳しく解説していきます。 言葉のサラダとは？ 「言葉のサラダ」とは、 統合失調症の患者さんが話す言葉が、 文法的に正しくなく、意味が不明瞭で、 まるで言葉がごちゃ混ぜになった サラダのように聞こえる状態を指します。 具体的には、以下のような特徴が見られます。 連想の飛躍: ある単語から別の、一見関連のない単語へと話

が飛んでしまう。 文法の崩壊: 主語や述語が一致しない、語尾が変など、文法的な規則が破られる。 新語の創出: 既存の言葉に意味を付け替えたり、全く新しい言葉を作り出したりする。 言葉の繰り返し: 特定の言葉やフレーズを何度も繰り返す。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/587

588: １３２人目の素数さん [sage] 2025/01/20(月) 06:29:31.28 ID:p/PwfWNf 角B＝B度、角C＝C度の三角形ABCで、辺BCをs:(1-s)に内分する点をMとするときの角MACの算出。 問題 B=20 C=25 s=1/20 のときの角MACをラジアンと度表示で、 逆三角関数を使った厳密値で答えよ。 calc[B_:15,C_:30,s_:1/2] :=( do=Pi/180; aB=15 do; aC=30 do; pB={0,0}; pC={1,0}; a={0,0}; b={1,Tan[aB]}; c={0,Tan[aC]}; d={1,0}; pA=ResourceFunction["LineIntersection"][Line[{a,b}],Line[{c,d}]]; pM=(1-s)pB + s pC; MA=pM-pA; CA=pC-pA; MAC=VectorAngl

e[MA,CA]; Simplify /@{MAC,MAC/do} ) calc[20,25,1/20] % // N http://rio2016.5ch.net/test/read.cgi/math/1723152147/588

589: １３２人目の素数さん [sage] 2025/01/20(月) 07:07:48.25 ID:VfEp74h/ >>588 結局医者板ではダンマリかよ http://rio2016.5ch.net/test/read.cgi/math/1723152147/589

590: １３２人目の素数さん [sage] 2025/01/20(月) 13:32:41.25 ID:hhX1bSoJ 件のスレ荒らしは小中質問スレみたく閉鎖させるつもりなんだろう http://rio2016.5ch.net/test/read.cgi/math/1723152147/590

591: １３２人目の素数さん [sage] 2025/01/21(火) 02:33:43.88 ID:eMqBmBFs >>589 ダンマリなのなのは、証拠が出せると宣言した椰子だよ。 匿名掲示板で（個人の属性の）証拠がだせる、と宣言することは匿名性を放棄して個人情報を開示するということを意味する。 オンラインでの証拠は闇バイト応募のような個人情報開示が必要（十分とは言わない）。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/591

592: １３２人目の素数さん [sage] 2025/01/21(火) 02:36:13.21 ID:eMqBmBFs >>590 ここは医師、東大卒専用に立てられたスレなんだが。 医師＆東大卒でなく医師｜東大卒と解釈して俺は投稿している。 旧二期校の医学部卒なので。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/592

593: １３２人目の素数さん [sage] 2025/01/21(火) 03:58:40.01 ID:yxAp/Psr すげーキチガイっぷりだな http://rio2016.5ch.net/test/read.cgi/math/1723152147/593

594: １３２人目の素数さん [sage] 2025/01/21(火) 05:10:26.06 ID:g3sgwD+C Whoa, this is the real ICHIRO KURE of Dogura Magura! :P" http://rio2016.5ch.net/test/read.cgi/math/1723152147/594

595: １３２人目の素数さん [sage] 2025/01/21(火) 05:56:49.39 ID:yxAp/Psr 旧二期校の呼称は1949年の学制改革までであり、仮に最年少の18歳で旧二期校の医学部に入学し、最短の6年間で1949年に卒業したとしても、その人物は1931年生まれの現在94歳となる。 これは酷く雑な設定で、なんとも頭の悪さが覗える。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/595

596: １３２人目の素数さん [sage] 2025/01/21(火) 08:17:42.01 ID:TjYqVp68 >>591 ダンマリなのは何も証拠が出せない脳内医者だよもちろん http://rio2016.5ch.net/test/read.cgi/math/1723152147/596

597: １３２人目の素数さん [sage] 2025/01/21(火) 08:19:52.87 ID:TjYqVp68 >>591 医者だったらログイン時間付きの学会画面くらい出せんだろ？ さっさとアップしてこいよ悔しかったら http://rio2016.5ch.net/test/read.cgi/math/1723152147/597

598: １３２人目の素数さん [sage] 2025/01/21(火) 17:09:23.22 ID:3qEGcmw/ >>592 ルールを守らない者がそのルールの一部分をを持ち出して他者を批判したり、自分の行動を正当化することは、一貫性が欠けており説得力に欠けます。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/598

599: １３２人目の素数さん [sage] 2025/01/21(火) 18:43:04.64 ID:sRK87jO0 >>592 じゃあ僕は東大理3卒！ http://rio2016.5ch.net/test/read.cgi/math/1723152147/599

600: １３２人目の素数さん [sage] 2025/01/21(火) 19:34:13.79 ID:lhhnVzdZ >>592 あなたはfランすら受からない日本語通じないチンパンです http://rio2016.5ch.net/test/read.cgi/math/1723152147/600

601: １３２人目の素数さん [sage] 2025/01/22(水) 08:05:34.24 ID:HlMuKzBA 日本人での血液型の頻度比は A:O:B:AB=4:3:2:1である。 一人ずつ採血していきすべての血液型がｍ人以上集まったら終了する。 終了するまでに採血された人数をｎとする。 ｎの期待値が１００を超えるｍの最小値を算出せよ。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/601

602: １３２人目の素数さん [sage] 2025/01/22(水) 08:09:27.67 ID:Wm5RP1wo >>601 お前に命令される覚えはない 土下座してお願いしろアホが http://rio2016.5ch.net/test/read.cgi/math/1723152147/602

603: １３２人目の素数さん [sage] 2025/01/22(水) 08:20:44.71 ID:VPFVu86y >>601 精神科受診せよ http://rio2016.5ch.net/test/read.cgi/math/1723152147/603

604: １３２人目の素数さん [sage] 2025/01/22(水) 08:26:55.18 ID:fD0JmFMq 日本人「での」血液型の「頻度」比？ http://rio2016.5ch.net/test/read.cgi/math/1723152147/604

605: １３２人目の素数さん [sage] 2025/01/22(水) 10:12:13.06 ID:hRE7akYG マルチポスト 別スレで その解で合ってるよ という人がいたんだから満足しなって http://rio2016.5ch.net/test/read.cgi/math/1723152147/605

606: １３２人目の素数さん [sage] 2025/01/22(水) 12:35:00.84 ID:Z2QDPzpT >>601 フルボッコで草 http://rio2016.5ch.net/test/read.cgi/math/1723152147/606

607: １３２人目の素数さん [sage] 2025/01/22(水) 18:25:52.40 ID:hRE7akYG >>601 こういう問題のために統一された 期待値の公式はあるんだが 手計算は面倒で、プログラムを組むしかない 「クーポンコレクター問題」に関する 1982年発表の論文 http://danielegardy.github.io/SourcesPubli/FlajoletGardyThimonier_DAMIN.pdf によると くじの券面 m種類、 確率 {p_i}={p_1, p_2, ..., p_m} のくじを繰り返しひいて m種類中j種類が少なくともk枚 揃うまでの試行回数の期待値は E{B_j} =∑[q=0,j-1]{ 　 ∫[t=0,∞]{ 　 　 Coefficient[{

　 　 　 Π[i=1,m]{ 　 　 　 　 (∑[n=0,k-1]{ 　 　 　 　 　 ((p_i)t)^n/(n!) 　 　 　 　 })+u((e^((p_i)t)-∑[n=0,k-1]{ 　 　 　 　 　 ((p_i)t)^n/(n!) 　 　 　 　 }) 　 　 　 } 　 　 },u,q] 　 }dt } http://rio2016.5ch.net/test/read.cgi/math/1723152147/607

608: １３２人目の素数さん [sage] 2025/01/22(水) 22:09:31.01 ID:uDIYC3ub 自演までしてまた、自称旧二期校卒が荒らしに来た http://rio2016.5ch.net/test/read.cgi/math/1723152147/608

609: １３２人目の素数さん [sage] 2025/01/23(木) 14:37:17.68 ID:S3e4bqGA m=j=4種類, k=5人, 1人ごとの確率は p_i=0.1i={0.1, 0.2, 0.3, 0.4} として、期待値の式を整理し Wolfram Alphaに入力するとこうなる https://www.wolframalpha.com/input?i2d=true&i=Integrate%5B%5C%2840%291-Product%5B%5C%2840%291-%5C%2840%29Power%5Be%2C%5C%2840%29-0.1*i*t%5C%2841%29%5D%5C%2841%29Sum%5B%5C%2840%29Divide%5B%5C%2840%29Power%5B%5C%2840%290.1*i*t%5C%2841%29%2Cj%5D%5C%2841%29%2C%5C%2840%29j%21%5C%2841%29%5D%5C%2841%29%2C%7Bj%2C0%2C4%7

D%5D%5C%2841%29%2C%7Bi%2C1%2C4%7D%5D%5C%2841%29%2C%7Bt%2C0%2C%E2%88%9E%7D%5D 期待値の計算結果は 約51.685 …同じ問題の式を前にも書き込んだ気がする 次は中央値が知りたい、ということは シミュレーションの結果と照合したいのかな 同じ式をそのまま使うと、計算量が さらに大きくなりそう http://rio2016.5ch.net/test/read.cgi/math/1723152147/609

610: １３２人目の素数さん [sage] 2025/01/23(木) 14:52:32.72 ID:JUz7a/5J >>609 合致しました。 1634732562763605386291067536420444212007 Out[2]= ---------------------------------------- 31628711888294872089231360000000000000 In[3]:= %//N Out[3]= 51.6851 In[4]:= http://rio2016.5ch.net/test/read.cgi/math/1723152147/610

611: １３２人目の素数さん [sage] 2025/01/23(木) 14:59:19.94 ID:JUz7a/5J >>602 答が出せない椰子に命令するのは無駄だよなぁ。 サクッと答：最小値は１０と書けばいいのに。 計算できないアホ認定されちゃうぞ。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/611

612: １３２人目の素数さん [sage] 2025/01/23(木) 15:36:12.25 ID:SEZTC8QI >>611 スレタイ読めないアホに何言われても響かないよ 出題の日本語に違和感を持たないってことは同じ人かな http://rio2016.5ch.net/test/read.cgi/math/1723152147/612

613: １３２人目の素数さん [sage] 2025/01/23(木) 16:13:09.40 ID:4bJlO0EV >>611 スレタイ読めないことをそんなにバカにされたいのか http://rio2016.5ch.net/test/read.cgi/math/1723152147/613

614: １３２人目の素数さん [sage] 2025/01/23(木) 16:58:41.27 ID:KsZLjxOO これも前に書いた公式だけれど、いちおう 中央値を求めるには 確率の累積分布関数 P(B_j≦N) を表す以下のリンクの式を使う [ の直後、 ] の手前、 ∑ の上の3か所の 同じ整数が Nを表している 最小値 N=20 から1ずつ増やし、累積確率が はじめて 1/2=0.5 を超えた値が中央値となる 以下の式では、中央値の N=48 が代入されている https://www.wolframalpha.com/input?i=Coefficient%5B48%21*Product%5BSum%5B%28%28%280.1*i*t%29%5Ej%29%2F%28j%21%29%29%2C%7Bj%2

C5%2C%2848-15%29%7D%5D%2C%7Bi%2C1%2C4%7D%5D%2Ct%2C48%5D 最頻値を求める場合は ある N に対する度数 P(B_j=N) は 累積確率の N と N-1 の差分であるので これが最大となる値を探せばよい （式が長すぎて受け付けませんでした） http://rio2016.5ch.net/test/read.cgi/math/1723152147/614

615: １３２人目の素数さん [sage] 2025/01/23(木) 18:07:25.31 ID:JUz7a/5J >>614 ありがとうございます。 シミュレーションしての分布は https://i.imgur.com/Q87sUHn.png 分位数は 2.5% 50% 95% 97.5% 25 48 89 100 （中央値は48） になりました。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/615

616: １３２人目の素数さん [sage] 2025/01/23(木) 18:19:05.23 ID:JUz7a/5J シミュレーションでP(B_j=N)は 39 38 37 40 41 42 36 43 0.024106 0.024081 0.023868 0.023752 0.023691 0.023467 0.023465 0.023320 44 35 0.023143 0.022945 が得られましたのでこのシミュレーションでは 最頻値は３９となりました。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/616

617: １３２人目の素数さん [sage] 2025/01/23(木) 18:36:20.22 ID:4bJlO0EV 尿瓶劇場 http://rio2016.5ch.net/test/read.cgi/math/1723152147/617

618: １３２人目の素数さん [sage] 2025/01/23(木) 21:30:37.48 ID:EQAuvSFq 何で他のスレには書き込まなくなったんでしょうか？他のスレだと太刀打ち出来なくて追い詰められてるのでしょうか？ http://rio2016.5ch.net/test/read.cgi/math/1723152147/618

619: １３２人目の素数さん [sage] 2025/01/23(木) 22:14:16.12 ID:4bJlO0EV 自演が図星で何も言えない模様 http://rio2016.5ch.net/test/read.cgi/math/1723152147/619

620: １３２人目の素数さん [sage] 2025/01/24(金) 08:13:24.98 ID:g6kVd1oy 数学の知識が乏しくプログラムも稚拙なことを自覚しているから恥ずかしくて専門スレに書けない。それでも病的に自己顕示欲が強いので関係ないスレなのに書かずにいられない。。 旧二期校卒の医師と言う設定もその現れだろう。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/620

621: １３２人目の素数さん [sage] 2025/01/24(金) 08:20:47.88 ID:g6kVd1oy >>611 質問と出題の違いをレポートに纏めて提出せよ。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/621

622: １３２人目の素数さん [sage] 2025/01/24(金) 15:58:20.48 ID:VIJV9Iom >>611 なんだ？ サクッと答えを間違えているじゃないか。 所詮は「自称」旧二期校卒ですね。嗤いが止まらないよ。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/622

623: １３２人目の素数さん [sage] 2025/01/24(金) 16:15:06.26 ID:CUMnWpgJ 日本語のスレタイ読めないくらいだしまあ当然だわな http://rio2016.5ch.net/test/read.cgi/math/1723152147/623

624: １３２人目の素数さん [sage] 2025/01/24(金) 16:18:18.84 ID:oqbYUASM >>611 本当だ問題とかちゃんと読んで無かったけど 最小値4じゃねーの？どうやって計算して10になったの？ http://rio2016.5ch.net/test/read.cgi/math/1723152147/624

625: １３２人目の素数さん [sage] 2025/01/24(金) 16:26:04.21 ID:WCbmzKUH >>622 >>624 まんまと乗せられてやがる http://rio2016.5ch.net/test/read.cgi/math/1723152147/625

626: １３２人目の素数さん [sage] 2025/01/24(金) 17:07:40.70 ID:g6kVd1oy こんなんだから、専門スレだとプライドをズタズタにされて居られなくなったんだろう http://rio2016.5ch.net/test/read.cgi/math/1723152147/626

627: １３２人目の素数さん [sage] 2025/01/24(金) 17:31:00.70 ID:K/oP6O9u >>611の検算 >>609の公式の k=5 を k=10 に変えて 4つの血液型が10人ずつ、計40人揃うまでに 血液型を調べる人数の期待値を求めると 下記の式の値で、約 100.867 となる https://www.wolframalpha.com/input?i2d=true&i=Integrate%5B%5C%2840%291-Product%5B%5C%2840%291-%5C%2840%29Power%5Be%2C%5C%2840%29-0.1*i*t%5C%2841%29%5D%5C%2841%29Sum%5B%5C%2840%29Divide%5B%5C%2840%29Power%5B%5C%2840%290.1*i*t%5C%2841%29%2Cj%5D%5C%2841%29%2C%5C%2840%29

j%21%5C%2841%29%5D%5C%2841%29%2C%7Bj%2C0%2C10-1%7D%5D%5C%2841%29%2C%7Bi%2C1%2C4%7D%5D%5C%2841%29%2C%7Bt%2C0%2C%E2%88%9E%7D%5D http://rio2016.5ch.net/test/read.cgi/math/1723152147/627

628: １３２人目の素数さん [sage] 2025/01/24(金) 17:34:00.58 ID:K/oP6O9u Mathematica使いの人が https://rio2016.5ch.net/test/read.cgi/math/1733739984/840 で別の計算式を投稿しているので こちらの定数5を10に変えても計算できる 値は同じ http://rio2016.5ch.net/test/read.cgi/math/1723152147/628

629: １３２人目の素数さん [sage] 2025/01/24(金) 17:44:32.59 ID:K/oP6O9u 近似値だけ求めるならば 一番少ない血液型は AB型で10人に1人なので 10人集めるには10倍の100人必要 として計算できる 数字を2倍に増やして遊んでみた ただそれだけの問題ってこと http://rio2016.5ch.net/test/read.cgi/math/1723152147/629

630: １３２人目の素数さん [sage] 2025/01/24(金) 18:04:33.94 ID:K/oP6O9u 自分の用事は お医者さんが、10連ガチャの問題 https://rio2016.5ch.net/test/read.cgi/math/1703482355/482 に対してプログラムで書いたグラフ https://rio2016.5ch.net/test/read.cgi/math/1733739984/742 のことを聞きに来たのですが 問題文では 確率が最初の9回は [90,10/3,10/3,10/3] 10回目は当たり確定ガチャで [0,100/3,100/3,100/3] の10回1セットを繰り返すのですが プログラムではまだ、当たりの回が入っていない ということでいいですか？ 検算したら答えが違

っていたので http://rio2016.5ch.net/test/read.cgi/math/1723152147/630

631: １３２人目の素数さん [sage] 2025/01/24(金) 20:10:11.03 ID:g6kVd1oy サクッと答えを書けば良いのにと自分で書いておきながら、ダラダラと４連投 ダラボケの極み也 http://rio2016.5ch.net/test/read.cgi/math/1723152147/631

---

ﾒﾓ帳

(0/65535文字)

---

上下前次1-新書関写板覧索設栞歴

---

あと 360 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.050s