WinBUGS14をRから呼び出す

Question

RからWinBUGSを呼び出そうとしていますが、うまくいっていません。私はRで、このコードを入力した

：次に

radon.data <- list ("n", "J", "x", "y", "county") 
radon.inits <- function(){ 
    list (a=rnorm(J), b=rnorm(1), mu.a=rnorm(1), 
     sigma.y=runif(1), sigma.a=runif(1)) 
} 
radon.parameters <- c ("a", "b", "mu.a", "sigma.y", "sigma.a") 

を、私はWinBUGSを呼び出す：

radon.bugs.1 <- bugs (radon.data, radon.inits, radon.parameters, "radon.1.bug", n.iter=10, 
     bugs.directory="C:/Program Files/WinBUGS14", working.directory=NULL, clearWD=TRUE, debug=TRUE) 

そして、私はWinBUGSでエラーを以下の取得：

set(sigma.y) 
command #Bugs:set cannot be executed (is greyed out) 
set(sigma.a) 
command #Bugs:set cannot be executed (is greyed out) 
set(deviance) 
command #Bugs:set cannot be executed (is greyed out) 
dic.set() 
command #Bugs:dic.set cannot be executed (is greyed out) 
update(5) 
command #Bugs:update cannot be executed (is greyed out) 
coda(*,C:/Users/Gabriel/AppData/Local/Temp/Rtmpf1rAQa/coda) 
command #Bugs:coda cannot be executed (is greyed out) 
stats(*) 
command #Bugs:stats cannot be executed (is greyed out) 
dic.stats() 

DIC 
history(*,C:/Users/Gabriel/AppData/Local/Temp/Rtmpf1rAQa/history.odc) 
command #Bugs:history cannot be executed (is greyed out) 
save(C:/Users/Gabriel/AppData/Local/Temp/Rtmpf1rAQa/log.odc) 
save(C:/Users/Gabriel/AppData/Local/Temp/Rtmpf1rAQa/log.txt) 

私は感謝します誰かが私を助けることができたら。私のファイルが同じです

Answer 1

これらのエラーメッセージは、あなたのバグがコンパイルされていない場合に発生します。モデルを起動して実行できるようになるまで、まずWinBUGSで作業してみてください。

model{ 
    .... 
    bayesian model 
    .... 
} 

部分を.bugファイルとして保存します。