weight using food and group size m1 <- map2stan( alist( weight ~ dnorm( mu , sigma ) , mu <- a + bf*avgfood + bg*groupsize, a ~ dnorm(0,100), bf ~ dnorm(0,1), bg ~ dnorm(0,1), sigma ~ dcauchy(0,1) ) , data=d , start=list( a=mean(d$weight), bf=0,bg=0,sigma=sd(d$weight)) , warmup=1000 , iter=11000 , chains=2 ) m2 <- map2stan( alist( weight ~ dnorm( mu , sigma ) , mu <- a + bf*avgfood + bg*groupsize, a ~ dnorm(0,100), bf ~ dlaplace(0,1), bg ~ dlaplace(0,1), sigma ~ dcauchy(0,1) ) , data=d , start=list( a=mean(d$weight), bf=0,bg=0,sigma=sd(d$weight)) , warmup=1000 , iter=11000 , chains=2 )