Displaying 10 results from an estimated 10 matches for "clearwd".
Did you mean:
cleared
2008 Feb 29
1
bugs.seed= and summary.only= option in R2WinBUGS
...gram runs fine. I am using R2.5.1 and WinBUGs14.
The program is not running:
> schools.sim <- bugs(data, inits, parameters, model.file,
+ n.chains=3, n.iter=5000, bugs.seed=100,
+ bugs.directory="c:/Program Files/WinBUGS14/",
+ working.directory=NULL, clearWD=TRUE)
Error in bugs(data, inits, parameters, model.file, n.chains = 3, n.iter
= 5000, :
unused argument(s) (bugs.seed = 100)
The program is not running:
> schools.sim <- bugs(data, inits, parameters, model.file,
+ n.chains=3, n.iter=5000, summary.only=TRUE,
+ bug...
2007 Jul 21
1
R2WinBUGS awkward to use
...like I am also using the 'inits' object!
If I use 'model' in the same way as I use 'inits' I am getting the error:
> sim <- bugs(data, inits, parameters, model, n.chains=1, n.iter=5000,
bugs.directory="c:/Program Files/WinBUGS14", working.directory=NULL,
clearWD=TRUE, DIC=0)
Error in file.exists(c(...)) : invalid 'file' argument
Thanks Toby
data <- list(.....)
model <- function() {
[omitted]
}
write.model(model, "cwk.txt")
inits <- function() {.....}
parameters <- c("b", "nu", "S1"...
2008 Jan 31
1
R2WinBUGS is broken
...on()
list(theta=rnorm(J,0,100), mu.theta=rnorm(1,0,100),
sigma.theta=runif(1,0,100))
parameters <- c('theta', 'mu.theta', 'sigma.theta')
schools.sim <- bugs(data, inits, parameters, model.file='schools.bug',
n.chains=3, n.iter=1000, clearWD=TRUE)
## schools.sim <- bugs(data, inits, parameters, model.file='schools.bug',
## n.chains=3, n.iter=1000, clearWD=TRUE,
## program = 'openbugs')
print(schools.sim)
plot(schools.sim)
Error in matrix(unlist(mx), ncol = n.cols, byrow = TR...
2006 Apr 29
3
Making R talk to Win/OpenBUGS in Linux (again)
....theta = runif(1, 0, 100))
}
parameters <- c("theta", "mu.theta", "sigma.theta")
schools.sim <- bugs(data, inits, parameters, model.file, n.chains = 3,
n.iter = 1000,bugs.directory = "/usr/local/share/WinBUGS14/",
working.directory = "/tmp", clearWD = FALSE, useWINE=T, newWINE=T,
WINE="/usr/bin/wine",WINEPATH="/usr/bin/winepath")
I do have the binary "/usr/bin/winepath", but can't tell how to give
R2WinBUGS what it wants. Many failed efforts below:
> schools.sim <- bugs(data, inits, parameters, mod...
2005 Nov 09
2
About: Error in FUN(X[[1]], ...) : symbol print-name too long
...;d2.bug",
n.chains = 1, n.iter = 5000, n.burnin = floor(n.iter/2),
n.thin = max(1, floor(n.chains * (n.iter - n.burnin)/1000)),
bin = (n.iter - n.burnin) / n.thin,
debug = TRUE, DIC = TRUE, digits = 5, codaPkg = FALSE,
bugs.directory = "C:/WinBUGS14/",
working.directory = NULL, clearWD = FALSE)
The objective of the program is to compare means of two independent samples
that results
in Beherens-Fisher posterior and in the model.file of WinBUGS "d2.bug"
there is the following codes:
model
{
for( i in 1 : 30 ) {
x[i] ~ dnorm(mu1,sig1)
}
for(...
2007 Oct 26
1
bugs() ignores my inits
...0.585, m2=0.718, m3=0.672, m4=0.639),list(m1=0.585,
m2=0.718, m3=0.672, m4=0.639))
parameters <- c("m1", "m2", "m3", "m4", "sig21", "sig22")
bugs1 <- bugs(data, inits, parameters, "example.txt", n.chains=2, n.iter=15000,
clearWD=TRUE, debug=1, DIC=0)
display(log)
check(J:/project/ps/code/example.txt)
model is syntactically correct
data(J:/project/ps/code/data.txt)
data loaded
compile(2)
model compiled
inits(1,J:/project/ps/code/inits1.txt)
this chain contains uninitialized variables
inits(2,J:/project/ps/code/inits2....
2010 Jan 19
1
Help on using WinBUGS on Mac
...ters, model.file="schoolsmodel.bug",
n.chains=3, n.iter=1000,
bugs.directory="/Applications/WinBUGS14",
WINE="/Applications/Darwine/Wine.bundle/Contents/bin/wine",
WINEPATH="/Applications/Darwine/Wine.bundle/Contents/bin/winepath",
useWINE=TRUE,clearWD=FALSE)
It still did not work, and the same error message occurred, plus some error
message from R:
fixme:keyboard:RegisterHotKey (0x10058,13,0x00000002,3): stub
err:ole:CoGetClassObject class {0003000a-0000-0000-c000-000000000046}
not registered
err:ole:CoGetClassObject class {0003000a-0000-...
2006 Nov 30
0
R2WinBUGS - parameter monitor seting
...rite some looping
code rather than cut and paste 100 times..can anyone help?
thanks
doug
R-code:
bayesimp.sim <- bugs(data, inits, parameters,"bayesimp.bug",
n.chains = 1, n.iter = 4000,
bugs.directory = "c:/Program Files/WinBUGS14/",
working.directory = NULL, clearWD = TRUE, debug = TRUE)
script.txt:
display ('log')
check ('D:/Work/SpatialEpi/Water/THM Imputation/Rwork/bayesimp.txt')
data ('D:/Work/SpatialEpi/Water/THM Imputation/Rwork/data.txt')
compile (1)
inits (1, 'D:/Work/SpatialEpi/Water/THM Imputation/Rwork/inits1.txt')...
2008 Aug 15
1
Question on default link directory
Hi,
I have got a problem with running WinBugs from R.
Following WinBugs project recommendations for Vista Microcoft, I
installed my Winbugs software at C:\ (not at C:\Program Files).
However, when I run the attached code in R, R still looks for Winbugs
at C:\Program Files and ends up in numerous error messages.
I wonder if it is possible to direct R to C:\WinBUGS14 instead of
default link to
2006 Oct 09
1
winbugs - R question
...I","J","m")
parameters<-c("b","tau")
a<-bugs(data=data, inits=inits, parameters, model.file="c:/try/sur.txt", n.chains = 3, n.iter = 1000, bugs.directory = "c:/Program Files/WinBUGS14/", working.directory = "c:/try", clearWD = FALSE,codaPkg = FALSE,debug=T)
model
{
for (i in 1:n)
{
Y[i,1:2] ~ dmnorm(mu[i,],P[1:2,1:2])
# means in separate time series
mu[i,1] <- inprod(X1[i,],b[,1])
mu[i,2] <- inprod(X2[i,],b[,2])
P[1:2,1:2]<-tau*I[1:2,1:2]
}...