20/03/16 08:14:56.44 CVVw1pKV.net
単なる連立方程式を解くだけだから、つまらんね。
問題 ： ある都市でピーク時に外来1000人、入院600人、重症20人であったとすると、この都市の14歳以下の人口は何人と推測されるか？
v=c(0.18,0.29,0.51,
0.05,0.02,0.56,
0.002,0.001,0.018)
(mat=matrix(v*100,3,3,byrow=T))
# URLﾘﾝｸ(www.toukei.metro.tokyo.lg.jp)
(x=matrix(c(1601348,9035668,3103714)/1e4,ncol=1))
(y=round(mat%*%x))
solve(mat,y)
y=matrix(c(1000,600,20))
solve(mat,y)