Hi List,
I trying an example from pumps{rbugs} with .Renviron in $HOME adjusted
for my box:
WINE="/usr/bin/wine",
BUGS="/usr/local/bin/WinBugs14/winbugs.exe"
data(pumps)
pumps.data <- list(t = pumps$t, x = pumps$x, N = nrow(pumps))
pumps.model <- file.path(.path.package("rbugs"),
"bugs/model",
"pumps.bug")
#file.show(pumps.model)
pumps.inits <- file.path(.path.package("rbugs"),
"bugs/inits",
"pumps.txt")
#file.show(pumps.inits)
inits <- list(dget(pumps.inits))
parameters <- c("theta", "alpha", "beta")
pumps.sim <- rbugs(data = pumps.data, inits, parameters,
pumps.model, n.chains = 1, n.iter = 1000,
workingDir="tmp",
bugsWorkingDir="tmp",
#WINE="/usr/bin/wine",
#BUGS="/usr/local/bin/openbugs/winbugs.exe",
useWine=TRUE)
## End(Not run)
I get " error in rbugs(data=pumps.data,inits,parameters,
pumps.model,n.chains=1:
wine executable does not exists. "
However, /usr/bin/wine /usr/local/bin/WinBugs14/winbugs.exe starts up
winbugs.
I am running opensuse 10.3 with R 2.6.2 (2007-11-26), winbugs 1.4.3 (6th
August, 2007).
Any ideas on what goes wrong?
Thanks
Herry
Dr Alexander Herr - Herry
CSIRO, Sustainable Ecosystems
Gungahlin Homestead
Bellenden Street
GPO Box 284
Crace, ACT 2601
Phone/www
(02) 6242 1542; 6242 1705(fax)
0408679811 (mob)
home: www.csiro.au/people/Alexander.Herr
Webadmin ABS: http://ausbats.org.au
Sustainable Ecosystems: www.cse.csiro.au
--------------------------------------------
Dr Alexander Herr - Herry
CSIRO, Sustainable Ecosystems
Gungahlin Homestead
Bellenden Street
GPO Box 284
Crace, ACT 2601
Phone/www
(02) 6242 1542; 6242 1705(fax)
0408679811 (mob)
home: www.csiro.au/people/Alexander.Herr
Webadmin ABS: http://ausbats.org.au
Sustainable Ecosystems: www.cse.csiro.au