[過去ログ]
臨床統計もおもしろいですよ、その2 (1002レス)
上
下
前
次
1-
新
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
510
: 2018/12/16(日)20:30
ID:/hMzfoFS(8/9)
AA×
[240|
320
|
480
|
600
|
100%
|
JPG
|
べ
|
レス栞
|
レス消
]
510: [sage] 2018/12/16(日) 20:30:27 ID:/hMzfoFS # ネットワークノード1..j..N # ネットワーク内の客の数1..k..K、 # ノードjでの平均客数L[k,j]、通過時間W[k,j]、到着率lambda[k,j] # mu[j]:サービス率,r[i,j]ノードiからjへの移行確率 # theta[j] = Σtheta[i](i=1,N) * r[i,j] の解がtheta rm(list=ls()) theta=c(0.6,0.4) mu=c(0.6,0.4) N=2 K=10 L=W=lambda=matrix(rep(NA,N*K),ncol=N) k=1 for(j in 1:N){ W[k,j]=1/mu[j]*(1+0) } tmp=numeric(N) for(j in 1:N){ tmp[j]=theta[j]*W[k,j] } den=sum(tmp) lambda[k,1]=k/den for(j in 2:N){ lambda[k,j]=theta[j]*lambda[k,1] } for(j in 1:N){ L[k,j]=lambda[k,j]*W[k,j] } http://egg.5ch.net/test/read.cgi/hosp/1540905566/510
ネットワークノード ネットワーク内の客の数 ノードでの平均客数通過時間到着率 サービス率ノードからへの移行確率 の解が
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 492 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
ぬこの手
ぬこTOP
0.023s