Bayesian pooling for analyzing categorical data from small areas
Section 4. Conclusion

In this study, we construct hierarchical parametric Bayesian pooling models and their nonparametric versions using the Ferguson (1973) Dirichlet process prior to pool the data. The pooling methodologies developed here are useful for analyzing survey data. We used the grid method to draw the parameters with nonstandard posterior densities and support that lies in a finite interval. However, we used the Metropolis-Hastings algorithm to draw the parameters with support in an infinite interval.

The Dirichlet process is assumed for the parameter of interest π i , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHapWaaSbaaSqaaiaadMgaaeqaaO Gaaiilaaaa@345C@ for i = 1, , I , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGPbGaaGjbVlaai2dacaaMe8UaaG ymaiaaiYcacaaMe8UaeSOjGSKaaiilaiaaysW7caWGjbGaaiilaaaa @3DE6@ in our models. We apply the slice sampling algorithm for the specification of Dirichlet process prior, which is an extension of the widely used stick-breaking prior proposed by Ishwaran and James (2001). Five parametric models are modeled in a finite-dimensional parameter space, and three nonparametric versions have an infinite-dimensional parameter space. The eight hierarchical Bayesian models are also distinguished according to the type of effects in the model parameters. For the basic model (2.1), we can construct more effective and efficient models that allow for a borrowing effect from neighboring areas in small-area estimations. However, exchangeable priors in a hierarchical Bayesian model may cause an overshrinkage problem. To compensate for this problem, the effect of a parameter is divided into two elements, as shown in the basic model (2.2), called the hierarchical Bayesian global-local pooling model. The model allows for grouping of similar experiments (area) and the borrowing of information in each area.

To compare the eight models using real data, we use the BMD data provided by the NHANES III. BMD is statistically correlated with the probability of fractures, which are an important public health problem, especially in elderly women. Therefore, BMD is an important indicator in diagnoses of osteoporosis, where patients might benefit from early management to improve their bone strength. For each sample, we assign an indicator based on three categories (normal, osteopenia, osteoporosis) before analyzing the data. The resulting hierarchical models with a pooling prior for BMD data outperformed the other models. To compare the models’ performances, we calculated the DIC and the LCPO. Here, we found the best performance in the global MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfKttLearuat1nwAKfgidfgBSL2zYfgCOL harmqr1ngBPrgitLxBI9gBamXvP5wqSXMqHnxAJn0BKvguHDwzZbqe gm0B1jxALjhiov2DaeHbuLwBLnhiov2DGi1BTfMBaebbfv3ySLgzGu eE0jxyaibaieYlf9irVeeu0dXdh9vqqj=hEeeu0xXdbba9frFj0=Oq Ffea0dXdd9vqaq=JfrVkFHe9pgea0dXdar=Jb9hs0dXdbPYxe9vr0= vr0=vqpWqaaeaabiGaciaacaqabeaadaabauaaaOqaaGabaKqzGfae aaaaaaaaa8qacaWFtacaaa@453B@ local pooling model. Although the nonparametric versions of the models have an infinite-dimensional parameter space, they showed similar values for the two comparison measures to those of the parametric pooling model with a finite-dimensional parameter space. Therefore, we should be careful in interpreting the results.

Acknowledgements

This work was supported by the National Research Foundation of Korea (NRF) grant funded by the Korea government (MSIT) (2016R1D1A1B03932261). This research was also supported by a grant from the Simons Foundation (#353953, Balgobin Nandram).

Appendix

A. Computations for parameteric models

Let n = ( n 1 , , n I ) MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHUbGaaGjbVlaai2dacaaMe8+aae WabeaacaWHUbWaaSbaaSqaaiaaigdaaeqaaOGaaGilaiaaysW7cqWI MaYscaGGSaGaaGjbVlaah6gadaWgaaWcbaGaamysaaqabaaakiaawI cacaGLPaaadaahaaWcbeqaaOGamai2gkdiIcaaaaa@443A@ be the response matrix and π = ( π 1 , , π I ) MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHapGaaGjbVlaai2dacaaMe8+aae WabeaacaWHapWaaSbaaSqaaiaaigdaaeqaaOGaaGilaiaaysW7cqWI MaYscaGGSaGaaGjbVlaahc8adaWgaaWcbaGaamysaaqabaaakiaawI cacaGLPaaadaahaaWcbeqaaOGamai2gkdiIcaaaaa@4539@ be the proportion parameter matrix for (2.1). In an adaptive pooling model, let Ω i = ( π i , μ , τ ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHPoWaaSbaaSqaaiaadMgaaeqaaO GaaGjbVlaai2dacaaMe8+aaeWabeaacaWHapWaaSbaaSqaaiaadMga aeqaaOGaaGilaiaaysW7caWH8oGaaGilaiaaysW7cqaHepaDaiaawI cacaGLPaaacaGGSaaaaa@43B3@ i = 1, , I . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGPbGaaGjbVlaai2dacaaMe8UaaG ymaiaaiYcacaaMe8UaeSOjGSKaaiilaiaaysW7caWGjbGaaiOlaaaa @3DE8@ Here, no pooling and complete pooling are special cases of adaptive pooling, with parameters μ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oaaaa@3284@ and τ . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDcaGGUaaaaa@33B3@ The full conditional posterior density of the parameters for the given data is obtained in the usual way by combining the likelihood and the priors, as follows:

π ( Ω 1 , , Ω I | n ) { i = 1 I f ( n | π i ) π ( π i ) } π ( μ , τ ) i = 1 I { 1 D ( μ τ ) k = 1 K π i k n i k + μ k τ 1 } ( K 1 ) ! ( τ + 1 ) 2 , MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaafaqaaeGacaaabaGaeqiWda3aaeWabe aadaabceqaaiaahM6adaWgaaWcbaGaaGymaaqabaGccaaISaGaaGjb VlablAciljaacYcacaaMe8UaaCyQdmaaBaaaleaacaWGjbaabeaaki aaykW7aiaawIa7aiaaykW7caWHUbaacaGLOaGaayzkaaaabaGaeyyh Iu7aaiWabeaadaqeWbqaaiaadAgadaqadeqaamaaeiqabaGaaCOBai aaykW7aiaawIa7aiaaykW7caWHapWaaSbaaSqaaiaadMgaaeqaaaGc caGLOaGaayzkaaGaeqiWda3aaeWabeaacaWHapWaaSbaaSqaaiaadM gaaeqaaaGccaGLOaGaayzkaaaaleaacaWGPbGaaGypaiaaigdaaeaa caWGjbaaniabg+GivdaakiaawUhacaGL9baacaaMe8UaeqiWda3aae WabeaacaWH8oGaaGilaiaaysW7cqaHepaDaiaawIcacaGLPaaaaeaa aeaacqGHDisTdaqeWbqaamaacmqabaWaaSaaaeaacaaIXaaabaGaam iramaabmqabaGaaCiVdiabes8a0bGaayjkaiaawMcaaaaadaqeWbqa aiabec8aWnaaDaaaleaacaWGPbGaam4Aaaqaaiaad6gadaWgaaadba GaamyAaiaadUgaaeqaaSGaey4kaSIaeqiVd02aaSbaaWqaaiaadUga aeqaaSGaeqiXdqNaeyOeI0IaaGymaaaaaeaacaWGRbGaaGypaiaaig daaeaacaWGlbaaniabg+GivdaakiaawUhacaGL9baacaaMe8+aaSaa aeaadaqadeqaaiaadUeacaaMe8UaeyOeI0IaaGjbVlaaigdaaiaawI cacaGLPaaacaaIHaaabaWaaeWabeaacqaHepaDcaaMe8Uaey4kaSIa aGjbVlaaigdaaiaawIcacaGLPaaadaahaaWcbeqaaiaaikdaaaaaaO GaaGilaaWcbaGaamyAaiaai2dacaaIXaaabaGaamysaaqdcqGHpis1 aaaaaaa@9D94@

where D ( μ τ ) = k = 1 K Γ ( μ k τ ) / Γ ( k = 1 K μ k τ ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGebWaaeWabeaacaWH8oGaeqiXdq hacaGLOaGaayzkaaGaaGjbVlaai2dacaaMe8+aaebmaeaadaWcgaqa aiabfo5ahnaabmqabaGaeqiVd02aaSbaaSqaaiaadUgaaeqaaOGaeq iXdqhacaGLOaGaayzkaaaabaGaeu4KdC0aaeWabeaadaaeWaqaaiab eY7aTnaaBaaaleaacaWGRbaabeaakiabes8a0bWcbaGaam4Aaiaai2 dacaaIXaaabaGaam4saaqdcqGHris5aaGccaGLOaGaayzkaaaaaaWc baGaam4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHpis1aOGaaiOlaa aa@54F6@

To run a Gibbs sampler, we draw values as follows:

(a)
Full conditional for π i , i = 1, , I : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHapWaaSbaaSqaaiaadMgaaeqaaO GaaGilaiaaysW7caWGPbGaaGjbVlaai2dacaaMe8UaaGymaiaaiYca caaMe8UaeSOjGSKaaiilaiaaysW7caWGjbGaaGPaVlaacQdaaaa@4432@ Draw π i | n i , μ , τ ~ Dirichlet ( ( n i + μ ) τ ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaabceqaaiaahc8adaWgaaWcbaGaam yAaaqabaGccaaMc8oacaGLiWoacaaMc8UaaCOBamaaBaaaleaacaWG PbaabeaakiaaiYcacaaMe8UaaCiVdiaaiYcacaaMe8UaeqiXdqNaaG jbVJqaaiaa=5hacaaMe8oeaaaaaaaaa8qacaqGebGaaeyAaiaabkha caqGPbGaae4yaiaabIgacaqGSbGaaeyzaiaabshapaWaaeWabeaada qadeqaaiaah6gadaWgaaWcbaGaamyAaaqabaGccaaMe8Uaey4kaSIa aGjbVlaahY7aaiaawIcacaGLPaaacaaMc8UaeqiXdqhacaGLOaGaay zkaaGaaiOlaaaa@5D00@
(b)
Full conditional for μ : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oGaaGPaVlaacQdaaaa@34CD@ Draw

π ( μ | n , π , τ ) i = 1 I { Γ ( k = 1 K μ k τ ) k = 1 K Γ ( μ k τ ) k = 1 K π i k μ k τ 1 } . ( A .1 ) MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaaC iVdiaaykW7aiaawIa7aiaaykW7caWHUbGaaGilaiaaysW7caWHapGa aGilaiaaysW7cqaHepaDaiaawIcacaGLPaaacaaMe8UaaGPaVlabg2 Hi1kaaysW7caaMc8+aaebCaeaadaGadeqaamaalaaabaGaeu4KdC0a aeWabeaadaaeWaqaaiabeY7aTnaaBaaaleaacaWGRbaabeaakiabes 8a0bWcbaGaam4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHris5aaGc caGLOaGaayzkaaaabaWaaebmaeaacqqHtoWrdaqadeqaaiabeY7aTn aaBaaaleaacaWGRbaabeaakiabes8a0bGaayjkaiaawMcaaaWcbaGa am4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHpis1aaaakmaarahaba GaeqiWda3aa0baaSqaaiaadMgacaWGRbaabaGaeqiVd02aaSbaaWqa aiaadUgaaeqaaSGaeqiXdqNaeyOeI0IaaGymaaaaaeaacaWGRbGaaG ypaiaaigdaaeaacaWGlbaaniabg+GivdaakiaawUhacaGL9baacaaI UaaaleaacaWGPbGaaGypaiaaigdaaeaacaWGjbaaniabg+GivdGcca aMf8UaaGzbVlaaywW7caaMf8UaaGzbVlaacIcacaGIbbGaaiOlaiaa igdacaGGPaaaaa@87B7@

Let μ (k) ,k=1,,K MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oWaaSbaaSqaaiaacIcacaWGRb GaaiykaaqabaGccaaISaGaaGjbVlaadUgacaaMe8UaaGypaiaaysW7 caaIXaGaaGilaiaaysW7cqWIMaYscaGGSaGaaGjbVlaadUeaaaa@4344@ denote the vector of parameters other than the k th MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGRbWaaWbaaSqabeaacaqG0bGaae iAaaaaaaa@343B@ component μ k . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH8oqBdaWgaaWcbaGaam4Aaaqaba GccaGGUaaaaa@34CA@ Then, we obtain the conditional posterior density of μ k , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH8oqBdaWgaaWcbaGaam4Aaaqaba GccaGGSaaaaa@34C8@ given μ (k) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oWaaSbaaSqaaiaacIcacaWGRb GaaiykaaqabaGccaGGSaaaaa@35B3@ in each stage. Here, we need to estimate the K 1 MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGlbGaaGjbVlabgkHiTiaaysW7ca aIXaaaaa@36CE@ components of parameter μ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oaaaa@3284@ sequentially. Then, we can calculate the K th MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGlbWaaWbaaSqabeaacaqG0bGaae iAaaaaaaa@341B@ component value of μ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oaaaa@3284@ using μ K = 1 k = 1 K 1 μ k . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH8oqBdaWgaaWcbaGaam4saaqaba GccaaMe8UaaGypaiaaysW7caaIXaGaaGjbVlabgkHiTiaaysW7daae WaqaaiabeY7aTnaaBaaaleaacaWGRbaabeaaaeaacaWGRbGaaGypai aaigdaaeaacaWGlbGaeyOeI0IaaGymaaqdcqGHris5aOGaaiOlaaaa @470A@ Using the conditional posterior density (3.1), we can draw μ k , k = 1, , K 1 MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH8oqBdaWgaaWcbaGaam4Aaaqaba GccaaISaGaaGjbVlaadUgacaaMe8UaaGypaiaaysW7caaIXaGaaGil aiaaysW7cqWIMaYscaGGSaGaaGjbVlaadUeacaaMe8UaeyOeI0IaaG jbVlaaigdaaaa@471B@ using the grid method, with support 1 k = 1, k k K 1 μ k . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaaIXaGaaGjbVlabgkHiTiaaysW7da aeWaqaaiabeY7aTnaaBaaaleaaceWGRbGbauaaaeqaaaqaaiqadUga gaqbaiaai2dacaaIXaGaaGilaiaaysW7ceWGRbGbauaacqGHGjsUca WGRbaabaGaam4saiabgkHiTiaaigdaa0GaeyyeIuoakiaac6caaaa@467B@

(c)
Full conditional for τ : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDcaaMc8UaaiOoaaaa@354A@ Draw

π ( τ | n , π , μ ) i = 1 I { Γ ( k = 1 K μ k τ ) k = 1 K Γ ( μ k τ ) k = 1 K π i k μ k τ 1 } 1 ( τ + 1 ) 2 . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaeq iXdqNaaGPaVdGaayjcSdGaaGPaVlaah6gacaaISaGaaGjbVlaahc8a caaISaGaaGjbVlaahY7aaiaawIcacaGLPaaacaaMc8UaaGjbVlabg2 Hi1kaaykW7caaMe8+aaebCaeaadaGadeqaamaalaaabaGaeu4KdC0a aeWabeaadaaeWaqaaiabeY7aTnaaBaaaleaacaWGRbaabeaakiabes 8a0bWcbaGaam4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHris5aaGc caGLOaGaayzkaaaabaWaaebmaeaacqqHtoWrdaqadeqaaiabeY7aTn aaBaaaleaacaWGRbaabeaakiabes8a0bGaayjkaiaawMcaaaWcbaGa am4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHpis1aaaakiaaysW7da qeWbqaaiabec8aWnaaDaaaleaacaWGPbGaam4AaaqaaiabeY7aTnaa BaaameaacaWGRbaabeaaliabes8a0jabgkHiTiaaigdaaaaabaGaam 4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHpis1aaGccaGL7bGaayzF aaGaaGjbVpaalaaabaGaaGymaaqaamaabmqabaGaeqiXdqNaaGjbVl abgUcaRiaaysW7caaIXaaacaGLOaGaayzkaaWaaWbaaSqabeaacaaI Yaaaaaaakiaai6caaSqaaiaadMgacaaI9aGaaGymaaqaaiaadMeaa0 Gaey4dIunaaaa@8932@

We can use the grid method for τ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDaaa@3301@ in this case as well. Because the grid method can be used for closed support, we transform τ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDaaa@3301@ to ρ = 1 / ( 1 + τ ) , 0 < ρ < 1. MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHbpGCcaaMe8UaaGypaiaaysW7da WcgaqaaiaaigdaaeaadaqadeqaaiaaigdacaaMe8Uaey4kaSIaaGjb Vlabes8a0bGaayjkaiaawMcaaaaacaaISaGaaGjbVlaaicdacaaMe8 UaaGipaiaaysW7cqaHbpGCcaaMe8UaaGipaiaaysW7caaIXaGaaiOl aaaa@4D9E@ The absolute Jacobian is 1 / ρ 2 . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaWcgaqaaiaaigdaaeaacqaHbpGCda ahaaWcbeqaaiaaikdaaaaaaOGaaiOlaaaa@3572@ Then, the conditional posterior density of ρ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHbpGCaaa@32FC@ can be expressed as follows:

π ( ρ | n , π , μ ) i = 1 I { Γ ( k = 1 K μ k 1 ρ ρ ) k = 1 K Γ ( μ k 1 ρ ρ ) k = 1 K π i k μ k 1 ρ ρ 1 } . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaeq yWdiNaaGPaVdGaayjcSdGaaGPaVlaah6gacaaISaGaaGjbVlaahc8a caaISaGaaGjbVlaahY7aaiaawIcacaGLPaaacaaMe8UaaGPaVlabg2 Hi1kaaysW7caaMc8+aaebCaeaadaGadeqaamaalaaabaGaeu4KdC0a aeWabeaadaaeWaqaaiabeY7aTnaaBaaaleaacaWGRbaabeaakiaays W7daWcbaWcbaGaaGymaiaaysW7cqGHsislcaaMe8UaeqyWdihabaGa eqyWdihaaaqaaiaadUgacaaI9aGaaGymaaqaaiaadUeaa0GaeyyeIu oaaOGaayjkaiaawMcaaaqaamaaradabaGaeu4KdC0aaeWabeaacqaH 8oqBdaWgaaWcbaGaam4AaaqabaGcdaWcbaWcbaGaaGymaiaaysW7cq GHsislcaaMe8UaeqyWdihabaGaeqyWdihaaaGccaGLOaGaayzkaaaa leaacaWGRbGaaGypaiaaigdaaeaacaWGlbaaniabg+GivdaaaOGaaG jbVpaarahabaGaeqiWda3aa0baaSqaaiaadMgacaWGRbaabaGaeqiV d02aaSbaaWqaaiaadUgaaeqaaSWaaSqaaWqaaiaaigdacqGHsislcq aHbpGCaeaacqaHbpGCaaWccqGHsislcaaIXaaaaaqaaiaadUgacaaI 9aGaaGymaaqaaiaadUeaa0Gaey4dIunaaOGaay5Eaiaaw2haaiaac6 caaSqaaiaadMgacaaI9aGaaGymaaqaaiaadMeaa0Gaey4dIunaaaa@901F@

The full conditional posterior density in the case of restricted pooling is obtained from the likelihood and the priors, constructed from π ( μ , τ ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaaiaahY7acaaISa GaaGjbVlabes8a0bGaayjkaiaawMcaaiaacYcaaaa@3A83@ and from an additional prior for ϕ , i = 1 , , I : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHvpGzcaaISaGaaGjbVlaadMgaca aMe8UaaGypaiaaysW7caaIXaGaaiilaiaaysW7cqWIMaYscaGGSaGa aGjbVlaadMeacaaMc8UaaiOoaaaa@4384@

π ( Ω 1 , , Ω I | n ) = { i = 1 I f ( n | π i ) π ( π i ) } π ( μ , τ ) π ( ϕ ) , MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaaC yQdmaaBaaaleaacaaIXaaabeaakiaaiYcacaaMe8UaeSOjGSKaaiil aiaaysW7caWHPoWaaSbaaSqaaiaadMeaaeqaaOGaaGPaVdGaayjcSd GaaGPaVlaah6gaaiaawIcacaGLPaaacaaMc8UaaGjbVlaai2dacaaM c8UaaGjbVpaacmqabaWaaebCaeaacaWGMbWaaeWabeaadaabceqaai aah6gacaaMc8oacaGLiWoacaaMc8UaaCiWdmaaBaaaleaacaWGPbaa beaaaOGaayjkaiaawMcaaiaaysW7cqaHapaCdaqadeqaaiaahc8ada WgaaWcbaGaamyAaaqabaaakiaawIcacaGLPaaaaSqaaiaadMgacaaI 9aGaaGymaaqaaiaadMeaa0Gaey4dIunaaOGaay5Eaiaaw2haaiaays W7cqaHapaCdaqadeqaaiaahY7acaaISaGaaGjbVlabes8a0bGaayjk aiaawMcaaiaaysW7cqaHapaCdaqadeqaaiabew9aMbGaayjkaiaawM caaiaaiYcaaaa@760C@

where Ω i = ( π i , μ , τ , ϕ ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHPoWaaSbaaSqaaiaadMgaaeqaaO GaaGjbVlaai2dacaaMe8+aaeWabeaacaWHapWaaSbaaSqaaiaadMga aeqaaOGaaGilaiaaysW7caWH8oGaaGilaiaaysW7cqaHepaDcaaISa GaaGjbVlabew9aMbGaayjkaiaawMcaaiaacYcaaaa@47BE@ i = 1, , I . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGPbGaaGjbVlaai2dacaaMe8UaaG ymaiaaiYcacaaMe8UaeSOjGSKaaiilaiaaysW7caWGjbGaaiOlaaaa @3DE8@

For the Gibbs sampler, we consider the latent variables z i , i = 1, , I MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG6bWaaSbaaSqaaiaadMgaaeqaaO GaaGilaiaaysW7caWGPbGaaGjbVlaai2dacaaMe8UaaGymaiaaiYca caaMe8UaeSOjGSKaaiilaiaaysW7caWGjbaaaa@419C@ from a Bernoulli distribution with parameter ϕ . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHvpGzcaGGUaaaaa@33B6@ Here, the joint posterior density is given as follows:

π ( Ω 1 , , Ω I | n ) { i = 1 I f ( n | π i ) π ( π i | z i ) π ( z i ) } π ( μ , τ ) π ( ϕ ) { i = 1 I [ ϕ 1 D ( μ τ ) k = 1 K π i k μ k τ + n i k 1 ] z i [ ( 1 ϕ ) k = 1 K π i k n i k ] 1 z i } × ( K 1 ) ! ( τ + 1 ) 2 I ( ϕ ( 1 2 , 1 ) ) . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaafaqaaeWacaaabaGaeqiWda3aaeWabe aadaabceqaaiaahM6adaWgaaWcbaGaaGymaaqabaGccaaISaGaaGjb VlablAciljaacYcacaaMe8UaaCyQdmaaBaaaleaacaWGjbaabeaaki aaykW7aiaawIa7aiaaykW7caWHUbaacaGLOaGaayzkaaaabaGaeyyh Iu7aaiWabeaadaqeWbqaaiaadAgadaqadeqaamaaeiqabaGaaCOBai aaykW7aiaawIa7aiaaykW7caWHapWaaSbaaSqaaiaadMgaaeqaaaGc caGLOaGaayzkaaGaeqiWda3aaeWabeaadaabceqaaiaahc8adaWgaa WcbaGaamyAaaqabaGccaaMc8oacaGLiWoacaaMc8UaamOEamaaBaaa leaacaWGPbaabeaaaOGaayjkaiaawMcaaiabec8aWnaabmqabaGaam OEamaaBaaaleaacaWGPbaabeaaaOGaayjkaiaawMcaaaWcbaGaamyA aiaai2dacaaIXaaabaGaamysaaqdcqGHpis1aaGccaGL7bGaayzFaa GaaGjbVlabec8aWnaabmqabaGaaCiVdiaaiYcacaaMe8UaeqiXdqha caGLOaGaayzkaaGaeqiWda3aaeWabeaacqaHvpGzaiaawIcacaGLPa aaaeaaaeaacqGHDisTdaGadeqaamaarahabaWaamWabeaacqaHvpGz caaMe8+aaSaaaeaacaaIXaaabaGaamiramaabmqabaGaaCiVdiabes 8a0bGaayjkaiaawMcaaaaacaaMe8+aaebCaeaacqaHapaCdaqhaaWc baGaamyAaiaadUgaaeaacqaH8oqBdaWgaaadbaGaam4AaaqabaWccq aHepaDcqGHRaWkcaWGUbWaaSbaaWqaaiaadMgacaWGRbaabeaaliab gkHiTiaaigdaaaaabaGaam4Aaiaai2dacaaIXaaabaGaam4saaqdcq GHpis1aaGccaGLBbGaayzxaaWaaWbaaSqabeaacaWG6bWaaSbaaWqa aiaadMgaaeqaaaaakmaadmqabaWaaeWabeaacaaIXaGaaGjbVlabgk HiTiaaysW7cqaHvpGzaiaawIcacaGLPaaadaqeWbqaaiabec8aWnaa DaaaleaacaWGPbGaam4Aaaqaaiaad6gadaWgaaadbaGaamyAaiaadU gaaeqaaaaaaSqaaiaadUgacaaI9aGaaGymaaqaaiaadUeaa0Gaey4d IunaaOGaay5waiaaw2faamaaCaaaleqabaGaaGymaiabgkHiTiaadQ hadaWgaaadbaGaamyAaaqabaaaaaWcbaGaamyAaiaai2dacaaIXaaa baGaamysaaqdcqGHpis1aaGccaGL7bGaayzFaaaabaaabaGaaGjbVl abgEna0oaalaaabaWaaeWabeaacaWGlbGaaGjbVlabgkHiTiaaysW7 caaIXaaacaGLOaGaayzkaaGaaGyiaaqaamaabmqabaGaeqiXdqNaaG jbVlabgUcaRiaaysW7caaIXaaacaGLOaGaayzkaaWaaWbaaSqabeaa caaIYaaaaaaakiaaysW7caWGjbWaaSbaaSqaamaabmqabaGaeqy1dy MaaGPaVlabgIGiolaaykW7daqadeqaamaaleaameaacaaIXaaabaGa aGOmaaaaliaaiYcacaaMe8UaaGymaaGaayjkaiaawMcaaaGaayjkai aawMcaaaqabaGccaGGUaaaaaaa@E500@

Then, our Gibbs sampler is described as follows:

(a)
Full conditional for ϕ : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHvpGzcaaMc8UaaiOoaaaa@354D@ Draw

π ( ϕ | n , μ , τ , z ) ϕ i = 1 I z i ( 1 ϕ ) I i = 1 I z i , 1 2 ϕ 1. MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaeq y1dyMaaGPaVdGaayjcSdGaaGPaVlaah6gacaaISaGaaGjbVlaahY7a caaISaGaaGjbVlabes8a0jaaiYcacaaMe8UaaCOEaaGaayjkaiaawM caaiaaysW7caaMc8UaeyyhIuRaaGPaVlaaysW7cqaHvpGzdaahaaWc beqaamaaqadabaGaamOEamaaBaaameaacaWGPbaabeaaaeaacaWGPb GaaGypaiaaigdaaeaacaWGjbaaoiabggHiLdaaaOWaaeWabeaacaaI XaGaaGjbVlabgkHiTiaaysW7cqaHvpGzaiaawIcacaGLPaaadaahaa WcbeqaaiaadMeacqGHsisldaaeWaqaaiaadQhadaWgaaadbaGaamyA aaqabaaabaGaamyAaiaai2dacaaIXaaabaGaamysaaGdcqGHris5aa aakiaaiYcacaaMe8+aaSaaaeaacaaIXaaabaGaaGOmaaaacaaMe8Ua eyizImQaaGjbVlabew9aMjaaysW7cqGHKjYOcaaMe8UaaGymaiaai6 caaaa@79BF@

In other words, given μ , τ , z , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oGaaGilaiaaysW7cqaHepaDca aISaGaaGjbVlaahQhacaGGSaaaaa@3A82@ and the data, ϕ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHvpGzaaa@3304@ follows a truncated beta distribution with parameters i = 1 I z i MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaaeWaqaaiaadQhadaWgaaWcbaGaam yAaaqabaaabaGaamyAaiaai2dacaaIXaaabaGaamysaaqdcqGHris5 aaaa@388A@ and I i = 1 I z i , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGjbGaaGjbVlabgkHiTiaaysW7da aeWaqaaiaadQhadaWgaaWcbaGaamyAaaqabaaabaGaamyAaiaai2da caaIXaaabaGaamysaaqdcqGHris5aOGaaiilaaaa@3E19@ and the lower bound of ϕ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHvpGzaaa@3304@ is 1 / 2 . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaWcgaqaaiaaigdaaeaacaaIYaaaai aac6caaaa@337B@

(b)
Full conditional for z i , i = 1, , I : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG6bWaaSbaaSqaaiaadMgaaeqaaO GaaGilaiaaysW7caWGPbGaaGjbVlaai2dacaaMe8UaaGymaiaaiYca caaMe8UaeSOjGSKaaiilaiaaysW7caWGjbGaaGPaVlaacQdaaaa@43E5@ Draw z i | n , π i , μ , τ ~ Bernoulli ( p i ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaabceqaaiaadQhadaWgaaWcbaGaam yAaaqabaGccaaMc8oacaGLiWoacaaMc8UaaCOBaiaaiYcacaaMe8Ua aCiWdmaaBaaaleaacaWGPbaabeaakiaaiYcacaaMe8UaaCiVdiaaiY cacaaMe8UaeqiXdqNaaGjbVJqaaiaa=5hacaaMe8oeaaaaaaaaa8qa caqGcbGaaeyzaiaabkhacaqGUbGaae4BaiaabwhacaqGSbGaaeiBai aabMgapaWaaeWabeaacaWGWbWaaSbaaSqaaiaadMgaaeqaaaGccaGL OaGaayzkaaGaaiilaaaa@5634@ where

p i = ( ϕ k = 1 K π i k μ k τ 1 / D ( μ τ ) ) / ( ϕ k = 1 K π i k μ k τ 1 / D ( μ τ ) + ( 1 ϕ ) I ( k = 1 K π i k = 1 ) / K ) . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGWbWaaSbaaSqaaiaadMgaaeqaaO GaaGjbVlaaykW7caaI9aGaaGPaVlaaysW7daWcgaqaamaabmqabaWa aSGbaeaacqaHvpGzdaqeWaqaaiabec8aWnaaDaaaleaacaWGPbGaam 4AaaqaaiabeY7aTnaaBaaameaacaWGRbaabeaaliabes8a0jabgkHi TiaaigdaaaaabaGaam4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHpi s1aaGcbaGaamiramaabmqabaGaaCiVdiabes8a0bGaayjkaiaawMca aaaaaiaawIcacaGLPaaaaeaadaqadeqaamaalyaabaGaeqy1dy2aae bmaeaacqaHapaCdaqhaaWcbaGaamyAaiaadUgaaeaacqaH8oqBdaWg aaadbaGaam4AaaqabaWccqaHepaDcqGHsislcaaIXaaaaaqaaiaadU gacaaI9aGaaGymaaqaaiaadUeaa0Gaey4dIunaaOqaaiaadseadaqa deqaaiaahY7acqaHepaDaiaawIcacaGLPaaaaaGaaGjbVlabgUcaRi aaysW7daWcgaqaamaabmqabaGaaGymaiaaysW7cqGHsislcaaMe8Ua eqy1dygacaGLOaGaayzkaaGaamysamaaBaaaleaadaqadeqaamaaqa dabaGaeqiWda3aaSbaaWqaaiaadMgacaWGRbaabeaaliaai2dacaaI XaaameaacaWGRbGaaGypaiaaigdaaeaacaWGlbaaoiabggHiLdaali aawIcacaGLPaaaaeqaaaGcbaGaam4saaaaaiaawIcacaGLPaaaaaGa aiOlaaaa@8557@

(c)
Full conditional for π i , i = 1, , I : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHapWaaSbaaSqaaiaadMgaaeqaaO GaaGilaiaaysW7caWGPbGaaGjbVlaai2dacaaMe8UaaGymaiaaiYca caaMe8UaeSOjGSKaaiilaiaaysW7caWGjbGaaGPaVlaacQdaaaa@4432@ Draw

π ( π i | n , z i , μ , τ ) [ k = 1 K π i k μ k τ + n i k 1 ] z i [ k = 1 K π i k 1 + n i k 1 ] 1 z i . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaaC iWdmaaBaaaleaacaWGPbaabeaakiaaykW7aiaawIa7aiaaykW7caWH UbGaaGilaiaaysW7caWG6bWaaSbaaSqaaiaadMgaaeqaaOGaaGilai aaysW7caWH8oGaaGilaiaaysW7cqaHepaDaiaawIcacaGLPaaacaaM e8UaaGPaVlabg2Hi1kaaykW7caaMe8+aamWabeaadaqeWbqaaiabec 8aWnaaDaaaleaacaWGPbGaam4AaaqaaiabeY7aTnaaBaaameaacaWG Rbaabeaaliabes8a0jabgUcaRiaad6gadaWgaaadbaGaamyAaiaadU gaaeqaaSGaeyOeI0IaaGymaaaaaeaacaWGRbGaaGypaiaaigdaaeaa caWGlbaaniabg+GivdaakiaawUfacaGLDbaadaahaaWcbeqaaiaadQ hadaWgaaadbaGaamyAaaqabaaaaOWaamWabeaadaqeWbqaaiabec8a WnaaDaaaleaacaWGPbGaam4AaaqaaiaaigdacqGHRaWkcaWGUbWaaS baaWqaaiaadMgacaWGRbaabeaaliabgkHiTiaaigdaaaaabaGaam4A aiaai2dacaaIXaaabaGaam4saaqdcqGHpis1aaGccaGLBbGaayzxaa WaaWbaaSqabeaacaaIXaGaeyOeI0IaamOEamaaBaaameaacaWGPbaa beaaaaGccaaIUaaaaa@7E1F@

In the case of z i = 1 , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG6bWaaSbaaSqaaiaadMgaaeqaaO GaaGjbVlaai2dacaaMe8UaaGymaiaacYcaaaa@38AB@ we can generate the value of π i MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHapWaaSbaaSqaaiaadMgaaeqaaa aa@33A2@ from a Dirichlet distribution with parameters μ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oaaaa@3284@ and τ . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDcaGGUaaaaa@33B3@ In other cases, we can interpret that as the uncertainty of the modeling. That is, for π i MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHapWaaSbaaSqaaiaadMgaaeqaaa aa@33A2@ given z 1 = 0 , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG6bWaaSbaaSqaaiaaigdaaeqaaO GaaGjbVlaai2dacaaMe8UaaGimaiaacYcaaaa@3877@ n MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHUbaaaa@3233@ draws its value from a uniform Dirichlet distribution with a K × 1 MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGlbGaaGjbVlabgEna0kaaysW7ca aIXaaaaa@37F8@ parameter vector, where each component has the value one.

(d)
Full conditional for μ : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oGaaGPaVlaacQdaaaa@34CD@ Draw

π ( μ | n , π , τ ) z i = 1 { Γ ( k = 1 K μ k τ ) k = 1 K Γ ( μ k τ ) k = 1 K π i k μ k τ 1 } . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaaC iVdiaaykW7aiaawIa7aiaaykW7caWHUbGaaGilaiaaysW7caWHapGa aGilaiaaysW7cqaHepaDaiaawIcacaGLPaaacaaMe8UaaGPaVlabg2 Hi1kaaykW7caaMe8+aaebuaeaadaGadeqaamaalaaabaGaeu4KdC0a aeWabeaadaaeWaqaaiabeY7aTnaaBaaaleaacaWGRbaabeaakiabes 8a0bWcbaGaam4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHris5aaGc caGLOaGaayzkaaaabaWaaebmaeaacqqHtoWrdaqadeqaaiabeY7aTn aaBaaaleaacaWGRbaabeaakiabes8a0bGaayjkaiaawMcaaaWcbaGa am4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHpis1aaaakiaaysW7da qeWbqaaiabec8aWnaaDaaaleaacaWGPbGaam4AaaqaaiabeY7aTnaa BaaameaacaWGRbaabeaaliabes8a0jabgkHiTiaaigdaaaaabaGaam 4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHpis1aaGccaGL7bGaayzF aaaaleaacaWG6bWaaSbaaWqaaiaadMgaaeqaaSGaaGypaiaaigdaae qaniabg+GivdGccaGGUaaaaa@7E2F@

(e)
Full conditional for τ : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDcaaMc8UaaiOoaaaa@354A@ Draw

π ( τ | n , π , μ ) z i = 1 { Γ ( k = 1 K μ k τ ) k = 1 K Γ ( μ k τ ) k = 1 K π i k μ k τ 1 } 1 ( τ + 1 ) 2 . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaeq iXdqNaaGPaVdGaayjcSdGaaGPaVlaah6gacaaISaGaaGjbVlaahc8a caaISaGaaGjbVlaahY7aaiaawIcacaGLPaaacaaMe8UaaGPaVlabg2 Hi1kaaykW7caaMe8+aaebuaeaadaGadeqaamaalaaabaGaeu4KdC0a aeWabeaadaaeWaqaaiabeY7aTnaaBaaaleaacaWGRbaabeaakiabes 8a0bWcbaGaam4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHris5aaGc caGLOaGaayzkaaaabaWaaebmaeaacqqHtoWrdaqadeqaaiabeY7aTn aaBaaaleaacaWGRbaabeaakiabes8a0bGaayjkaiaawMcaaaWcbaGa am4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHpis1aaaakiaaysW7da qeWbqaaiabec8aWnaaDaaaleaacaWGPbGaam4AaaqaaiabeY7aTnaa BaaameaacaWGRbaabeaaliabes8a0jabgkHiTiaaigdaaaaabaGaam 4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHpis1aaGccaGL7bGaayzF aaGaaGjbVpaalaaabaGaaGymaaqaamaabmqabaGaeqiXdqNaaGjbVl abgUcaRiaaysW7caaIXaaacaGLOaGaayzkaaWaaWbaaSqabeaacaaI Yaaaaaaakiaai6caaSqaaiaadQhadaWgaaadbaGaamyAaaqabaWcca aI9aGaaGymaaqab0Gaey4dIunaaaa@897C@

Of course, the generating process for parameters μ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oaaaa@3284@ and τ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDaaa@3301@ is similar to that of the parameter in adaptive pooling. In addition, the data used for μ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oaaaa@3284@ and τ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDaaa@3301@ are z i = 1, i = 1, , I . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG6bWaaSbaaSqaaiaadMgaaeqaaO GaaGjbVlaai2dacaaMe8UaaGymaiaaiYcacaaMe8UaamyAaiaaysW7 caaI9aGaaGjbVlaaigdacaaISaGaaGjbVlablAciljaacYcacaaMe8 Uaamysaiaac6caaaa@46EA@

Otherwise, the parameter vector corresponding to area i MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGPbaaaa@322A@ in global-local pooling consists of θ , η , z , ϕ , σ 2 , σ 1 2 , , MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH4oqCcaaISaGaaGjbVlaahE7aca aISaGaaGjbVlaahQhacaaISaGaaGjbVlabew9aMjaaiYcacaaMe8Ua eq4Wdm3aaWbaaSqabeaacaaIYaaaaOGaaGilaiaaysW7cqaHdpWCda qhaaWcbaGaaGymaaqaaiaaikdaaaGccaaISaGaaGjbVlablAciljaa cYcaaaa@4C8A@ and σ K 1 2 . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHdpWCdaqhaaWcbaGaam4saiabgk HiTiaaigdaaeaacaaIYaaaaOGaaiOlaaaa@371C@ Then, the full conditional posterior density for the given data in the model is as follows:

π ( Ω 1 , , Ω I | n ) { i = 1 I f ( n i | η i , θ ) } { i = 1 I π ( η i | z i , σ 2 , σ 1 2 , , σ K 1 2 ) } π ( σ 2 ) × π ( σ 1 2 , , σ K 1 2 ) π ( θ ) π ( z | ϕ ) π ( ϕ ) = { i = 1 I n i ! k = 1 K n i k ! { k = 1 K 1 ( e θ + η i k 1 + l = 1 K 1 e θ + η i l ) n i k } ( 1 1 + l = 1 K 1 e θ + η i k ) n i K } × { i = 1 I [ k = 1 K 1 1 2 π σ 2 exp ( 1 2 σ 2 η i k 2 ) ] z i [ k = 1 K 1 1 2 π σ k 2 exp ( 1 2 σ k 2 η i k 2 ) ] 1 z i } × 1 ( 1 + σ 2 ) 2 { k = 1 K 1 1 ( 1 + σ k 2 ) 2 } 1 π ( 1 + θ 2 ) { i = 1 I ϕ z i ( 1 ϕ ) 1 z i } I ( 1 / 2 ϕ 1 ) , MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaafaqaaeqbcaaaaeaacqaHapaCdaqade qaamaaeiqabaGaaCyQdmaaBaaaleaacaaIXaaabeaakiaaiYcacaaM e8UaeSOjGSKaaiilaiaaysW7caWHPoWaaSbaaSqaaiaadMeaaeqaaO GaaGPaVdGaayjcSdGaaGPaVlaah6gaaiaawIcacaGLPaaaaeaacqGH DisTdaGadeqaamaarahabaGaamOzamaabmqabaWaaqGabeaacaWHUb WaaSbaaSqaaiaadMgaaeqaaOGaaGPaVdGaayjcSdGaaGPaVlaahE7a daWgaaWcbaGaamyAaaqabaGccaaISaGaaGjbVlabeI7aXbGaayjkai aawMcaaaWcbaGaamyAaiaai2dacaaIXaaabaGaamysaaqdcqGHpis1 aaGccaGL7bGaayzFaaGaaGjbVpaacmqabaWaaebCaeaacqaHapaCda qadeqaamaaeiqabaGaaC4TdmaaBaaaleaacaWGPbaabeaakiaaykW7 aiaawIa7aiaaykW7caWG6bWaaSbaaSqaaiaadMgaaeqaaOGaaGilai aaysW7cqaHdpWCdaahaaWcbeqaaiaaikdaaaGccaaISaGaaGjbVlab eo8aZnaaDaaaleaacaaIXaaabaGaaGOmaaaakiaaiYcacaaMe8UaeS OjGSKaaiilaiaaysW7cqaHdpWCdaqhaaWcbaGaam4saiabgkHiTiaa igdaaeaacaaIYaaaaaGccaGLOaGaayzkaaaaleaacaWGPbGaaGypai aaigdaaeaacaWGjbaaniabg+GivdaakiaawUhacaGL9baacqaHapaC daqadeqaaiaaygW7cqaHdpWCdaahaaWcbeqaaiaaikdaaaGccaaMb8 oacaGLOaGaayzkaaaabaaabaGaaGjbVlabgEna0kaaysW7caaMc8Ua eqiWda3aaeWabeaacqaHdpWCdaqhaaWcbaGaaGymaaqaaiaaikdaaa GccaaISaGaaGjbVlablAciljaacYcacaaMe8Uaeq4Wdm3aa0baaSqa aiaadUeacqGHsislcaaIXaaabaGaaGOmaaaaaOGaayjkaiaawMcaai abec8aWnaabmqabaGaaGzaVlabeI7aXjaaygW7aiaawIcacaGLPaaa cqaHapaCdaqadeqaamaaeiqabaGaaCOEaiaaykW7aiaawIa7aiaayk W7cqaHvpGzaiaawIcacaGLPaaacqaHapaCdaqadeqaaiaaygW7cqaH vpGzcaaMb8oacaGLOaGaayzkaaaabaaabaGaaGypamaacmqabaWaae bCaeaadaWcaaqaaiaad6gadaWgaaWcbaGaamyAaiabgwSixdqabaGc caaIHaaabaWaaebmaeaacaWGUbWaaSbaaSqaaiaadMgacaWGRbaabe aakiaaigcaaSqaaiaadUgacaaI9aGaaGymaaqaaiaadUeaa0Gaey4d IunaaaGcdaGadeqaamaarahabaWaaeWabeaadaWcaaqaaiaadwgada ahaaWcbeqaaiabeI7aXjabgUcaRiabeE7aOnaaBaaameaacaWGPbGa am4AaaqabaaaaaGcbaGaaGymaiaaysW7cqGHRaWkcaaMe8+aaabmae aacaWGLbWaaWbaaSqabeaacqaH4oqCcqGHRaWkcqaH3oaAdaWgaaad baGaamyAaiaadYgaaeqaaaaaaSqaaiaadYgacaaI9aGaaGymaaqaai aadUeacqGHsislcaaIXaaaniabggHiLdaaaaGccaGLOaGaayzkaaWa aWbaaSqabeaacaWGUbWaaSbaaWqaaiaadMgacaWGRbaabeaaaaaale aacaWGRbGaaGypaiaaigdaaeaacaWGlbGaeyOeI0IaaGymaaqdcqGH pis1aaGccaGL7bGaayzFaaGaaGjbVpaabmqabaWaaSaaaeaacaaIXa aabaGaaGymaiaaysW7cqGHRaWkcaaMe8+aaabmaeaacaWGLbWaaWba aSqabeaacqaH4oqCcqGHRaWkcqaH3oaAdaWgaaadbaGaamyAaiaadU gaaeqaaaaaaSqaaiaadYgacaaI9aGaaGymaaqaaiaadUeacqGHsisl caaIXaaaniabggHiLdaaaaGccaGLOaGaayzkaaWaaWbaaSqabeaaca WGUbWaaSbaaWqaaiaadMgacaWGlbaabeaaaaaaleaacaWGPbGaaGyp aiaaigdaaeaacaWGjbaaniabg+GivdaakiaawUhacaGL9baaaeaaae aacaaMe8Uaey41aqRaaGjbVlaaykW7daGadeqaamaarahabaWaamWa beaadaqeWbqaaiaaysW7daWcaaqaaiaaigdaaeaadaGcaaqaaiaaik dacqaHapaCcqaHdpWCdaahaaWcbeqaaiaaikdaaaaabeaaaaGccaaM e8UaaeyzaiaabIhacaqGWbWaaeWabeaacqGHsisldaWcaaqaaiaaig daaeaacaaIYaGaeq4Wdm3aaWbaaSqabeaacaaIYaaaaaaakiabeE7a OnaaDaaaleaacaWGPbGaam4AaaqaaiaaikdaaaaakiaawIcacaGLPa aaaSqaaiaadUgacaaI9aGaaGymaaqaaiaadUeacqGHsislcaaIXaaa niabg+GivdaakiaawUfacaGLDbaaaSqaaiaadMgacaaI9aGaaGymaa qaaiaadMeaa0Gaey4dIunakmaaCaaaleqabaGaamOEamaaBaaameaa caWGPbaabeaaaaGcdaWadeqaamaarahabaGaaGjbVpaalaaabaGaaG ymaaqaamaakaaabaGaaGOmaiabec8aWjabeo8aZnaaDaaaleaacaWG RbaabaGaaGOmaaaaaeqaaaaakiaaysW7caqGLbGaaeiEaiaabchada qadeqaaiabgkHiTmaalaaabaGaaGymaaqaaiaaikdacqaHdpWCdaqh aaWcbaGaam4AaaqaaiaaikdaaaaaaOGaeq4TdG2aa0baaSqaaiaadM gacaWGRbaabaGaaGOmaaaaaOGaayjkaiaawMcaaaWcbaGaam4Aaiaa i2dacaaIXaaabaGaam4saiabgkHiTiaaigdaa0Gaey4dIunaaOGaay 5waiaaw2faamaaCaaaleqabaGaaGymaiabgkHiTiaadQhadaWgaaad baGaamyAaaqabaaaaaGccaGL7bGaayzFaaaabaaabaGaaGjbVlabgE na0kaaykW7caaMe8+aaSaaaeaacaaIXaaabaWaaeWabeaacaaIXaGa aGjbVlabgUcaRiaaysW7cqaHdpWCdaahaaWcbeqaaiaaikdaaaaaki aawIcacaGLPaaadaahaaWcbeqaaiaaikdaaaaaaOWaaiWabeaadaqe WbqaamaalaaabaGaaGymaaqaamaabmqabaGaaGymaiaaysW7cqGHRa WkcaaMe8Uaeq4Wdm3aa0baaSqaaiaadUgaaeaacaaIYaaaaaGccaGL OaGaayzkaaWaaWbaaSqabeaacaaIYaaaaaaaaeaacaWGRbGaaGypai aaigdaaeaacaWGlbGaeyOeI0IaaGymaaqdcqGHpis1aaGccaGL7bGa ayzFaaGaaGjbVpaalaaabaGaaGymaaqaaiabec8aWnaabmqabaGaaG ymaiaaysW7cqGHRaWkcaaMe8UaeqiUde3aaWbaaSqabeaacaaIYaaa aaGccaGLOaGaayzkaaaaaiaaysW7daGadeqaamaarahabaGaeqy1dy 2aaWbaaSqabeaacaWG6bWaaSbaaWqaaiaadMgaaeqaaaaakmaabmqa baGaaGymaiaaysW7cqGHsislcaaMe8Uaeqy1dygacaGLOaGaayzkaa WaaWbaaSqabeaacaaIXaGaeyOeI0IaamOEamaaBaaameaacaWGPbaa beaaaaaaleaacaWGPbGaaGypaiaaigdaaeaacaWGjbaaniabg+Givd aakiaawUhacaGL9baacaWGjbWaaSbaaSqaamaabmqabaWaaSGbaeaa caaIXaaabaGaaGOmaiaaykW7cqGHKjYOcaaMc8Uaeqy1dyMaaGPaVl abgsMiJkaaykW7caaIXaaaaaGaayjkaiaawMcaaaqabaGccaaISaaa aaaa@D24D@

where Ω i = ( θ , η i , z i , ϕ , σ 2 , σ 1 2 , , σ K 1 2 ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHPoWaaSbaaSqaaiaadMgaaeqaaO GaaGjbVlaai2dacaaMe8+aaeWabeaacqaH4oqCcaaISaGaaGjbVlaa hE7adaWgaaWcbaGaamyAaaqabaGccaaISaGaaGjbVlaadQhadaWgaa WcbaGaamyAaaqabaGccaaISaGaaGjbVlabew9aMjaaiYcacaaMe8Ua eq4Wdm3aaWbaaSqabeaacaaIYaaaaOGaaGilaiaaysW7cqaHdpWCda qhaaWcbaGaaGymaaqaaiaaikdaaaGccaaISaGaaGjbVlablAciljaa iYcacaaMe8Uaeq4Wdm3aa0baaSqaaiaadUeacqGHsislcaaIXaaaba GaaGOmaaaaaOGaayjkaiaawMcaaiaacYcaaaa@5E04@ i = 1, , I , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGPbGaaGjbVlaai2dacaaMe8UaaG ymaiaaiYcacaaMe8UaeSOjGSKaaiilaiaaysW7caWGjbGaaiilaaaa @3DE6@ η = ( η 1 , , η I ) MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH3oGaaGjbVlaai2dacaaMe8+aae WabeaacaWH3oWaaSbaaSqaaiaaigdaaeqaaOGaaGilaiaaysW7cqWI MaYscaGGSaGaaGjbVlaahE7adaWgaaWcbaGaamysaaqabaaakiaawI cacaGLPaaadaahaaWcbeqaaOGamai2gkdiIcaaaaa@451E@ and z = ( z 1 , , z I ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH6bGaaGjbVlaai2dacaaMe8+aae WabeaacaWG6bWaaSbaaSqaaiaaigdaaeqaaOGaaGilaiaaysW7cqWI MaYscaGGSaGaaGjbVlaadQhadaWgaaWcbaGaamysaaqabaaakiaawI cacaGLPaaadaahaaWcbeqaaOGamai2gkdiIcaacaGGUaaaaa@4508@

Then, the Gibbs sampler is as follows:

(a)
Full conditional for ϕ : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHvpGzcaaMc8UaaiOoaaaa@354D@ Draw ϕ | others ~ truncated Beta ( i = 1 I z i , I i = 1 I z i , 1 2 , 1 ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaabceqaaiabew9aMjaaykW7aiaawI a7aiaaykW7qaaaaaaaaaWdbiaab+gacaqG0bGaaeiAaiaabwgacaqG YbGaae4Ca8aacaaMc8ocbaGaa8NFaiaaykW7peGaaeiDaiaabkhaca qG1bGaaeOBaiaabogacaqGHbGaaeiDaiaabwgacaqGKbGaaeiiaiaa bkeacaqGLbGaaeiDaiaabggapaGaaGPaVpaabmqabaWaaabmaeaaca WG6bWaaSbaaSqaaiaadMgaaeqaaOGaaGilaiaaysW7caWGjbGaaGjb VlabgkHiTiaaysW7daaeWaqaaiaadQhadaWgaaWcbaGaamyAaaqaba GccaaISaaaleaacaWGPbGaaGypaiaaigdaaeaacaWGjbaaniabggHi LdGccaaMe8+aaSqaaSqaaiaaigdaaeaacaaIYaaaaOGaaGilaiaays W7caaIXaaaleaacaWGPbGaaGypaiaaigdaaeaacaWGjbaaniabggHi LdaakiaawIcacaGLPaaacaGGUaaaaa@6EEB@
(b)
Full conditional for z i , i = 1, , I : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG6bWaaSbaaSqaaiaadMgaaeqaaO GaaGilaiaaysW7caWGPbGaaGjbVlaai2dacaaMe8UaaGymaiaaiYca caaMe8UaeSOjGSKaaiilaiaaysW7caWGjbGaaGPaVlaacQdaaaa@43E5@ Draw z i | others ~ Bernoulli ( p i ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaabceqaaiaadQhadaWgaaWcbaGaam yAaaqabaGccaaMc8oacaGLiWoacaaMc8oeaaaaaaaaa8qacaqGVbGa aeiDaiaabIgacaqGLbGaaeOCaiaabohapaGaaGPaVJqaaiaa=5haca aMc8+dbiaabkeacaqGLbGaaeOCaiaab6gacaqGVbGaaeyDaiaabYga caqGSbGaaeyAa8aadaqadeqaaiaadchadaWgaaWcbaGaamyAaaqaba aakiaawIcacaGLPaaacaGGSaaaaa@4EB9@ with p i = ϕ k = 1 K 1 ( exp ( η i k 2 / 2 σ 2 ) / 2 π σ 2 ) / { ϕ k = 1 K 1 exp ( η i k 2 / 2 σ 2 ) / 2 π σ 2 + ( 1 ϕ ) MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGWbWaaSbaaSqaaiaadMgaaeqaaO GaaGjbVlaai2dacaaMe8+aaSGbaeaacqaHvpGzdaqeWaqaamaabmqa baWaaSGbaeaacaqGLbGaaeiEaiaabchadaqadeqaamaalyaabaGaey OeI0Iaeq4TdG2aa0baaSqaaiaadMgacaWGRbaabaGaaGOmaaaaaOqa aiaaikdacqaHdpWCdaahaaWcbeqaaiaaikdaaaaaaaGccaGLOaGaay zkaaaabaWaaOaaaeaacaaIYaGaeqiWdaNaeq4Wdm3aaWbaaSqabeaa caaIYaaaaaqabaaaaaGccaGLOaGaayzkaaaaleaacaWGRbGaaGypai aaigdaaeaacaWGlbGaeyOeI0IaaGymaaqdcqGHpis1aaGcbaWaaiqa beaadaWcgaqaaiabew9aMnaaradabaGaaeyzaiaabIhacaqGWbWaae WabeaadaWcgaqaaiabgkHiTiabeE7aOnaaDaaaleaacaWGPbGaam4A aaqaaiaaikdaaaaakeaacaaIYaGaeq4Wdm3aaWbaaSqabeaacaaIYa aaaaaaaOGaayjkaiaawMcaaaWcbaGaam4Aaiaai2dacaaIXaaabaGa am4saiabgkHiTiaaigdaa0Gaey4dIunaaOqaamaakaaabaGaaGOmai abec8aWjabeo8aZnaaCaaaleqabaGaaGOmaaaaaeqaaOGaaGjbVlab gUcaRiaaysW7daqadeqaaiaaigdacaaMe8UaeyOeI0IaaGjbVlabew 9aMbGaayjkaiaawMcaaaaaaiaawUhaaaaaaaa@7CA9@ k = 1 K 1 ( exp ( η i k 2 / 2 σ k 2 ) / 2 π σ k 2 ) } . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaGaceqaamaaradabaWaaeWabeaada WcgaqaaiaabwgacaqG4bGaaeiCamaabmqabaWaaSGbaeaacqGHsisl cqaH3oaAdaqhaaWcbaGaamyAaiaadUgaaeaacaaIYaaaaaGcbaGaaG Omaiabeo8aZnaaDaaaleaacaWGRbaabaGaaGOmaaaaaaaakiaawIca caGLPaaaaeaadaGcaaqaaiaaikdacqaHapaCcqaHdpWCdaqhaaWcba Gaam4AaaqaaiaaikdaaaaabeaaaaaakiaawIcacaGLPaaaaSqaaiaa dUgacaaI9aGaaGymaaqaaiaadUeacqGHsislcaaIXaaaniabg+Givd aakiaaw2haaiaac6caaaa@5002@
(c)
Full conditional for θ : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH4oqCcaaMc8UaaiOoaaaa@353B@ Draw

π ( θ | others ) [ i = 1 I k = 1 K 1 ( e θ + η i k 1 + l = 1 K 1 e θ + η i l ) n i k ( 1 1 + l = 1 K 1 e θ + η i l ) n i K ] 1 1 + θ 2 . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaeq iUdeNaaGPaVdGaayjcSdGaaGPaVlaab+gacaqG0bGaaeiAaiaabwga caqGYbGaae4CaaGaayjkaiaawMcaaiaaysW7caaMc8UaeyyhIuRaaG PaVlaaysW7daWadeqaamaarahabaWaaebCaeaadaqadeqaamaalaaa baGaamyzamaaCaaaleqabaGaeqiUdeNaey4kaSIaeq4TdG2aaSbaaW qaaiaadMgacaWGRbaabeaaaaaakeaacaaIXaGaaGjbVlabgUcaRiaa ysW7daaeWaqaaiaadwgadaahaaWcbeqaaiabeI7aXjabgUcaRiabeE 7aOnaaBaaameaacaWGPbGaamiBaaqabaaaaaWcbaGaamiBaiaai2da caaIXaaabaGaam4saiabgkHiTiaaigdaa0GaeyyeIuoaaaaakiaawI cacaGLPaaadaahaaWcbeqaaiaad6gadaWgaaadbaGaamyAaiaadUga aeqaaaaakmaabmqabaWaaSaaaeaacaaIXaaabaGaaGymaiaaysW7cq GHRaWkcaaMe8+aaabmaeaacaWGLbWaaWbaaSqabeaacqaH4oqCcqGH RaWkcqaH3oaAdaWgaaadbaGaamyAaiaadYgaaeqaaaaaaSqaaiaadY gacaaI9aGaaGymaaqaaiaadUeacqGHsislcaaIXaaaniabggHiLdaa aaGccaGLOaGaayzkaaWaaWbaaSqabeaacaWGUbWaaSbaaWqaaiaadM gacaWGlbaabeaaaaaaleaacaWGRbGaaGypaiaaigdaaeaacaWGlbGa eyOeI0IaaGymaaqdcqGHpis1aaWcbaGaamyAaiaai2dacaaIXaaaba GaamysaaqdcqGHpis1aaGccaGLBbGaayzxaaGaaGjbVpaalaaabaGa aGymaaqaaiaaigdacaaMe8Uaey4kaSIaaGjbVlabeI7aXnaaCaaale qabaGaaGOmaaaaaaGccaaIUaaaaa@98FC@

(d)
Full conditional for η i k , i = 1, , I , k = 1 , , ( K 1 ) : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH3oaAdaWgaaWcbaGaamyAaiaadU gaaeqaaOGaaGilaiaaysW7caWGPbGaaGjbVlaai2dacaaMe8UaaGym aiaaiYcacaaMe8UaeSOjGSKaaiilaiaaysW7caWGjbGaaGilaiaays W7caWGRbGaaGjbVlaai2dacaaMe8UaaGymaiaacYcacaaMe8UaeSOj GSKaaiilaiaaysW7daqadeqaceaaQgGaam4saiaaysW7cqGHsislca aMe8UaaGymaaGaayjkaiaawMcaaiaaykW7caGG6aaaaa@5AB7@ Draw

π ( η i k | others ) I ( z i = 1 ) ( 1 1 + l = 1 K 1 e θ + η i l ) k = 1 K n i k exp { k = 1 K 1 η i k n i k 1 2 k = 1 K 1 1 σ 2 η i k 2 } + I ( z i = 0 ) ( 1 1 + l = 1 K 1 e θ + η i l ) k = 1 K n i k exp { k = 1 K 1 η i k n i k 1 2 k = 1 K 1 1 σ k 2 η i k 2 } . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaafaqaaeGacaaabaGaeqiWda3aaeWabe aadaabceqaaiabeE7aOnaaBaaaleaacaWGPbGaam4AaaqabaGccaaM c8oacaGLiWoacaaMc8Uaae4BaiaabshacaqGObGaaeyzaiaabkhaca qGZbaacaGLOaGaayzkaaaabaGaeyyhIuRaamysamaaBaaaleaadaqa deqaaiaadQhadaWgaaadbaGaamyAaaqabaWccqGH9aqpcaaIXaaaca GLOaGaayzkaaaabeaakmaabmqabaWaaSaaaeaacaaIXaaabaGaaGym aiaaysW7cqGHRaWkcaaMe8+aaabmaeaacaWGLbWaaWbaaSqabeaacq aH4oqCcqGHRaWkcqaH3oaAdaWgaaadbaGaamyAaiaadYgaaeqaaaaa aSqaaiaadYgacaaI9aGaaGymaaqaaiaadUeacqGHsislcaaIXaaani abggHiLdaaaaGccaGLOaGaayzkaaWaaWbaaSqabeaadaaeWaqaaiaa d6gadaWgaaadbaGaamyAaiaadUgaaeqaaaqaaiaadUgacaaI9aGaaG ymaaqaaiaadUeaa4GaeyyeIuoaaaGccaqGLbGaaeiEaiaabchadaGa deqaaiaaykW7daaeWbqaaiabeE7aOnaaBaaaleaacaWGPbGaam4Aaa qabaGccaWGUbWaaSbaaSqaaiaadMgacaWGRbaabeaaaeaacaWGRbGa aGypaiaaigdaaeaacaWGlbGaeyOeI0IaaGymaaqdcqGHris5aOGaaG jbVlabgkHiTiaaysW7daWcaaqaaiaaigdaaeaacaaIYaaaaiaaykW7 daaeWbqaamaalaaabaGaaGymaaqaaiabeo8aZnaaCaaaleqabaGaaG OmaaaaaaGccaaMc8Uaeq4TdG2aa0baaSqaaiaadMgacaWGRbaabaGa aGOmaaaaaeaacaWGRbGaaGypaiaaigdaaeaacaWGlbGaeyOeI0IaaG ymaaqdcqGHris5aaGccaGL7bGaayzFaaaabaaabaGaaGjbVlabgUca RiaadMeadaWgaaWcbaWaaeWabeaacaWG6bWaaSbaaWqaaiaadMgaae qaaSGaeyypa0JaaGimaaGaayjkaiaawMcaaaqabaGcdaqadeqaamaa laaabaGaaGymaaqaaiaaigdacaaMe8Uaey4kaSIaaGjbVpaaqadaba GaamyzamaaCaaaleqabaGaeqiUdeNaey4kaSIaeq4TdG2aaSbaaWqa aiaadMgacaWGSbaabeaaaaaaleaacaWGSbGaaGypaiaaigdaaeaaca WGlbGaeyOeI0IaaGymaaqdcqGHris5aaaaaOGaayjkaiaawMcaamaa CaaaleqabaWaaabmaeaacaWGUbWaaSbaaWqaaiaadMgacaWGRbaabe aaaeaacaWGRbGaaGypaiaaigdaaeaacaWGlbaaoiabggHiLdaaaOGa aeyzaiaabIhacaqGWbWaaiWabeaacaaMc8+aaabCaeaacqaH3oaAda WgaaWcbaGaamyAaiaadUgaaeqaaOGaamOBamaaBaaaleaacaWGPbGa am4AaaqabaaabaGaam4Aaiaai2dacaaIXaaabaGaam4saiabgkHiTi aaigdaa0GaeyyeIuoakiaaysW7cqGHsislcaaMe8+aaSaaaeaacaaI XaaabaGaaGOmaaaacaaMc8+aaabCaeaadaWcaaqaaiaaigdaaeaacq aHdpWCdaqhaaWcbaGaam4AaaqaaiaaikdaaaaaaOGaaGPaVlabeE7a OnaaDaaaleaacaWGPbGaam4AaaqaaiaaikdaaaaabaGaam4Aaiaai2 dacaaIXaaabaGaam4saiabgkHiTiaaigdaa0GaeyyeIuoaaOGaay5E aiaaw2haaiaai6caaaaaaa@E951@

(e)
Full conditional for σ 2 : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHdpWCdaahaaWcbeqaaiaaikdaaa GccaaMc8UaaiOoaaaa@363B@ Draw

π( σ 2 |others) 1 σ (K1) i=1 I I( z i =1) (1+ σ 2 ) 2 exp{ 1 2 σ 2 z i =1 k=1 K1 η ik 2 }. MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCcaaMc8Uaaiikamaaeiqaba Gaeq4Wdm3aaWbaaSqabeaacaaIYaaaaOGaaGPaVdGaayjcSdGaaGPa Vlaab+gacaqG0bGaaeiAaiaabwgacaqGYbGaae4CaiaacMcacaaMc8 UaaGjbVlabg2Hi1kaaykW7caaMe8+aaSaaaeaacaaIXaaabaGaeq4W dm3aaWbaaSqabeaacaGGOaGaam4saiaaykW7cqGHsislcaaMc8UaaG ymaiaacMcadaaeWaqaaiaadMeacaaMc8UaaiikaiaadQhadaWgaaad baGaamyAaaqabaWccqGH9aqpcaaIXaGaaiykaaadbaGaamyAaiaai2 dacaaIXaaabaGaamysaaGdcqGHris5aaaakiaacIcacaaIXaGaaGjb VlabgUcaRiaaysW7cqaHdpWCdaahaaWcbeqaaiaaikdaaaGccaGGPa WaaWbaaSqabeaacaaIYaaaaaaakiaaysW7caqGLbGaaeiEaiaabcha daGadeqaaiabgkHiTmaalaaabaGaaGymaaqaaiaaikdacqaHdpWCda ahaaWcbeqaaiaaikdaaaaaaOWaaabuaeaacaaMc8+aaabCaeaacaaM c8Uaeq4TdG2aa0baaSqaaiaadMgacaWGRbaabaGaaGOmaaaaaeaaca WGRbGaaGypaiaaigdaaeaacaWGlbGaeyOeI0IaaGymaaqdcqGHris5 aaWcbaGaamOEamaaBaaameaacaWGPbaabeaaliaai2dacaaIXaaabe qdcqGHris5aaGccaGL7bGaayzFaaGaaiOlaaaa@8BC4@

(f)
Full conditional for σ k 2 k = 1, , ( K 1 ) : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHdpWCdaqhaaWcbaGaam4Aaaqaai aaikdaaaGccaaMe8Uaam4AaiaaysW7caaI9aGaaGjbVlaaigdacaaI SaGaaGjbVlablAciljaacYcacaaMe8+aaeWabeaacaWGlbGaaGjbVl abgkHiTiaaysW7caaIXaaacaGLOaGaayzkaaGaaGPaVlaacQdaaaa@4B02@ Draw

π( σ 2 |others) 1 σ k i=1 I I ( z i =0) (1+ σ k 2 ) 2 exp{ 1 2 σ k 2 z i =0 η ik 2 }. MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCcaaMc8Uaaiikamaaeiqaba Gaeq4Wdm3aaWbaaSqabeaacaaIYaaaaOGaaGPaVdGaayjcSdGaaGPa Vlaab+gacaqG0bGaaeiAaiaabwgacaqGYbGaae4CaiaacMcacaaMe8 UaaGPaVlabg2Hi1kaaykW7caaMe8+aaSaaaeaacaaIXaaabaGaeq4W dm3aa0baaSqaaiaadUgaaeaadaaeWaqaaiaadMeadaWgaaadbaGaai ikaiaadQhadaWgaaqaaiaadMgaaeqaaiabg2da9iaaicdacaGGPaaa beaaaeaacaWGPbGaaGypaiaaigdaaeaacaWGjbaaoiabggHiLdaaaO GaaiikaiaaigdacaaMe8Uaey4kaSIaaGjbVlabeo8aZnaaDaaaleaa caWGRbaabaGaaGOmaaaakiaacMcadaahaaWcbeqaaiaaikdaaaaaaO GaaGjbVlaabwgacaqG4bGaaeiCamaacmqabaGaeyOeI0YaaSaaaeaa caaIXaaabaGaaGOmaiabeo8aZnaaDaaaleaacaWGRbaabaGaaGOmaa aaaaGcdaaeqbqaaiaaykW7cqaH3oaAdaqhaaWcbaGaamyAaiaadUga aeaacaaIYaaaaaqaaiaadQhadaWgaaadbaGaamyAaaqabaWccaaI9a GaaGimaaqab0GaeyyeIuoaaOGaay5Eaiaaw2haaiaac6caaaa@7D73@

In this model, we suggest using the Metropolis-Hastings algorithm, which is the most commonly used Markov Chain Monte Carlo (MCMC) algorithm used to estimate the value of the location parameter, ( θ , η ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaqadeqaaiabeI7aXjaaiYcacaaMe8 UaaC4TdaGaayjkaiaawMcaaiaac6caaaa@38B4@ Of course, ( σ 2 , σ 1 2 , , σ ( K 1 ) 2 ) MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaqadeqaaiabeo8aZnaaCaaaleqaba GaaGOmaaaakiaaiYcacaaMe8Uaeq4Wdm3aa0baaSqaaiaaigdaaeaa caaIYaaaaOGaaGilaiaaysW7cqWIMaYscaGGSaGaaGjbVlabeo8aZn aaDaaaleaadaqadeqaaiaadUeacaaMc8UaeyOeI0IaaGPaVlaaigda aiaawIcacaGLPaaaaeaacaaIYaaaaaGccaGLOaGaayzkaaaaaa@4AA0@ is drawn from the above full conditionals, and the Gibbs sampler is performed using the grid method.

B. Computations for nonparameteric models

In order to pool the parameters in nonparametric Bayesian models, we apply the slice sampling mehtod introduced by the Kalli, Griffin and Walker (2011). They proposed an efficient version of the slice sampler for Dirichlet process mixture models constructed by Walker (2007). Suppose that the observations y i , i = 1, , I MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG5bWaaSbaaSqaaiaadMgaaeqaaO GaaGilaiaaysW7caWGPbGaaGjbVlaai2dacaaMe8UaaGymaiaaiYca caaMe8UaeSOjGSKaaiilaiaaysW7caWGjbaaaa@419B@ are generated in the Dirichlet process mixture model with parameter θ . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH4oqCcaGGUaaaaa@33A4@ That is,

y i | G ~ iid G G ~ DP ( α , G 0 ) MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakqaabeqaamaaeiqabaGaamyEamaaBaaale aacaWGPbaabeaakiaaykW7aiaawIa7aiaaykW7caqGhbGaaGjbVlaa ykW7daGfGbqabSqabeaacaqGPbGaaeyAaiaabsgaaeaaieaajugybi aa=5haaaGccaaMc8UaaGjbVlaabEeaaeaacaqGhbGaaGPaVlaaysW7 caWF+bGaaGPaVlaaysW7caqGebGaaeiuamaabmqabaGaeqySdeMaaG ilaiaaysW7caqGhbWaaSbaaSqaaiaaicdaaeqaaaGccaGLOaGaayzk aaaaaaa@55B8@

Here, we write G ~ DP ( α , G 0 ) MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaqGhbGaaGjbVJqaaiaa=5hacaaMe8 Uaaeiraiaabcfadaqadeqaaiabeg7aHjaaiYcacaaMe8Uaae4ramaa BaaaleaacaaIWaaabeaaaOGaayjkaiaawMcaaaaa@3EE8@ to denote that G MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaqGhbaaaa@3206@ follows a Dirichlet process with parameter α > 0. MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHXoqycaaMe8UaaGOpaiaaysW7ca aIWaGaaiOlaaaa@3829@ Then G MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaqGhbaaaa@3206@ has a stick-breaking representation (Sethuraman, 1994) given by

P ( y i | G , α ) = j = 1 w j f ( y i | θ j ) MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaafaqaaeqabaaabaGaamiuamaabmqaba WaaqGabeaacaWG5bWaaSbaaSqaaiaadMgaaeqaaOGaaGPaVdGaayjc SdGaaGPaVlaadEeacaaISaGaaGjbVlabeg7aHbGaayjkaiaawMcaai aaykW7caaMe8UaaGypaiaaysW7caaMc8+aaabCaeaacaWG3bWaaSba aSqaaiaadQgaaeqaaOGaamOzamaabmqabaWaaqGabeaacaWG5bWaaS baaSqaaiaadMgaaeqaaOGaaGPaVdGaayjcSdGaaGPaVlabeI7aXnaa BaaaleaacaWGQbaabeaaaOGaayjkaiaawMcaaaWcbaGaamOAaiaai2 dacaaIXaaabaGaeyOhIukaniabggHiLdaaaaaa@5A7C@

where θ 1 , θ 2 , θ 3 , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH4oqCdaWgaaWcbaGaaGymaaqaba GccaaISaGaaGjbVlabeI7aXnaaBaaaleaacaaIYaaabeaakiaaiYca caaMe8UaeqiUde3aaSbaaSqaaiaaiodaaeqaaOGaaGilaiaaysW7cq WIMaYsaaa@411F@ are independent and identically distributed (iid) form P 0 MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaqGqbWaaSbaaSqaaiaaicdaaeqaaa aa@32F5@ and

w 1 = ν 1 , w j = ν j l < j ( 1 ν l ) MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaafaqaaeqabaaabaGaam4DamaaBaaale aacaaIXaaabeaakiaaysW7caaMc8UaaGypaiaaysW7caaMc8UaeqyV d42aaSbaaSqaaiaaigdaaeqaaOGaaGilaiaaywW7caaMf8Uaam4Dam aaBaaaleaacaWGQbaabeaakiaaysW7caaMc8UaaGypaiaaysW7caaM c8UaeqyVd42aaSbaaSqaaiaadQgaaeqaaOWaaebuaeaadaqadeqaai aaigdacaaMe8UaeyOeI0IaaGjbVlabe27aUnaaBaaaleaacaWGSbaa beaaaOGaayjkaiaawMcaaaWcbaGaamiBaiabgYda8iaadQgaaeqani abg+Givdaaaaaa@5ABA@

with the ν j MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH9oGBdaWgaaWcbaGaamOAaaqaba aaaa@340F@ being iid from Beta ( 1, α ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaaqaaaaaaaaaWdbiaabkeacaqGLbGaae iDaiaabggapaWaaeWabeaacaaIXaGaaGilaiaaysW7cqaHXoqyaiaa wIcacaGLPaaacaGGSaaaaa@3BCA@ see also Antoniak (1974).

The Slice sampler algorithm proposed by Walker (2007) introduces a latent variable u ( 0, 1 ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG1bGaaGjbVlabgIGiolaaysW7da qadeqaaiaaicdacaaISaGaaGjbVlaaigdaaiaawIcacaGLPaaacaGG Saaaaa@3CC6@ d i = 1, 2, MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGKbWaaSbaaSqaaiaadMgaaeqaaO GaaGjbVlaai2dacaaMe8UaaGymaiaaiYcacaaMe8UaaGOmaiaaiYca caaMe8UaeSOjGSeaaa@3E49@ to perform sampling on the joint distribution. First, the latent variable u i MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG1bWaaSbaaSqaaiaadMgaaeqaaa aa@3350@ has a joint density as follow

P ( y i , u i | G , α ) = j = 1 I ( u i < w j ) f ( y i | θ j ) . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaafaqaaeqabaaabaGaamiuamaabmqaba WaaqGabeaacaWG5bWaaSbaaSqaaiaadMgaaeqaaOGaaGilaiaaysW7 caWG1bWaaSbaaSqaaiaadMgaaeqaaOGaaGPaVdGaayjcSdGaaGPaVl aadEeacaaISaGaaGjbVlabeg7aHbGaayjkaiaawMcaaiaaysW7caaM c8UaaGypaiaaysW7caaMc8+aaabCaeaacaWGjbWaaSbaaSqaamaabm qabaGaamyDamaaBaaameaacaWGPbaabeaaliabgYda8iaadEhadaWg aaadbaGaamOAaaqabaaaliaawIcacaGLPaaaaeqaaOGaamOzamaabm qabaWaaqGabeaacaWG5bWaaSbaaSqaaiaadMgaaeqaaOGaaGPaVdGa ayjcSdGaaGPaVlabeI7aXnaaBaaaleaacaWGQbaabeaaaOGaayjkai aawMcaaiaac6caaSqaaiaadQgacaaI9aGaaGymaaqaaiabg6HiLcqd cqGHris5aaaaaaa@6543@

Later, they introduced a latent variable d i MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGKbWaaSbaaSqaaiaadMgaaeqaaa aa@333F@ representing the group assignment of the observation i . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGPbGaaiOlaaaa@32DC@ At this time, the joint density of ( y i , u i , d i ) MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaqadeqaaiaadMhadaWgaaWcbaGaam yAaaqabaGccaaISaGaaGjbVlaadwhadaWgaaWcbaGaamyAaaqabaGc caaISaGaaGjbVlaadsgadaWgaaWcbaGaamyAaaqabaaakiaawIcaca GLPaaaaaa@3D99@ is as follow

P ( y i , u i , d i | G , α ) = j = 1 I ( u i < w d i = j ) f ( y i | θ j ) . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaafaqaaeqabaaabaGaamiuamaabmqaba WaaqGabeaacaWG5bWaaSbaaSqaaiaadMgaaeqaaOGaaGilaiaaysW7 caWG1bWaaSbaaSqaaiaadMgaaeqaaOGaaGilaiaaysW7caWGKbWaaS baaSqaaiaadMgaaeqaaOGaaGPaVdGaayjcSdGaaGPaVlaadEeacaaI SaGaaGjbVlabeg7aHbGaayjkaiaawMcaaiaaysW7caaMc8UaaGypai aaykW7caaMe8+aaabCaeaacaWGjbWaaSbaaSqaamaabmqabaGaamyD amaaBaaameaacaWGPbaabeaaliabgYda8iaadEhadaWgaaadbaGaam izamaaBaaabaGaamyAaaqabaGaeyypa0JaamOAaaqabaaaliaawIca caGLPaaaaeqaaOGaamOzamaabmqabaWaaqGabeaacaWG5bWaaSbaaS qaaiaadMgaaeqaaOGaaGPaVdGaayjcSdGaaGPaVlabeI7aXnaaBaaa leaacaWGQbaabeaaaOGaayjkaiaawMcaaaWcbaGaamOAaiaai2daca aIXaaabaGaeyOhIukaniabggHiLdGccaaIUaaaaaaa@6CA1@

Then we need to sample the parameter θ , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH4oqCcaGGSaaaaa@33A2@ α , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHXoqycaGGSaaaaa@338B@ and ν MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH9oGBaaa@32F4@ including latent variables u MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG1baaaa@3236@ and d MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGKbaaaa@3225@ at each iteration of a Gibbs sampler. Kalli et al. (2011) introduces how to perform slice sampling for Dirichlet process mixture models by processing u MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG1baaaa@3236@ and ν MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH9oGBaaa@32F4@ as blocks in the basic algorithm described by Walker (2007). The algorithm is as follow.

  1. π ( θ j | ) G 0 ( θ j ) d i = j f ( y i | θ j ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaeq iUde3aaSbaaSqaaiaadQgaaeqaaOGaaGPaVdGaayjcSdGaaGPaVlab lAcilbGaayjkaiaawMcaaiaaysW7cqGHDisTcaaMe8Uaam4ramaaBa aaleaacaaIWaaabeaakmaabmqabaGaeqiUde3aaSbaaSqaaiaadQga aeqaaaGccaGLOaGaayzkaaWaaebeaeaacaWGMbWaaeWabeaadaabce qaaiaadMhadaWgaaWcbaGaamyAaaqabaGccaaMc8oacaGLiWoacaaM c8UaeqiUde3aaSbaaSqaaiaadQgaaeqaaaGccaGLOaGaayzkaaaale aacaWGKbWaaSbaaWqaaiaadMgaaeqaaSGaaGypaiaadQgaaeqaniab g+GivdGccaGGSaaaaa@5A58@
  2. π ( ν j ) Beta ( a j , b j ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaaiabe27aUnaaBa aaleaacaWGQbaabeaaaOGaayjkaiaawMcaaiaaysW7cqGHDisTcaaM e8oeaaaaaaaaa8qacaqGcbGaaeyzaiaabshacaqGHbWdamaabmqaba GaamyyamaaBaaaleaacaWGQbaabeaakiaaiYcacaaMe8UaamOyamaa BaaaleaacaWGQbaabeaaaOGaayjkaiaawMcaaiaacYcaaaa@4845@ where a j = 1 + i = 1 I I ( d i = j ) MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGHbWaaSbaaSqaaiaadQgaaeqaaO GaaGjbVlaai2dacaaMe8UaaGymaiaaysW7cqGHRaWkcaaMe8+aaabm aeaacaWGjbWaaSbaaSqaamaabmqabaGaamizamaaBaaameaacaWGPb aabeaaliabg2da9iaadQgaaiaawIcacaGLPaaaaeqaaaqaaiaadMga caaI9aGaaGymaaqaaiaadMeaa0GaeyyeIuoaaaa@479C@ and b j = α + i = 1 I I ( d i > j ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGIbWaaSbaaSqaaiaadQgaaeqaaO GaaGjbVlaai2dacaaMe8UaeqySdeMaaGjbVlabgUcaRiaaysW7daae WaqaaiaadMeadaWgaaWcbaWaaeWabeaacaWGKbWaaSbaaWqaaiaadM gaaeqaaSGaeyOpa4JaamOAaaGaayjkaiaawMcaaaqabaaabaGaamyA aiaai2dacaaIXaaabaGaamysaaqdcqGHris5aOGaaiilaaaa@493D@
  3. π ( u i | ) I ( 0 < u i < ξ d i ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaam yDamaaBaaaleaacaWGPbaabeaakiaaykW7aiaawIa7aiaaykW7cqWI MaYsaiaawIcacaGLPaaacaaMe8UaeyyhIuRaaGjbVlaadMeadaWgaa WcbaWaaeWabeaacaaIWaGaeyipaWJaamyDamaaBaaameaacaWGPbaa beaaliabgYda8iabe67a4naaBaaameaacaWGKbWaaSbaaeaacaWGPb aabeaaaeqaaaWccaGLOaGaayzkaaaabeaakiaacYcaaaa@4D1D@ where ξ j = ( 1 κ ) κ j 1 , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH+oaEdaWgaaWcbaGaamOAaaqaba GccaaMe8UaaGypaiaaysW7daqadeqaaiaaigdacaaMe8UaeyOeI0Ia aGjbVlabeQ7aRbGaayjkaiaawMcaaiabeQ7aRnaaCaaaleqabaGaam OAaiabgkHiTiaaigdaaaGccaGGSaaaaa@4533@ and κ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH6oWAaaa@32EE@ is a constant,
  4. P ( d i = k | ) I ( k : ξ k > u i ) w k / ξ k f ( y i | θ k ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGqbWaaeWabeaadaabceqaaiaads gadaWgaaWcbaGaamyAaaqabaGccaaMe8UaaGypaiaaysW7caWGRbGa aGPaVdGaayjcSdGaaGPaVlablAcilbGaayjkaiaawMcaaiaaysW7cq GHDisTcaaMe8+aaSGbaeaacaWGjbWaaSbaaSqaamaabmqabaGaam4A aiaaiQdacaaMc8UaeqOVdG3aaSbaaWqaaiaadUgaaeqaaSGaeyOpa4 JaamyDamaaBaaameaacaWGPbaabeaaaSGaayjkaiaawMcaaaqabaGc caWG3bWaaSbaaSqaaiaadUgaaeqaaaGcbaGaeqOVdG3aaSbaaSqaai aadUgaaeqaaOGaamOzamaabmqabaWaaqGabeaacaWG5bWaaSbaaSqa aiaadMgaaeqaaOGaaGPaVdGaayjcSdGaaGPaVlabeI7aXnaaBaaale aacaWGRbaabeaaaOGaayjkaiaawMcaaaaacaGGSaaaaa@62B3@
  5. π ( α | ) α J j = 1 J ( 1 ν j ) α 1 π ( α ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaeq ySdeMaaGPaVdGaayjcSdGaaGPaVlablAcilbGaayjkaiaawMcaaiaa ysW7cqGHDisTcaaMe8UaeqySde2aaWbaaSqabeaacaWGkbaaaOWaae bmaeaadaqadeqaaiaaigdacaaMe8UaeyOeI0IaaGjbVlabe27aUnaa BaaaleaacaWGQbaabeaaaOGaayjkaiaawMcaamaaCaaaleqabaGaeq ySdeMaeyOeI0IaaGymaaaakiabec8aWnaabmqabaGaaGzaVlabeg7a HjaaygW7aiaawIcacaGLPaaaaSqaaiaadQgacaaI9aGaaGymaaqaai aadQeaa0Gaey4dIunakiaac6caaaa@5DBE@

For this paper, we need to sample the following variables at each iteration of a Gibbs sampler:

{ ( π j , ν j ) , j = 1, 2, , ; ( d i , u i ) , i = 1, , I } . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaGadeqaamaabmqabaGaaCiWdmaaBa aaleaacaWGQbaabeaakiaaiYcacaaMe8UaeqyVd42aaSbaaSqaaiaa dQgaaeqaaaGccaGLOaGaayzkaaGaaGilaiaaysW7caWGQbGaaGjbVl aai2dacaaMe8UaaGymaiaaiYcacaaMe8UaaGOmaiaaiYcacaaMe8Ua eSOjGSKaaiilaiaaykW7caaI7aGaaGjbVpaabmqabaGaamizamaaBa aaleaacaWGPbaabeaakiaaiYcacaaMe8UaamyDamaaBaaaleaacaWG PbaabeaaaOGaayjkaiaawMcaaiaaiYcacaaMe8UaamyAaiaaysW7ca aI9aGaaGjbVlaaigdacaaISaGaaGjbVlablAciljaaiYcacaaMe8Ua amysaaGaay5Eaiaaw2haaiaai6caaaa@663A@

In general, κ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH6oWAaaa@32EE@ is equal to 0.5. However, we use κ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH6oWAaaa@32EE@ as a tuning parameter for the hierarchical Bayesian model. Then, the full posterior density for the nonparametric adaptive pooling of he given data is given as follows:

P ( n , d , u | ν , π ) { i = 1 I π ( π i | μ , τ ) } π ( μ , τ ) π ( ν | α ) π ( α ) { i = 1 I I ( u i < ξ d i ) w d i ξ d i n i . ! k = 1 K π d i k n i k n i k ! } { i = 1 I 1 D ( μ τ ) k = 1 K π i k μ k τ 1 } × { ( K 1 ) ! ( 1 + τ ) 2 } { j = 1 J 1 B ( 1, α ) ( 1 ν j ) α 1 } 1 ( 1 + α ) 2 , MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakqaabeqaaiaadcfadaqadeqaamaaeiqaba GaaCOBaiaaiYcacaaMe8UaaCizaiaaiYcacaaMe8UaaCyDaaGaayjc SdGaaGPaVlaah27acaaISaGaaGjbVlaahc8aaiaawIcacaGLPaaada GadeqaamaarahabaGaeqiWda3aaeWabeaadaabceqaaiaahc8adaWg aaWcbaGaamyAaaqabaGccaaMc8oacaGLiWoacaaMc8UaaCiVdiaaiY cacaaMe8UaeqiXdqhacaGLOaGaayzkaaaaleaacaWGPbGaaGypaiaa igdaaeaacaWGjbaaniabg+GivdaakiaawUhacaGL9baacaaMe8Uaeq iWda3aaeWabeaacaWH8oGaaGilaiaaysW7cqaHepaDaiaawIcacaGL PaaacaaMe8UaeqiWda3aaeWabeaadaabceqaaiaah27acaaMc8oaca GLiWoacaaMc8UaeqySdegacaGLOaGaayzkaaGaaGjbVlabec8aWnaa bmqabaGaaGzaVlabeg7aHjaaygW7aiaawIcacaGLPaaaaeaacaaMf8 UaaGzbVlaaywW7caaMf8UaaGzbVlabg2Hi1kaaykW7caaMe8+aaiWa beaadaqeWbqaaiaadMeadaWgaaWcbaWaaeWabeaacaWG1bWaaSbaaW qaaiaadMgaaeqaaSGaeyipaWJaeqOVdG3aaSbaaWqaaiaadsgadaWg aaqaaiaadMgaaeqaaaqabaaaliaawIcacaGLPaaaaeqaaOWaaSaaae aacaWG3bWaaSbaaSqaaiaadsgadaWgaaadbaGaamyAaaqabaaaleqa aaGcbaGaeqOVdG3aaSbaaSqaaiaadsgadaWgaaadbaGaamyAaaqaba aaleqaaaaakiaad6gadaWgaaWcbaGaamyAaiaai6caaeqaaOGaaGyi aiaaysW7daqeWbqaamaalaaabaGaeqiWda3aa0baaSqaaiaadsgada WgaaadbaGaamyAaaqabaWccaWGRbaabaGaamOBamaaBaaameaacaWG PbGaam4AaaqabaaaaaGcbaGaamOBamaaBaaaleaacaWGPbGaam4Aaa qabaGccaaIHaaaaaWcbaGaam4Aaiaai2dacaaIXaaabaGaam4saaqd cqGHpis1aaWcbaGaamyAaiaai2dacaaIXaaabaGaamysaaqdcqGHpi s1aaGccaGL7bGaayzFaaGaaGjbVpaacmqabaWaaebCaeaadaWcaaqa aiaaigdaaeaacaWGebWaaeWabeaacaWH8oGaeqiXdqhacaGLOaGaay zkaaaaamaarahabaGaeqiWda3aa0baaSqaaiaadMgacaWGRbaabaGa eqiVd02aaSbaaWqaaiaadUgaaeqaaSGaeqiXdqNaeyOeI0IaaGymaa aaaeaacaWGRbGaaGypaiaaigdaaeaacaWGlbaaniabg+Givdaaleaa caWGPbGaaGypaiaaigdaaeaacaWGjbaaniabg+GivdaakiaawUhaca GL9baaaeaacaaMf8UaaGzbVlaaywW7caaMf8UaaGzbVlaaysW7cqGH xdaTcaaMc8UaaGjbVpaacmqabaWaaSaaaeaadaqadeqaaiaadUeaca aMe8UaeyOeI0IaaGjbVlaaigdaaiaawIcacaGLPaaacaaIHaaabaWa aeWabeaacaaIXaGaaGjbVlabgUcaRiaaysW7cqaHepaDaiaawIcaca GLPaaadaahaaWcbeqaaiaaikdaaaaaaaGccaGL7bGaayzFaaGaaGjb VpaacmqabaWaaebCaeaadaWcaaqaaiaaigdaaeaacaWGcbWaaeWabe aacaaIXaGaaGilaiaaysW7cqaHXoqyaiaawIcacaGLPaaaaaWaaeWa beaacaaIXaGaaGjbVlabgkHiTiaaysW7cqaH9oGBdaWgaaWcbaGaam OAaaqabaaakiaawIcacaGLPaaadaahaaWcbeqaaiabeg7aHjabgkHi TiaaigdaaaaabaGaamOAaiaai2dacaaIXaaabaGaamOsaaqdcqGHpi s1aaGccaGL7bGaayzFaaGaaGjbVpaalaaabaGaaGymaaqaamaabmqa baGaaGymaiaaysW7cqGHRaWkcaaMe8UaeqySdegacaGLOaGaayzkaa WaaWbaaSqabeaacaaIYaaaaaaakiaaiYcaaaaa@1F73@

where d = ( d 1 , , d I ) , MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHKbGaaGjbVlaai2dacaaMe8+aae WabeaacaWGKbWaaSbaaSqaaiaaigdaaeqaaOGaaGilaiaaysW7cqWI MaYscaGGSaGaaGjbVlaadsgadaWgaaWcbaGaamysaaqabaaakiaawI cacaGLPaaacaGGSaaaaa@41AC@ u = ( u 1 , , u I ) , MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH1bGaaGjbVlaai2dacaaMe8+aae WabeaacaWG1bWaaSbaaSqaaiaaigdaaeqaaOGaaGilaiaaysW7cqWI MaYscaGGSaGaaGjbVlaadwhadaWgaaWcbaGaamysaaqabaaakiaawI cacaGLPaaacaGGSaaaaa@41DF@ ν = ( ν 1 , , ν j ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH9oGaaGjbVlaai2dacaaMe8+aae WabeaacqaH9oGBdaWgaaWcbaGaaGymaaqabaGccaaISaGaaGjbVlab lAciljaacYcacaaMe8UaeqyVd42aaSbaaSqaaiaadQgaaeqaaaGcca GLOaGaayzkaaGaaiilaaaa@43C8@ and the hyperparameters are mutually independent. Then, our Gibbs sampler can be performed in two steps.

The first step is the pooling of the data:

(a)
Draw for u i MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG1bWaaSbaaSqaaiaadMgaaeqaaa aa@3350@ from Uniform ( 0, ξ d i ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaqGvbGaaeOBaiaabMgacaqGMbGaae 4BaiaabkhacaqGTbWaaeWabeaacaaIWaGaaGilaiaaysW7cqaH+oaE daWgaaWcbaGaamizamaaBaaameaacaWGPbaabeaaaSqabaaakiaawI cacaGLPaaacaGGUaaaaa@40F2@
(b)
Draw for d i MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGKbWaaSbaaSqaaiaadMgaaeqaaa aa@333F@ from P ( d i = j | others ) = I ( u i < ξ j ) w j / ξ j k = 1 K π j k n i k / n i k ! . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGqbWaaeWabeaacaWGKbWaaSbaaS qaaiaadMgaaeqaaOGaaGjbVlaai2dacaaMe8+aaqGabeaacaWGQbGa aGPaVdGaayjcSdGaaGPaVlaab+gacaqG0bGaaeiAaiaabwgacaqGYb Gaae4CaaGaayjkaiaawMcaaiaaysW7caaI9aGaaGjbVpaalyaabaGa amysamaaBaaaleaadaqadeqaaiaadwhadaWgaaadbaGaamyAaaqaba WccqGH8aapcqaH+oaEdaWgaaadbaGaamOAaaqabaaaliaawIcacaGL PaaaaeqaaOGaam4DamaaBaaaleaacaWGQbaabeaaaOqaaiabe67a4n aaBaaaleaacaWGQbaabeaakmaaradabaWaaSGbaeaacqaHapaCdaqh aaWcbaGaamOAaiaadUgaaeaacaWGUbWaaSbaaWqaaiaadMgacaWGRb aabeaaaaaakeaacaWGUbWaaSbaaSqaaiaadMgacaWGRbaabeaakiaa igcaaaaaleaacaWGRbGaaGypaiaaigdaaeaacaWGlbaaniabg+Givd aaaOGaaiOlaaaa@66F0@ Next, we can generate the value of each parameter from the following conditional density:
(c)
Draw π j , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHapWaaSbaaSqaaiaadQgaaeqaaO Gaaiilaaaa@345D@ j = 1, , J , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGQbGaaGjbVlaai2dacaaMe8UaaG ymaiaaiYcacaaMe8UaeSOjGSKaaiilaiaaysW7caWGkbGaaiilaaaa @3DE8@ from Dirichlet ( μ τ + d i = j n i 1 ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaaqaaaaaaaaaWdbiaabseacaqGPbGaae OCaiaabMgacaqGJbGaaeiAaiaabYgacaqGLbGaaeiDa8aadaqadeqa aiaahY7acqaHepaDcaaMe8Uaey4kaSIaaGjbVpaaqababaGaaCOBam aaBaaaleaacaWGPbaabeaakiaaysW7cqGHsislcaaMe8UaaGymaaWc baGaamizamaaBaaameaacaWGPbaabeaaliaai2dacaWGQbaabeqdcq GHris5aaGccaGLOaGaayzkaaGaaiOlaaaa@4F72@
(d)
Draw ν j , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH9oGBdaWgaaWcbaGaamOAaaqaba GccaGGSaaaaa@34C9@ j = 1, , J , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGQbGaaGjbVlaai2dacaaMe8UaaG ymaiaaiYcacaaMe8UaeSOjGSKaaiilaiaaysW7caWGkbGaaiilaaaa @3DE8@ from Beta ( 1 + i = 1 I I ( d i = j ) , α + i = 1 I I ( d i = j ) ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaaqaaaaaaaaaWdbiaabkeacaqGLbGaae iDaiaabggapaWaaeWabeaacaaIXaGaaGjbVlabgUcaRiaaysW7daae WaqaaiaadMeadaWgaaWcbaWaaeWabeaacaWGKbWaaSbaaWqaaiaadM gaaeqaaSGaeyypa0JaamOAaaGaayjkaiaawMcaaaqabaGccaaISaaa leaacaWGPbGaaGypaiaaigdaaeaacaWGjbaaniabggHiLdGccaaMe8 UaeqySdeMaaGjbVlabgUcaRiaaysW7daaeWaqaaiaadMeadaWgaaWc baWaaeWabeaacaWGKbWaaSbaaWqaaiaadMgaaeqaaSGaeyypa0Jaam OAaaGaayjkaiaawMcaaaqabaaabaGaamyAaiaai2dacaaIXaaabaGa amysaaqdcqGHris5aaGccaGLOaGaayzkaaGaaiOlaaaa@5B67@
(e)
Draw μ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oaaaa@3284@ from

π ( μ | others ) j = 1 J 1 D ( μ τ ) k = 1 K π j k μ k τ 1 . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaaiaahY7acaaMe8 UaaGiFaiaaysW7caqGVbGaaeiDaiaabIgacaqGLbGaaeOCaiaaboha aiaawIcacaGLPaaacaaMe8UaaGPaVlabg2Hi1kaaykW7caaMe8+aae bCaeaadaWcaaqaaiaaigdaaeaacaWGebWaaeWabeaacaWH8oGaeqiX dqhacaGLOaGaayzkaaaaamaarahabaGaeqiWda3aa0baaSqaaiaadQ gacaWGRbaabaGaeqiVd02aaSbaaWqaaiaadUgaaeqaaSGaeqiXdqNa eyOeI0IaaGymaaaakiaai6caaSqaaiaadUgacaaI9aGaaGymaaqaai aadUeaa0Gaey4dIunaaSqaaiaadQgacaaI9aGaaGymaaqaaiaadQea a0Gaey4dIunaaaa@6326@

(f)
Draw τ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDaaa@3301@ from

π ( τ | others ) { j = 1 J 1 D ( μ τ ) k = 1 K π j k μ k τ 1 } ( K 1 ) ! ( τ + 1 ) 2 . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaaiabes8a0jaays W7caaI8bGaaGjbVlaab+gacaqG0bGaaeiAaiaabwgacaqGYbGaae4C aaGaayjkaiaawMcaaiaaysW7caaMc8UaeyyhIuRaaGPaVlaaysW7da GadeqaamaarahabaWaaSaaaeaacaaIXaaabaGaamiramaabmqabaGa aCiVdiabes8a0bGaayjkaiaawMcaaaaadaqeWbqaaiabec8aWnaaDa aaleaacaWGQbGaam4AaaqaaiabeY7aTnaaBaaameaacaWGRbaabeaa liabes8a0jabgkHiTiaaigdaaaaabaGaam4Aaiaai2dacaaIXaaaba Gaam4saaqdcqGHpis1aaWcbaGaamOAaiaai2dacaaIXaaabaGaamOs aaqdcqGHpis1aaGccaGL7bGaayzFaaGaaGjbVpaalaaabaWaaeWabe aacaWGlbGaaGjbVlabgkHiTiaaysW7caaIXaaacaGLOaGaayzkaaGa aGyiaaqaamaabmqabaGaeqiXdqNaaGjbVlabgUcaRiaaysW7caaIXa aacaGLOaGaayzkaaWaaWbaaSqabeaacaaIYaaaaaaakiaai6caaaa@7827@

For our Gibbs sampler, we need to transform τ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDaaa@3301@ to ρ = 1 / ( 1 + τ ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHbpGCcaaMe8UaaGypaiaaysW7da WcgaqaaiaaigdaaeaadaqadeqaaiaaigdacaaMe8Uaey4kaSIaaGjb Vlabes8a0bGaayjkaiaawMcaaaaacaGGSaaaaa@4064@ 0 < ρ < 1 MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaaIWaGaaGjbVlabgYda8iaaysW7cq aHbpGCcaaMe8UaeyipaWJaaGjbVlaaigdaaaa@3CAD@ because we need to use the grid method for τ , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDcaGGSaaaaa@33B1@ which is taken from the noninformative prior with variable support equal to ( 0 , ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaqadeqaaiaaicdacaGGSaGaaGjbVl abg6HiLcGaayjkaiaawMcaaiaac6caaaa@37E0@

π ( ρ | others ) { j = 1 J 1 D ( μ 1 ρ ρ ) k = 1 K π j k μ k 1 ρ ρ 1 } ( K 1 ) ! . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaaiabeg8aYjaays W7caaI8bGaaGjbVlaab+gacaqG0bGaaeiAaiaabwgacaqGYbGaae4C aaGaayjkaiaawMcaaiaaysW7caaMc8UaeyyhIuRaaGjbVlaaykW7da GadeqaamaarahabaWaaSaaaeaacaaIXaaabaGaamiramaabmqabaGa aCiVdmaaleaaleaacaaIXaGaaGjbVlabgkHiTiaaysW7cqaHbpGCae aacqaHbpGCaaaakiaawIcacaGLPaaaaaGaaGjbVpaarahabaGaeqiW da3aa0baaSqaaiaadQgacaWGRbaabaGaeqiVd02aaSbaaWqaaiaadU gaaeqaaSWaaSqaaWqaaiaaigdacqGHsislcqaHbpGCaeaacqaHbpGC aaWccqGHsislcaaIXaaaaaqaaiaadUgacaaI9aGaaGymaaqaaiaadU eaa0Gaey4dIunaaSqaaiaadQgacaaI9aGaaGymaaqaaiaadQeaa0Ga ey4dIunaaOGaay5Eaiaaw2haaiaaysW7daqadeqaaiaadUeacaaMe8 UaeyOeI0IaaGjbVlaaigdaaiaawIcacaGLPaaacaaIHaGaaGOlaaaa @7AD4@

(g)
Draw α MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHXoqyaaa@32DB@ from

π ( α | others ) { j = 1 J ( 1 ν j ) α 1 } α J ( 1 + α ) 2 . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaaiabeg7aHjaays W7caaI8bGaaGjbVlaab+gacaqG0bGaaeiAaiaabwgacaqGYbGaae4C aaGaayjkaiaawMcaaiaaysW7caaMc8UaeyyhIuRaaGPaVlaaysW7da GadeqaamaarahabaWaaeWabeaacaaIXaGaaGjbVlabgkHiTiaaysW7 cqaH9oGBdaWgaaWcbaGaamOAaaqabaaakiaawIcacaGLPaaadaahaa Wcbeqaaiabeg7aHjabgkHiTiaaigdaaaaabaGaamOAaiabg2da9iaa igdaaeaacaWGkbaaniabg+GivdaakiaawUhacaGL9baacaaMe8+aaS aaaeaacqaHXoqydaahaaWcbeqaaiaadQeaaaaakeaadaqadeqaaiaa igdacaaMe8Uaey4kaSIaaGjbVlabeg7aHbGaayjkaiaawMcaamaaCa aaleqabaGaaGOmaaaaaaGccaaIUaaaaa@69E4@

The parameter α MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHXoqyaaa@32DB@ is also taken from the noninformative prior with variable support equal to ( 0 , ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaqadeqaaiaaicdacaGGSaGaaGjbVl abg6HiLcGaayjkaiaawMcaaiaacYcaaaa@37DE@ as in the case of τ . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDcaGGUaaaaa@33B3@ Therefore, we need to transform α MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHXoqyaaa@32DB@ to δ , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH0oazcaGGSaaaaa@3391@ with Jacobian 1 / δ 2 . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaWcgaqaaiaaigdaaeaacqaH0oazda ahaaWcbeqaaiaaikdaaaaaaOGaaiOlaaaa@3557@ Then, the conditional density for δ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH0oazaaa@32E1@ is given as follows:

π ( δ | others ) { j = 1 J ( 1 ν j ) 1 δ δ 1 } ( 1 δ δ ) J . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaaiabes7aKjaays W7caaI8bGaaGjbVlaab+gacaqG0bGaaeiAaiaabwgacaqGYbGaae4C aaGaayjkaiaawMcaaiaaysW7caaMc8UaeyyhIuRaaGPaVlaaysW7da GadeqaamaarahabeWcbaGaamOAaiaai2dacaaIXaaabaGaamOsaaqd cqGHpis1aOWaaeWabeaacaaIXaGaaGjbVlabgkHiTiaaysW7cqaH9o GBdaWgaaWcbaGaamOAaaqabaaakiaawIcacaGLPaaadaahaaWcbeqa amaaleaameaacaaIXaGaeyOeI0IaeqiTdqgabaGaeqiTdqgaaSGaey OeI0IaaGymaaaaaOGaay5Eaiaaw2haaiaaysW7daqadeqaamaalaaa baGaaGymaiaaysW7cqGHsislcaaMe8UaeqiTdqgabaGaeqiTdqgaaa GaayjkaiaawMcaamaaCaaaleqabaGaamOsaaaakiaai6caaaa@6C5F@

The nonparametric version for the restricted pooling has π j = ( π j 1 , , π j K ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHapWaaSbaaSqaaiaadQgaaeqaaO GaaGjbVlaai2dacaaMe8+aaeWabeaacqaHapaCdaWgaaWcbaGaamOA aiaaigdaaeqaaOGaaGilaiaaysW7cqWIMaYscaGGSaGaaGjbVlabec 8aWnaaBaaaleaacaWGQbGaam4saaqabaaakiaawIcacaGLPaaacaGG Saaaaa@46B9@ μ = ( μ 1 , , μ K ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oGaaGjbVlaai2dacaaMe8+aae WabeaacqaH8oqBdaWgaaWcbaGaaGymaaqabaGccaaISaGaaGjbVlab lAciljaacYcacaaMe8UaeqiVd02aaSbaaSqaaiaadUeaaeqaaaGcca GLOaGaayzkaaGaaiilaaaa@43A4@ 0 μ k 1 , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaaIWaGaaGjbVlabgsMiJkaaysW7cq aH8oqBdaWgaaWcbaGaam4AaaqabaGccaaMe8UaeyizImQaaGjbVlaa igdacaGGSaaaaa@3FDB@ k = 1 K μ k = 1 , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaaeWaqaaiabeY7aTnaaBaaaleaaca WGRbaabeaakiaaysW7caaI9aGaaGjbVlaaigdaaSqaaiaadUgacaaI 9aGaaGymaaqaaiaadUeaa0GaeyyeIuoakiaacYcaaaa@3EB2@ d = ( d 1 , , d I ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHKbGaaGjbVlaai2dacaaMe8+aae WabeaacaWGKbWaaSbaaSqaaiaaigdaaeqaaOGaaGilaiaaysW7cqWI MaYscaGGSaGaaGjbVlaadsgadaWgaaWcbaGaamysaaqabaaakiaawI cacaGLPaaacaGGSaaaaa@41AD@ and d i = j MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGKbWaaSbaaSqaaiaadMgaaeqaaO GaaGjbVlaai2dacaaMe8UaamOAaaaa@3819@ for j = 1, 2, , J . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGQbGaaGjbVlaai2dacaaMe8UaaG ymaiaaiYcacaaMe8UaaGOmaiaaiYcacaaMe8UaeSOjGSKaaiilaiaa ysW7caWGkbGaaiOlaaaa@40E9@ Then, we compose the full posterior density for the given data using equation, as follows:

P ( n , d , u | ν , π ) { j = 1 J π ( π j | μ , τ , ϕ ) } π ( μ , τ ) π ( ϕ ) π ( ν | α ) π ( α ) . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGqbWaaeWabeaadaabceqaaiaah6 gacaaISaGaaGjbVlaahsgacaaISaGaaGjbVlaahwhacaaMc8oacaGL iWoacaaMc8UaaCyVdiaaiYcacaaMe8UaaCiWdaGaayjkaiaawMcaai aaysW7daGadeqaamaarahabaGaeqiWda3aaeWabeaadaabceqaaiaa hc8adaWgaaWcbaGaamOAaaqabaGccaaMc8oacaGLiWoacaaMc8UaaC iVdiaaiYcacaaMe8UaeqiXdqNaaGilaiaaysW7cqaHvpGzaiaawIca caGLPaaaaSqaaiaadQgacaaI9aGaaGymaaqaaiaadQeaa0Gaey4dIu naaOGaay5Eaiaaw2haaiaaysW7cqaHapaCdaqadeqaaiaahY7acaaI SaGaaGjbVlabes8a0bGaayjkaiaawMcaaiaaysW7cqaHapaCdaqade qaaiabew9aMbGaayjkaiaawMcaaiaaysW7cqaHapaCdaqadeqaamaa eiqabaGaaCyVdiaaykW7aiaawIa7aiaaykW7cqaHXoqyaiaawIcaca GLPaaacaaMe8UaeqiWda3aaeWabeaacaaMb8UaeqySdeMaaGzaVdGa ayjkaiaawMcaaiaai6caaaa@88E9@

In our Gibbs sampler, we consider the latent variables z j , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG6bWaaSbaaSqaaiaadQgaaeqaaO Gaaiilaaaa@3410@ for j = 1, , J , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGQbGaaGjbVlaai2dacaaMe8UaaG ymaiaaiYcacaaMe8UaeSOjGSKaaiilaiaaysW7caWGkbGaaiilaaaa @3DE8@ as the parametric version for restricted pooling, where the subscripts for the parameter are equal to the parameter π . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHapGaaiOlaaaa@333A@ At this time, the pooling step for the data is the same as above, and generating the parameter is as follows:

(a)
Draw ϕ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHvpGzaaa@3304@ from truncated Beta ( j = 1 J z j , J j = 1 J z j , ϕ ( 1 2 , 1 ) ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaqGcbGaaeyzaiaabshacaqGHbWaae WabeaadaaeWaqaaiaadQhadaWgaaWcbaGaamOAaaqabaGccaaISaaa leaacaWGQbGaaGypaiaaigdaaeaacaWGkbaaniabggHiLdGccaaMe8 UaamOsaiaaysW7cqGHsislcaaMe8+aaabmaeaacaWG6bWaaSbaaSqa aiaadQgaaeqaaOGaaiilaaWcbaGaamOAaiaai2dacaaIXaaabaGaam OsaaqdcqGHris5aOGaaGjbVlabew9aMjaaysW7cqGHiiIZcaaMe8+a aeWabeaadaWcbaWcbaGaaGymaaqaaiaaikdaaaGccaGGSaGaaGjbVl aaigdaaiaawIcacaGLPaaaaiaawIcacaGLPaaacaGGUaaaaa@5BBB@
(b)
Draw z j MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG6bWaaSbaaSqaaiaadQgaaeqaaa aa@3356@ from Bernoulli ( p j ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaaqaaaaaaaaaWdbiaabkeacaqGLbGaae OCaiaab6gacaqGVbGaaeyDaiaabYgacaqGSbGaaeyAa8aadaqadeqa aiaadchadaWgaaWcbaGaamOAaaqabaaakiaawIcacaGLPaaacaGGSa aaaa@3E06@

where p j = ( ϕ k = 1 K π j k μ k τ 1 / D ( μ τ ) ) / { ϕ k = 1 K π j k μ k τ 1 / D ( μ τ ) + ( 1 ϕ ) I ( k = 1 K π j k = 1 ) / K 1 } . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGWbWaaSbaaSqaaiaadQgaaeqaaO GaaGjbVlaai2dacaaMe8+aaSGbaeaadaqadeqaamaalyaabaGaeqy1 dy2aaebmaeaacqaHapaCdaqhaaWcbaGaamOAaiaadUgaaeaacqaH8o qBdaWgaaqaaiaadUgaaeqaaiabes8a0jabgkHiTiaaigdaaaaabaGa am4Aaiaai2dacaaIXaaabaGaam4saaqdcqGHpis1aaGcbaGaamiram aabmqabaGaaCiVdiabes8a0bGaayjkaiaawMcaaaaaaiaawIcacaGL PaaaaeaadaGadeqaaiabew9aMnaaradabaWaaSGbaeaacqaHapaCda qhaaWcbaGaamOAaiaadUgaaeaacqaH8oqBdaWgaaadbaGaam4Aaaqa baWccqaHepaDcqGHsislcaaIXaaaaaGcbaGaamiramaabmqabaGaaC iVdiabes8a0bGaayjkaiaawMcaaaaacaaMe8Uaey4kaSIaaGjbVpaa lyaabaWaaeWabeaacaaIXaGaaGjbVlabgkHiTiaaysW7cqaHvpGzai aawIcacaGLPaaacaWGjbWaaSbaaSqaamaabmqabaWaaabmaeaacqaH apaCdaWgaaadbaGaamOAaiaadUgaaeqaaSGaaGypaiaaigdaaWqaai aadUgacqGH9aqpcaaIXaaabaGaam4saaGdcqGHris5aaWccaGLOaGa ayzkaaaabeaaaOqaaiaadUeacaaMe8UaeyOeI0IaaGjbVlaaigdaaa aaleaacaWGRbGaaGypaiaaigdaaeaacaWGlbaaniabg+Givdaakiaa wUhacaGL9baaaaGaaiOlaaaa@87ED@

(c)
Draw π j MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWHapWaaSbaaSqaaiaadQgaaeqaaa aa@33A3@ from Dirichlet ( I ( z j = 1 ) μ τ + I ( z j = 0 ) 1 + d i = j n i ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaaqaaaaaaaaaWdbiaabseacaqGPbGaae OCaiaabMgacaqGJbGaaeiAaiaabYgacaqGLbGaaeiDa8aadaqadeqa aiaadMeadaWgaaWcbaWaaeWabeaacaWG6bWaaSbaaWqaaiaadQgaae qaaSGaeyypa0JaaGymaaGaayjkaiaawMcaaaqabaGccaWH8oGaeqiX dqNaaGjbVlabgUcaRiaaysW7caWGjbWaaSbaaSqaamaabmqabaGaam OEamaaBaaameaacaWGQbaabeaaliabg2da9iaaicdaaiaawIcacaGL PaaaaeqaaOGaaGjbVlaahgdacaaMe8Uaey4kaSIaaGjbVpaaqababa GaaCOBamaaBaaaleaacaWGPbaabeaaaeaacaWGKbWaaSbaaWqaaiaa dMgaaeqaaSGaaGypaiaadQgaaeqaniabggHiLdaakiaawIcacaGLPa aacaGGUaaaaa@5DC7@
(d)
Draw ν j MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH9oGBdaWgaaWcbaGaamOAaaqaba aaaa@340F@ from Beta ( 1 + i = 1 I I ( d i = j ) , α + i = 1 I I ( d i > j ) ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaaqaaaaaaaaaWdbiaabkeacaqGLbGaae iDaiaabggapaWaaeWabeaacaaIXaGaaGjbVlabgUcaRiaaysW7daae WaqaaiaadMeadaWgaaWcbaWaaeWabeaacaWGKbWaaSbaaWqaaiaadM gaaeqaaSGaaGypaiaadQgaaiaawIcacaGLPaaaaeqaaOGaaGilaaWc baGaamyAaiaai2dacaaIXaaabaGaamysaaqdcqGHris5aOGaaGjbVl abeg7aHjaaysW7cqGHRaWkcaaMe8+aaabmaeaacaWGjbWaaSbaaSqa amaabmqabaGaamizamaaBaaameaacaWGPbaabeaaliabg6da+iaadQ gaaiaawIcacaGLPaaaaeqaaaqaaiaadMgacaaI9aGaaGymaaqaaiaa dMeaa0GaeyyeIuoaaOGaayjkaiaawMcaaiaac6caaaa@5B2A@
(e)
Draw μ MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWH8oaaaa@3283@ from

π ( μ | others ) j = 1 J 1 D ( μ τ ) k = 1 K π j k μ k τ 1 . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaaC iVdiaaykW7aiaawIa7aiaaykW7caqGVbGaaeiDaiaabIgacaqGLbGa aeOCaiaabohaaiaawIcacaGLPaaacaaMe8UaaGPaVlabg2Hi1kaayk W7caaMe8+aaebCaeaadaWcaaqaaiaaigdaaeaacaWGebWaaeWabeaa caWH8oGaeqiXdqhacaGLOaGaayzkaaaaaiaaysW7daqeWbqaaiabec 8aWnaaDaaaleaacaWGQbGaam4AaaqaaiabeY7aTnaaBaaameaacaWG Rbaabeaaliabes8a0jabgkHiTiaaigdaaaaabaGaam4Aaiaai2daca aIXaaabaGaam4saaqdcqGHpis1aaWcbaGaamOAaiaai2dacaaIXaaa baGaamOsaaqdcqGHpis1aOGaaGOlaaaa@6535@

(f)
Draw τ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHepaDaaa@3301@ from

π ( τ | others ) [ j = 1 J 1 D ( μ τ ) k = 1 K π j k * μ k τ 1 ] ( K 1 ) ! ( τ + 1 ) 2 . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaeq iXdqNaaGPaVdGaayjcSdGaaGPaVlaab+gacaqG0bGaaeiAaiaabwga caqGYbGaae4CaaGaayjkaiaawMcaaiaaysW7caaMc8UaeyyhIuRaaG PaVlaaysW7daWadeqaamaarahabaWaaSaaaeaacaaIXaaabaGaamir amaabmqabaGaaCiVdiabes8a0bGaayjkaiaawMcaaaaadaqeWbqaai abec8aWnaaDaaaleaacaWGQbGaam4AaaqaaiaacQcacqaH8oqBdaWg aaadbaGaam4AaaqabaWccqaHepaDcqGHsislcaaIXaaaaaqaaiaadU gacaaI9aGaaGymaaqaaiaadUeaa0Gaey4dIunaaSqaaiaadQgacaaI 9aGaaGymaaqaaiaadQeaa0Gaey4dIunaaOGaay5waiaaw2faaiaays W7daWcaaqaamaabmqabaGaam4saiaaysW7cqGHsislcaaMe8UaaGym aaGaayjkaiaawMcaaiaaigcaaeaadaqadeqaaiabes8a0jaaysW7cq GHRaWkcaaMe8UaaGymaaGaayjkaiaawMcaamaaCaaaleqabaGaaGOm aaaaaaGccaaIUaaaaa@7923@

(g)
Draw α MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHXoqyaaa@32DB@ from

π ( α | others ) { j = 1 m ( 1 ν j ) α 1 } α J ( 1 + α ) 2 . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaeq ySdeMaaGPaVdGaayjcSdGaaGPaVlaab+gacaqG0bGaaeiAaiaabwga caqGYbGaae4CaaGaayjkaiaawMcaaiaaykW7caaMe8UaeyyhIuRaaG PaVlaaysW7daGadeqaamaarahabaWaaeWabeaacaaIXaGaaGjbVlab gkHiTiaaysW7cqaH9oGBdaWgaaWcbaGaamOAaaqabaaakiaawIcaca GLPaaadaahaaWcbeqaaiabeg7aHjabgkHiTiaaigdaaaaabaGaamOA aiaai2dacaaIXaaabaGaamyBaaqdcqGHpis1aaGccaGL7bGaayzFaa GaaGjbVpaalaaabaGaeqySde2aaWbaaSqabeaacaWGkbaaaaGcbaWa aeWabeaacaaIXaGaaGjbVlabgUcaRiaaysW7cqaHXoqyaiaawIcaca GLPaaadaahaaWcbeqaaiaaikdaaaaaaOGaaGOlaaaa@6A54@

Lastly, the full posterior density is calculated using the joint posterior density and the priors for their parameters in the nonparametric Bayesian global-local pooling model. Here, the data pooling algorithm is the same as above inference. Then, we estimate each parameter as follows:

(a)
Draw ϕ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHvpGzaaa@3304@ from truncated Beta ( j = 1 j z j , I j = 1 J z j , 1 2 , 1 ) . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaaqaaaaaaaaaWdbiaabkeacaqGLbGaae iDaiaabggapaWaaeWabeaadaaeWaqaaiaadQhadaWgaaWcbaGaamOA aaqabaGccaaISaGaaGjbVlaadMeacaaMe8UaeyOeI0IaaGjbVpaaqa dabaGaamOEamaaBaaaleaacaWGQbaabeaakiaaiYcacaaMe8+aaSqa aSqaaiaaigdaaeaacaaIYaaaaOGaaiilaiaaysW7caaIXaaaleaaca WGQbGaaGypaiaaigdaaeaacaWGkbaaniabggHiLdaaleaacaWGQbGa aGypaiaaigdaaeaacaWGQbaaniabggHiLdaakiaawIcacaGLPaaaca GGUaaaaa@5415@
(b)
Draw z j MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWG6bWaaSbaaSqaaiaadQgaaeqaaa aa@3356@ from Bernoulli ( p j ) , MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaaqaaaaaaaaaWdbiaabkeacaqGLbGaae OCaiaab6gacaqGVbGaaeyDaiaabYgacaqGSbGaaeyAa8aadaqadeqa aiaadchadaWgaaWcbaGaamOAaaqabaaakiaawIcacaGLPaaacaGGSa aaaa@3E06@ where p j = ϕ k = 1 K 1 ( exp ( η j k 2 / 2 σ 2 ) / 2 π σ 2 ) / { ϕ k = 1 K 1 MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaWGWbWaaSbaaSqaaiaadQgaaeqaaO GaaGjbVlaai2dacaaMe8Uaeqy1dy2aaebmaeaadaWcgaqaamaabmqa baWaaSGbaeaacaqGLbGaaeiEaiaabchadaqadeqaamaalyaabaGaey OeI0Iaeq4TdG2aa0baaSqaaiaadQgacaWGRbaabaGaaGOmaaaaaOqa aiaaikdacqaHdpWCdaahaaWcbeqaaiaaikdaaaaaaaGccaGLOaGaay zkaaaabaWaaOaaaeaacaaIYaGaeqiWdaNaeq4Wdm3aaWbaaSqabeaa caaIYaaaaaqabaaaaaGccaGLOaGaayzkaaaabaWaaiqabeaacqaHvp GzdaqeWaqaaiaaygW7aSqaaiaadUgacaaI9aGaaGymaaqaaiaadUea cqGHsislcaaIXaaaniabg+GivdaakiaawUhaaaaaaSqaaiaadUgaca aI9aGaaGymaaqaaiaadUeacqGHsislcaaIXaaaniabg+Givdaaaa@5F74@ ( exp ( η j k 2 / 2 σ 2 ) / 2 π σ 2 ) + ( 1 ϕ ) k = 1 K 1 ( exp ( η j k 2 / 2 σ k 2 ) / 2 π σ k 2 ) } . MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaadaGaceqaamaabmqabaWaaSGbaeaaca qGLbGaaeiEaiaabchacaaIOaWaaSGbaeaacqGHsislcqaH3oaAdaqh aaWcbaGaamOAaiaadUgaaeaacaaIYaaaaaGcbaGaaGOmaiabeo8aZn aaCaaaleqabaGaaGOmaaaaaaGccaaIPaaabaWaaOaaaeaacaaIYaGa eqiWdaNaeq4Wdm3aaWbaaSqabeaacaaIYaaaaaqabaaaaaGccaGLOa GaayzkaaGaaGjbVlabgUcaRiaaysW7daqadeqaaiaaigdacaaMe8Ua eyOeI0IaaGjbVlabew9aMbGaayjkaiaawMcaamaaradabaWaaeWabe aadaWcgaqaaiaabwgacaqG4bGaaeiCamaabmqabaWaaSGbaeaacqGH sislcqaH3oaAdaqhaaWcbaGaamOAaiaadUgaaeaacaaIYaaaaaGcba GaaGOmaiabeo8aZnaaDaaaleaacaWGRbaabaGaaGOmaaaaaaaakiaa wIcacaGLPaaaaeaadaGcaaqaaiaaikdacqaHapaCcqaHdpWCdaqhaa WcbaGaam4AaaqaaiaaikdaaaaabeaaaaaakiaawIcacaGLPaaaaSqa aiaadUgacaaI9aGaaGymaaqaaiaadUeacqGHsislcaaIXaaaniabg+ Givdaakiaaw2haaiaac6caaaa@7020@
(c)
Draw θ MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH4oqCaaa@32F2@ from

π ( θ | others ) [ i = 1 I k = 1 K 1 ( e θ + η d i k 1 + l = 1 K 1 e θ + η d i l ) n i k ( 1 1 + l = 1 K 1 e θ + η d i l ) n i K ] . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaeq iUdeNaaGPaVdGaayjcSdGaaGPaVlaab+gacaqG0bGaaeiAaiaabwga caqGYbGaae4CaaGaayjkaiaawMcaaiaaykW7caaMe8UaeyyhIuRaaG PaVlaaysW7daWadeqaamaarahabaWaaebCaeaadaqadeqaamaalaaa baGaamyzamaaCaaaleqabaGaeqiUdeNaey4kaSIaeq4TdG2aaSbaaW qaaiaadsgadaWgaaqaaiaadMgaaeqaaiaadUgaaeqaaaaaaOqaaiaa igdacaaMe8Uaey4kaSIaaGjbVpaaqadabaGaamyzamaaCaaaleqaba GaeqiUdeNaey4kaSIaeq4TdG2aaSbaaWqaaiaadsgadaWgaaqaaiaa dMgaaeqaaiaadYgaaeqaaaaaaSqaaiaadYgacaaI9aGaaGymaaqaai aadUeacqGHsislcaaIXaaaniabggHiLdaaaaGccaGLOaGaayzkaaWa aWbaaSqabeaacaWGUbWaaSbaaWqaaiaadMgacaWGRbaabeaaaaGcda qadeqaamaalaaabaGaaGymaaqaaiaaigdacaaMe8Uaey4kaSIaaGjb VpaaqadabaGaamyzamaaCaaaleqabaGaeqiUdeNaey4kaSIaeq4TdG 2aaSbaaWqaaiaadsgadaWgaaqaaiaadMgaaeqaaiaadYgaaeqaaaaa aSqaaiaadYgacaaI9aGaaGymaaqaaiaadUeacqGHsislcaaIXaaani abggHiLdaaaaGccaGLOaGaayzkaaWaaWbaaSqabeaacaWGUbWaaSba aWqaaiaadMgacaWGlbaabeaaaaaaleaacaWGRbGaaGypaiaaigdaae aacaWGlbGaeyOeI0IaaGymaaqdcqGHpis1aaWcbaGaamyAaiaai2da caaIXaaabaGaamysaaqdcqGHpis1aaGccaGLBbGaayzxaaGaaGOlaa aa@9262@

(d)
Draw for η j k , k = 1, , ( K 1 ) : MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH3oaAdaWgaaWcbaGaamOAaiaadU gaaeqaaOGaaGilaiaaysW7caWGRbGaaGjbVlaai2dacaaMe8UaaGym aiaaiYcacaaMe8UaeSOjGSKaaiilaiaaysW7daqadeqaaiaadUeaca aMe8UaeyOeI0IaaGjbVlaaigdaaiaawIcacaGLPaaacaaMc8UaaiOo aaaa@4BD3@

π ( η j k | others ) I ( z j = 1 ) ( 1 1 + l = 1 K 1 e θ + η j l ) d i = j k = 1 K n i k exp { d i = j k = 1 K 1 η j k n i k 1 2 σ 2 k = 1 K 1 η j k 2 } + I ( z i = 0 ) ( 1 1 + l = 1 K 1 e θ + η j l ) d i = j k = 1 K n i k exp { d i = j k = 1 K 1 η j k n i k 1 2 k = 1 K 1 1 σ k 2 η j k 2 } . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaafaqaaeGacaaabaGaeqiWda3aaeWabe aadaabceqaaiabeE7aOnaaBaaaleaacaWGQbGaam4AaaqabaGccaaM c8oacaGLiWoacaaMc8Uaae4BaiaabshacaqGObGaaeyzaiaabkhaca qGZbaacaGLOaGaayzkaaaabaGaeyyhIuRaamysamaaBaaaleaadaqa deqaaiaadQhadaWgaaadbaGaamOAaaqabaWccqGH9aqpcaaIXaaaca GLOaGaayzkaaaabeaakmaabmqabaWaaSaaaeaacaaIXaaabaGaaGym aiaaysW7cqGHRaWkcaaMe8+aaabmaeaacaWGLbWaaWbaaSqabeaacq aH4oqCcqGHRaWkcqaH3oaAdaWgaaadbaGaamOAaiaadYgaaeqaaaaa aSqaaiaadYgacaaI9aGaaGymaaqaaiaadUeacqGHsislcaaIXaaani abggHiLdaaaaGccaGLOaGaayzkaaWaaWbaaSqabeaadaaeqaqaamaa qadabaGaamOBamaaBaaameaacaWGPbGaam4AaaqabaaabaGaam4Aai aai2dacaaIXaaabaGaam4saaGdcqGHris5aaadbaGaamizamaaBaaa baGaamyAaaqabaGaaGypaiaadQgaaeqaoiabggHiLdaaaOGaaeyzai aabIhacaqGWbWaaiWabeaadaaeqbqaamaaqahabaGaeq4TdG2aaSba aSqaaiaadQgacaWGRbaabeaakiaad6gadaWgaaWcbaGaamyAaiaadU gaaeqaaaqaaiaadUgacaaI9aGaaGymaaqaaiaadUeacqGHsislcaaI XaaaniabggHiLdaaleaacaWGKbWaaSbaaWqaaiaadMgaaeqaaSGaaG ypaiaadQgaaeqaniabggHiLdGccaaMe8UaeyOeI0IaaGjbVpaalaaa baGaaGymaaqaaiaaikdacqaHdpWCdaahaaWcbeqaaiaaikdaaaaaaO GaaGjbVpaaqahabaGaeq4TdG2aa0baaSqaaiaadQgacaWGRbaabaGa aGOmaaaaaeaacaWGRbGaaGypaiaaigdaaeaacaWGlbGaeyOeI0IaaG ymaaqdcqGHris5aaGccaGL7bGaayzFaaaabaaabaGaaGjbVlabgUca RiaaysW7caWGjbWaaSbaaSqaamaabmqabaGaamOEamaaBaaameaaca WGPbaabeaaliabg2da9iaaicdaaiaawIcacaGLPaaaaeqaaOWaaeWa beaadaWcaaqaaiaaigdaaeaacaaIXaGaaGjbVlabgUcaRiaaysW7da aeWaqaaiaadwgadaahaaWcbeqaaiabeI7aXjabgUcaRiabeE7aOnaa BaaameaacaWGQbGaamiBaaqabaaaaaWcbaGaamiBaiaai2dacaaIXa aabaGaam4saiabgkHiTiaaigdaa0GaeyyeIuoaaaaakiaawIcacaGL PaaadaahaaWcbeqaamaaqababaWaaabmaeaacaWGUbWaaSbaaWqaai aadMgacaWGRbaabeaaaeaacaWGRbGaaGypaiaaigdaaeaacaWGlbaa oiabggHiLdaameaacaWGKbWaaSbaaeaacaWGPbaabeaacaaI9aGaam OAaaqab4GaeyyeIuoaaaGccaqGLbGaaeiEaiaabchadaGadeqaamaa qafabaWaaabCaeaacqaH3oaAdaWgaaWcbaGaamOAaiaadUgaaeqaaO GaamOBamaaBaaaleaacaWGPbGaam4AaaqabaaabaGaam4Aaiaai2da caaIXaaabaGaam4saiabgkHiTiaaigdaa0GaeyyeIuoaaSqaaiaads gadaWgaaadbaGaamyAaaqabaWccaaI9aGaamOAaaqab0GaeyyeIuoa kiaaysW7cqGHsislcaaMe8+aaSaaaeaacaaIXaaabaGaaGOmaaaada aeWbqaamaalaaabaGaaGymaaqaaiabeo8aZnaaDaaaleaacaWGRbaa baGaaGOmaaaaaaGccqaH3oaAdaqhaaWcbaGaamOAaiaadUgaaeaaca aIYaaaaaqaaiaadUgacaaI9aGaaGymaaqaaiaadUeacqGHsislcaaI XaaaniabggHiLdaakiaawUhacaGL9baacaaIUaaaaaaa@F95C@

(e)
Draw ν j MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaH9oGBdaWgaaWcbaGaamOAaaqaba aaaa@340F@ from Beta( 1+ i=1 I I ( d i =j ) , I ( z j =1 ) α+ I ( z j =0 ) α 0 + i=1 I I ( d i >j ) ). MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacaqGcbGaaeyzaiaabshacaqGHbWaae WabeaacaaIXaGaaGjbVlabgUcaRiaaysW7daaeWaqaaiaadMeadaWg aaWcbaWaaeWabeaacaWGKbWaaSbaaWqaaiaadMgaaeqaaSGaaGypai aadQgaaiaawIcacaGLPaaaaeqaaOGaaGilaaWcbaGaamyAaiaai2da caaIXaaabaGaamysaaqdcqGHris5aOGaaGjbVlaadMeadaWgaaWcba WaaeWabeaacaWG6bWaaSbaaWqaaiaadQgaaeqaaSGaaGypaiaaigda aiaawIcacaGLPaaaaeqaaOGaeqySdeMaaGjbVlabgUcaRiaaysW7ca WGjbWaaSbaaSqaamaabmqabaGaamOEamaaBaaameaacaWGQbaabeaa liaai2dacaaIWaaacaGLOaGaayzkaaaabeaakiabeg7aHnaaBaaale aacaaIWaaabeaakiaaysW7cqGHRaWkcaaMe8+aaabmaeaacaWGjbWa aSbaaSqaamaabmqabaGaamizamaaBaaameaacaWGPbaabeaaliabg6 da+iaadQgaaiaawIcacaGLPaaaaeqaaaqaaiaadMgacaaI9aGaaGym aaqaaiaadMeaa0GaeyyeIuoaaOGaayjkaiaawMcaaiaac6caaaa@6DF1@
(f)
Draw σ 2 MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHdpWCdaahaaWcbeqaaiaaikdaaa aaaa@33E8@ from

π( σ 2 |others) 1 σ K1 j=1 J I ( z j =1) (1+ σ 2 ) 2 exp{ 1 2 σ 2 z j =1 k=1 K1 η jk 2 }. MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaafaqaaeqabaaabaGaeqiWdaNaaGPaVl aacIcadaabceqaaiabeo8aZnaaCaaaleqabaGaaGOmaaaakiaaykW7 aiaawIa7aiaaykW7caqGVbGaaeiDaiaabIgacaqGLbGaaeOCaiaabo hacaGGPaGaaGjbVlaaykW7cqGHDisTcaaMe8UaaGPaVpaalaaabaGa aGymaaqaaiabeo8aZnaaCaaaleqabaGaam4saiabgkHiTiaaigdada aeWaqaaiaaykW7caWGjbWaaSbaaeaacaGGOaGaamOEamaaBaaameaa caWGQbaabeaaliaai2dacaaMc8UaaGymaiaacMcaaeqaaaadbaGaam OAaiaai2dacaaIXaaabaGaamOsaaGdcqGHris5aaaakiaacIcacaaI XaGaaGjbVlabgUcaRiaaysW7cqaHdpWCdaahaaWcbeqaaiaaikdaaa GccaGGPaWaaWbaaSqabeaacaaIYaaaaaaakiaaysW7caqGLbGaaeiE aiaabchadaGadeqaaiabgkHiTmaalaaabaGaaGymaaqaaiaaikdacq aHdpWCdaahaaWcbeqaaiaaikdaaaaaaOWaaabuaeaacaaMc8+aaabC aeaacaaMc8Uaeq4TdG2aa0baaSqaaiaadQgacaWGRbaabaGaaGOmaa aaaeaacaWGRbGaaGypaiaaigdaaeaacaWGlbGaeyOeI0IaaGymaaqd cqGHris5aaWcbaGaamOEamaaBaaameaacaWGQbaabeaaliaai2daca aIXaaabeqdcqGHris5aaGccaGL7bGaayzFaaGaaGOlaaaaaaa@88D7@

(g)
Draw σ k 2 k = 1, , ( K 1 ) MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHdpWCdaqhaaWcbaGaam4Aaaqaai aaikdaaaGccaaMe8Uaam4AaiaaysW7caaI9aGaaGjbVlaaigdacaaI SaGaaGjbVlablAciljaacYcacaaMe8+aaeWabeaacaWGlbGaaGjbVl abgkHiTiaaysW7caaIXaaacaGLOaGaayzkaaaaaa@48B9@ from

π( σ k 2 |others) 1 σ k j=1 J I ( z j =0) (1+ σ k 2 ) 2 exp{ 1 2 σ k 2 z j =0 η jk 2 }. MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCcaaMc8Uaaiikamaaeiqaba Gaeq4Wdm3aa0baaSqaaiaadUgaaeaacaaIYaaaaOGaaGPaVdGaayjc SdGaaGPaVlaab+gacaqG0bGaaeiAaiaabwgacaqGYbGaae4CaiaacM cacaaMe8UaaGPaVlabg2Hi1kaaykW7caaMe8+aaSaaaeaacaaIXaaa baGaeq4Wdm3aa0baaSqaaiaadUgaaeaadaaeWaqaaiaaykW7caWGjb WaaSbaaeaacaGGOaGaamOEamaaBaaameaacaWGQbaabeaaliaai2da caaMc8UaaGimaiaacMcaaeqaaaadbaGaamOAaiaai2dacaaIXaaaba GaamOsaaGdcqGHris5aaaakiaacIcacaaIXaGaey4kaSIaeq4Wdm3a a0baaSqaaiaadUgaaeaacaaIYaaaaOGaaiykamaaCaaaleqabaGaaG OmaaaaaaGccaaMe8UaaeyzaiaabIhacaqGWbWaaiWabeaacqGHsisl daWcaaqaaiaaigdaaeaacaaIYaGaeq4Wdm3aa0baaSqaaiaadUgaae aacaaIYaaaaaaakmaaqafabaGaaGPaVlabeE7aOnaaDaaaleaacaWG QbGaam4AaaqaaiaaikdaaaaabaGaamOEamaaBaaameaacaWGQbaabe aaliaai2dacaaIWaaabeqdcqGHris5aaGccaGL7bGaayzFaaGaaGOl aaaa@7E42@

(h)
Draw α MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHXoqyaaa@32DB@ from

π ( α | others ) α j = 1 J I ( z j = 1 ) ( 1 + α ) 2 ( z j = 1 ( 1 ν j ) ) α 1 . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaeq ySde2aaSbaaSqaaiaaicdaaeqaaOGaaGPaVdGaayjcSdGaaGPaVlaa b+gacaqG0bGaaeiAaiaabwgacaqGYbGaae4CaaGaayjkaiaawMcaai aaysW7caaMc8UaeyyhIuRaaGPaVlaaysW7daWcaaqaaiabeg7aHnaa DaaaleaacaaIWaaabaWaaabmaeaacaWGjbWaaSbaaeaadaqadeqaai aadQhadaWgaaadbaGaamOAaaqabaWccaaI9aGaaGimaaGaayjkaiaa wMcaaaqabaaameaacaWGQbGaaGypaiaaigdaaeaacaWGkbaaoiabgg HiLdaaaaGcbaWaaeWabeaacaaIXaGaaGjbVlabgUcaRiaaysW7cqaH XoqydaWgaaWcbaGaaGimaaqabaaakiaawIcacaGLPaaadaahaaWcbe qaaiaaikdaaaaaaOGaaGjbVpaabmqabaWaaebuaeaadaqadeqaaiaa igdacaaMe8UaeyOeI0IaaGjbVlabe27aUnaaBaaaleaacaWGQbaabe aaaOGaayjkaiaawMcaaaWcbaGaamOEamaaBaaameaacaWGQbaabeaa liaai2dacaaIWaaabeqdcqGHpis1aaGccaGLOaGaayzkaaWaaWbaaS qabeaacqaHXoqydaWgaaadbaGaaGimaaqabaWccqGHsislcaaIXaaa aOGaaGOlaaaa@7807@

(i)
Draw α 0 MathType@MTEF@5@5@+= feaagKart1ev2aqatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHXoqydaWgaaWcbaGaaGimaaqaba aaaa@33C1@ from

π ( α 0 | others ) α 0 j = 1 J I ( z j = 0 ) ( 1 + α 0 ) 2 ( z j = 0 ( 1 ν j ) ) α 0 1 . MathType@MTEF@5@5@+= feaagKart1ev2aaatCvAUfeBSjuyZL2yd9gzLbvyNv2CaerbuLwBLn hiov2DGi1BTfMBaeXatLxBI9gBaebbnrfifHhDYfgasaacH8rrps0l bbf9q8asVeeaY=Hhbbf9v8WrFj0xc9vqFj0db9qqvqFr0dXdHiVc=b YP0xH8peeu0xXdcrpe0db9Wqpepec9ar=xfr=xfr=tmeaabaqaciGa caGaaeqabaqadeaadaaakeaacqaHapaCdaqadeqaamaaeiqabaGaeq ySde2aaSbaaSqaaiaaicdaaeqaaOGaaGPaVdGaayjcSdGaaGPaVlaa b+gacaqG0bGaaeiAaiaabwgacaqGYbGaae4CaaGaayjkaiaawMcaai aaysW7caaMc8UaeyyhIuRaaGPaVlaaysW7daWcaaqaaiabeg7aHnaa DaaaleaacaaIWaaabaWaaabmaeaacaWGjbWaaSbaaeaadaqadeqaai aadQhadaWgaaadbaGaamOAaaqabaWccaaI9aGaaGimaaGaayjkaiaa wMcaaaqabaaameaacaWGQbGaaGypaiaaigdaaeaacaWGkbaaoiabgg HiLdaaaaGcbaWaaeWabeaacaaIXaGaaGjbVlabgUcaRiaaysW7cqaH XoqydaWgaaWcbaGaaGimaaqabaaakiaawIcacaGLPaaadaahaaWcbe qaaiaaikdaaaaaaOGaaGjbVpaabmqabaWaaebuaeaadaqadeqaaiaa igdacaaMe8UaeyOeI0IaaGjbVlabe27aUnaaBaaaleaacaWGQbaabe aaaOGaayjkaiaawMcaaaWcbaGaamOEamaaBaaameaacaWGQbaabeaa liaai2dacaaIWaaabeqdcqGHpis1aaGccaGLOaGaayzkaaWaaWbaaS qabeaacqaHXoqydaWgaaadbaGaaGimaaqabaWccqGHsislcaaIXaaa aOGaaGOlaaaa@7807@

References

Agresti, A., and Hitchcock, D.B. (2005). Bayesian inference for categorical data analysis. Statistical Methods and Applications, 14, 297-330.

Antoniak, C.E. (1974). Mixture of Dirichlet processes with applications to Bayesian nonparametric problems. The Annals of Statistics, 2, 1152-1174.

Consonni, G., and Veronese, P. (1995). A Bayesian method for combining results from several binomial experiments. Journal of the American Statistical Association, 90, 935-944.

DuMouchel, W.H., and Harris, J.E. (1983). Bayes methods for combining the results of cancer studies in humans and other species. Journal of the American Statistical Association, 78, 293-308.

Dunson, D.B. (2009). Nonparametric Bayes local partition models for random effects. Biometrika, 96, 249-262.

Evans, R., and Sedransk, J. (1999). Methodology for pooling subpopulation regressions when sample sizes are small and there is uncertainty about which subpopulations are similar. Statistica Sinica, 9, 345-359.

Evans, R., and Sedransk, J. (2003). Bayesian methodology for combining the results from different experiments when the specifications for pooling are uncertain: II. Journal of Statiatical Planning and Inference, 111, 95-100.

Ferguson, T.S. (1973). A Bayesian analysis of some nonparametric problems. The Annals of Statistics, 1, 209-230.

Gneiting, T., and Reftery, A.E. (2007). Strictly proper scoring rules, prediction, and estimation. Journal of the American Statistical Association, 102(477), 359-378.

Ishwaran, H., and James, L.F. (2001). Gibbs sampling methods for stick-breaking priors. Journal of the American Statistical Association, 96, 161-173.

Kalli, M., Griffin, J.E. and Walker, S.G. (2011). Slice sampling mixture models. Statistics and Computing, 21, 93-105.

Leonard, T. (1977). Bayes simultaneous estimation for several multinomial distributions. Communications in Statistics: Theory and Methods, 6, 619-630.

Malec, D., and Sedransk, J. (1992). Bayesian methodology for combining the results from different experiments when the specifications for pooling are uncertain. Biometrika, 79, 593-601.

Nandram, B. (1998). A Bayesian analysis of the three-stage hierarchical multinomial model. Journal of Statistical Computation and Simulation, 61, 97-112.

Nandram, B., and Yin, J. (2016a). Bayesian predictive inference under a Dirichlet process with sensitivity to the normal baseline. Statistical Methodology, 28, 1-17.

Nandram, B., and Yin, J. (2016b). A nonparametric Bayesian prediction interval for a finite population mean. Journal of Statistical Computation and Simulation, 86, 3141-3157.

Nandram, B., Zhou, J. and Kim, D.H. (2019). A pooled Bayes test of independence for sparse contingency tables from small area. Journal of Statistical Computation and Simulation, 89(5), 899-926.

Rao, J.N.K., and Molina, I. (2015). Small Area Estimation, Second Edition. New York: John Wiley & Sons, Inc.

Sethuraman, J. (1994). A constructive definition of dirichlet priors. Statistica Sinica, 4, 639-650.

Spiegelhalter, D.J., Best, N.G., Carlin, B.P. and Linde, A.V.D. (2002). Bayesian measures of model complexity and fit. Journal of royal statistical society, Series B, 64(4), 538-639.

Walker, S.G. (2007). Sampling the Dirichlet mixture model with slices. Communications in Statistics-Simulation and Computation, 36, 45-54.

Yin, J., and Nandram, B. (2020a). A nonparametric Bayesian analysis of response data with gaps, outlier and ties. Statistics and Applications, 18(2), 121-141.

Yin, J., and Nandram, B. (2020b). A Bayesian small area model with Dirichlet processes on the responses. Statistics in Transition, 21(1), 1-17.


Date modified: