[過去ﾛｸﾞ] 臨床統計もおもしろいですよ、その2 (1002ﾚｽ)
上下前次1-新

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

885: 2020/01/30(木)23:51 ID:m/EdOA9B(5/6) AA×


[240|320|480|600|100%|JPG|べ|ﾚｽ栞|ﾚｽ消]
885: [sage] 2020/01/30(木) 23:51:43 ID:m/EdOA9B #Reed-Frost Model ReedFrost=function( p=0.04, N=100, T=40) { q=1-p I=numeric(T) S=numeric(T) I[1]=1 S[1]=N-I[1] for(t in 1:(T-1)){ I[t+1]=S[t]*(1-q^I[t]) S[t+1]=S[t]-I[t+1] } plot(1:T,I,type="l",lwd=2, ylim=c(0,N),xlab="time",ylab="persons",main=paste("Reed-Frost Model p= ",p)) lines(S,lty=2,col=2,lwd=2) lines(N-S,lty=3,col=3,lwd=2) legend("topright",bty="n",legend=c("Infected","Susceptible","Immunized"),lty=1:3,col=1:3,lwd=2) } par(mfrow=c(1,2)) ReedFrost(0.04) ReedFrost(0.015) ReedFrost(0.30) ReedFrost(0.03) ReedFrost(0.003) http://egg.5ch.net/test/read.cgi/hosp/1540905566/885

---

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

---

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

---

ぬこの手 ぬこTOP 0.021s