Dear

  I am trying to find a 90% credible interval. I am using the following
code.
   fit<-bugs(
   model.file=BUGScode,
   data=data,
   inits = list(geninits1,geninits2),
   parameters.to.save=keepers,
   n.chains=nchains,
   n.iter=runs,
   n.burnin=burn,
   n.thin=nthin,
   DIC= TRUE,
   bugs.directory="C:/Program Files/WINBUGS.14",


\
   )

   But this is only giving 95% credible interval. How can I get 90%, 80%
   credible intervals using r2winbugs?

   Pls help.

   Waiting for your response.

   Satrajit

	[[alternative HTML version deleted]]


