[R] About: Error in FUN(X[[1]], ...) : symbol print-name too long

[gsmatos1]

Hi, 

I´m trying to use the Win2BUGS package from R and I have a similar problem 
that reurns with the message: 

Error in FUN(X[[1]], ...) : symbol print-name too long 

But, there is no stray ` character in the file ( Sugestions given by: Duncan 
Temple Lang <duncan> 
Date: Mon, 26 Sep 2005 07:31:08 -0700 ) 

The progam in R is: 

library(R2WinBUGS) 
library(rbugs) 

dat <- 
list(x=c(49,48,50,44,54,56,48,48,51,51,50,53,51,50,51,54,50,53,50,49,51,47,53,50,49,55,53,48,54,46), 
y=c(50,49,57,52,47,52,58,45,55,54,51,54,56,53,52,47,51,54,50,47,46,44,54,55,52,57,52,48,48,51)) 

dat  <- format4Bugs(dat, digits = 0) 
parm <- c("lbda") 

bugs(dat, inits=list(NULL), parm, "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( i in 1 : 30 ) { 
      y[i] ~ dnorm(mu2,sig2) 
   } 
   mu1 ~ dnorm(50,1.0E-6) 
   sig1 ~ dgamma(0.001,0.001) 
   mu2 ~ dnorm(50,1.0E-6) 
   sig2 ~ dgamma(0.001,0.001) 
   lbda <- mu1 - mu2 
} 

  I´m a new user of WinBUGS and if someone detect error in the model codes 
too, I´m grateful. 

	Thanks for help! 
	Gilberto Matos. 
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: not available
Url: https://stat.ethz.ch/pipermail/r-help/attachments/20051109/5490e606/attachment.pl