CDOoDocuments.StdDocumentDescDocuments.DocumentDescContainers.ViewDescViews.ViewDescStores.StoreDescDocuments.ModelDescContainers.ModelDescModels.ModelDescStores.ElemDesc TextViews.StdViewDescTextViews.ViewDescTextModels.StdModelDescTextModels.ModelDescQTextModels.AttributesDesc*7 model { mu~dflat() logsigma~dflat() sigma<-exp(logsigma) tau<-exp(-2*logsigma) X1~dnorm(mu,tau) I(3.5,4.5) X2~dnorm(mu,tau) I(2.5,3.5) X3~dnorm(mu,tau) I(2.5,3.5) X4~dnorm(mu,tau) I(1.5,2.5) X5~dnorm(mu,tau) I(2.5,3.5) Xnew~dnorm(mu,tau) Ynew<-round(Xnew) prob<-phi((1.0-mu)/sigma) } #here are 4 possible initializations list(mu=7,logsigma=2,Xnew=7,X1=4,X2=4,X3=4,X4=2,X5=3) list(mu=7,logsigma=-2,Xnew=7,X1=4,X2=4,X3=4,X4=2,X5=3) list(mu=2,logsigma=2,Xnew=2,X1=2,,X1=4,X2=4,X3=4,X4=2,X5=3) list(mu=2,logsigma=-2,Xnew=2,,X1=4,X2=4,X3=4,X4=2,X5=3) TextControllers.StdCtrlDescTextControllers.ControllerDescContainers.ControllerDescControllers.ControllerDesc TextRulers.StdRulerDescTextRulers.RulerDescTextRulers.StdStyleDescTextRulers.StyleDescZTextRulers.AttributesDesc$0ZGo * <[ @Documents.ControllerDesc vz pk ~