#### This is a data file containing the calculated inits for chain one
#### from one of the timing log data sets.  Its primary purpose is to
#### get realistic Level 2 parameters for data generation.

### Note that athough the values of mu and tau/sigma are not provided,
### the values of theta and eta are.  Note also, that although the
### model assumes they have a normal shape, they actually are
### positively skewed.  If anybody has nice suggestions for
### reparameterizations which would work better, I would appreciate
### them.  --Russell


K2 <-
structure(list(pi = structure(c(0.566686937691038, 0.725801385530969,
0.981040371668625, 0.895015014091857, 0.813504185224324, 0.525158094763297,
0.829617173934178, 0.698424072936713, 0.0593363429231289, 0.740035985928038,
0.361418138859444, 0.868372073573636, 0.571351382568319, 0.578453897752579,
0.793159503370135, 0.975684712878358, 0.412533993336024, 0.650493808523566,
0.628106511382748, 0.813022663317002, 0.924697534835043, 0.192682302907122,
0.73371639654795, 0.851627148024186, 0.1582828830273, 0.972586171900301,
0.25194230918327, 0.739171787378816, 0.865688835574157, 0.943085958717058,
0.702208432479589, 0.779294067343179, 0.654916666295865, 0.195152364031866,
0.894815948682774, 0.950961301453387, 0.751990145614919, 0.665531042591863,
0.725652024913849, 0.950274096661845, 0.70559055832817, 0.710069697540656,
0.811435929898421, 0.712865229063666, 0.922289507571893, 0.84001120135931,
0.59066670314321, 0.854105142313733, 0.659488283596373, 0.926446809533262,
0.821003352330432, 0.642731250122496, 0.593245452546765, 0.542278487354223,
0.764193049090826, 0.926972912946619, 0.757479953692401, 0.826152798195783,
0.0987446794054875, 0.88694728018617, 0.81709213834442, 0.618742450841795,
0.86508649896502, 0.443202249814398, 0.674761448587856, 0.571620997109548,
0.449370523133665, 0.242427232051759, 0.864932871444642, 0.551355519808057,
0.449997389432829, 0.999999998233967, 0.651664250051035, 0.587503449891962,
0.875429359759061, 0.76664174269516, 0.240438709070709, 0.91599612586536,
0.574820020343738, 0.751527451427674, 0.551130501293373, 0.670605255207401,
0.757356403591749, 0.458008805350312, 0.678247944946242, 0.80211872422098,
0.54448159270066, 0.398172362523695, 0.829325400956409, 0.953786930316891,
0.613301810573416, 0.781610657485012, 0.726126651505218, 0.546572990349624,
0.672273692534151, 0.890538241708899, 0.869468108298411, 0.642964339194505,
0.737863965249562, 0.920209210805356, 0.433313062308962, 0.274198614469031,
0.0189596283313748, 0.104984985908143, 0.186495814775676, 0.474841905236703,
0.170382826065822, 0.301575927063287, 0.940663657076871, 0.259964014071962,
0.638581861140556, 0.131627926426364, 0.428648617431681, 0.42154610224742,
0.206840496629865, 0.0243152871216419, 0.587466006663976, 0.349506191476434,
0.371893488617252, 0.186977336682998, 0.0753024651649567, 0.807317697092878,
0.26628360345205, 0.148372851975814, 0.8417171169727, 0.0274138280996987,
0.74805769081673, 0.260828212621184, 0.134311164425844, 0.0569140412829418,
0.297791567520411, 0.220705932656821, 0.345083333704135, 0.804847635968134,
0.105184051317226, 0.0490386985466134, 0.248009854385081, 0.334468957408137,
0.274347975086151, 0.0497259033381547, 0.29440944167183, 0.289930302459344,
0.188564070101579, 0.287134770936334, 0.077710492428107, 0.15998879864069,
0.40933329685679, 0.145894857686267, 0.340511716403627, 0.073553190466738,
0.178996647669568, 0.357268749877504, 0.406754547453235, 0.457721512645776,
0.235806950909174, 0.0730270870533805, 0.242520046307599, 0.173847201804217,
0.901255320594512, 0.11305271981383, 0.18290786165558, 0.381257549158205,
0.13491350103498, 0.556797750185602, 0.325238551412144, 0.428379002890452,
0.550629476866335, 0.757572767948241, 0.135067128555358, 0.448644480191943,
0.550002610567171, 1.76603301676974e-09, 0.348335749948965, 0.412496550108038,
0.124570640240939, 0.233358257304841, 0.759561290929291, 0.0840038741346396,
0.425179979656262, 0.248472548572326, 0.448869498706627, 0.329394744792599,
0.242643596408251, 0.541991194649688, 0.321752055053759, 0.19788127577902,
0.45551840729934, 0.601827637476305, 0.17067459904359, 0.0462130696831089,
0.386698189426584, 0.218389342514988, 0.273873348494782, 0.453427009650376,
0.327726307465849, 0.109461758291101, 0.130531891701589, 0.357035660805495,
0.262136034750438, 0.0797907891946442), .Dim = c(100L, 2L)),
    theta = structure(c(0.945702975732177, 1.7578680699763, 1.39899495747516,
    0.556867927225784, 0.270610825691935, 0.997460547376381,
    0.957149380066909, -0.334155005002028, -2.75884416574414,
    -0.409192755151991, -0.534886716538462, -0.873431013232618,
    -0.00420281015200098, 1.12196883546212, -0.0234538789401166,
    0.0663004269647666, 1.18868533704414, 0.897433644454178,
    -0.481591729386619, 0.334225370661015, -0.0599069228673489,
    -2.96804332668031, 0.505442815987097, -0.890009389221866,
    -2.55417813483271, 0.568326663091129, 1.00869344570128, -0.163415595740649,
    -0.0228960225986894, -1.03508400112586, -0.743960482114051,
    0.0447798260093749, -0.23611568325755, -1.73931499243599,
    0.638882861904101, 1.20690637183062, -0.61708890543501, 0.140760668720548,
    -0.060309359067253, -1.38603458816971, -0.306758628304046,
    1.33195788740429, 0.287469760966043, 0.672348895173946, 1.65005647488704,
    0.0389635094300765, 0.617257344918412, 0.874811661285361,
    -0.776153428016929, -0.273134048331348, -0.601604020598253,
    0.313726725938608, -1.41572514593728, 0.254072247267974,
    -0.722584307581898, -0.438657606354183, -0.542657780758896,
    0.0507871747402676, -3.38196713796979, 0.0882435025723447,
    0.634265444790238, 0.249305212540988, -0.441224718345897,
    -0.217241867392694, 0.913387898497954, 1.37032331910808,
    0.343951318714599, -0.127067411974682, 0.738068601750769,
    -0.529060974170754, 0.31378603802822, 1.31515123363992, 0.365738766040944,
    0.012569648034262, -1.06373476498587, -0.240984788486126,
    -2.47433875504666, 0.0143808608184036, 0.771735651159417,
    0.496715715211684, -0.956945321188578, -0.196692898581169,
    0.62519214718328, 1.65708172849542, 0.256228597030773, -0.507581960925676,
    -0.881642355672454, 0.451205230074779, 0.673282942156621,
    0.571908946996767, -0.575641638098204, 1.45994399631836,
    0.473057620274905, -0.624008168590825, -0.649216727573706,
    -0.0269838156680753, -0.414416600762736, 0.874318122302854,
    -0.93785375147504, 1.85163892535812, 0.170697811644556, -0.2158970592523,
    0.186319800954942, -1.02726664937146, 0.35176565871135, 0.207025381408629,
    1.16985949807074, -0.622690845405029, -1.10402418605884,
    -0.268037113525258, -1.02687921595973, 0.263899578286288,
    -0.784303403049099, -0.759533204544094, -0.78931648566955,
    2.08519336680378, -0.415171495620833, 0.1827158013433, 0.20183469228515,
    -0.828862859725116, 1.13115739737984, 0.0229761833592393,
    -0.435539849113364, -0.836600168255954, -0.928666356899554,
    2.34675498726649, -0.814732521838712, 0.209604602318129,
    0.0374562795132377, 0.193138479397713, -0.610784935162259,
    0.261344172308071, -1.02666029445743, -1.11213441618973,
    2.76394514755661, 3.5827749355032, -0.131138931731297, -0.360067873375449,
    -0.74730720396546, 1.5833295422418, 0.303880161661512, 0.104418549209026,
    0.341160514566271, -0.200001596887466, 0.0121094688643154,
    0.000790940732132611, -0.0299378980171764, 0.881163444694898,
    -0.307103372386228, 2.72561100312744, -0.61670312888435,
    -0.27802551261127, -0.935699829479545, 0.362441998348107,
    -0.489820076634399, 2.10851282511833, -0.46768930978587,
    0.724842891072601, -1.45270705499926, -0.981044864702021,
    0.321540859346542, -1.02510996622785, 1.03173739723349, -0.862936592146514,
    -0.757468673768565, 1.11109976338218, -0.336808924881789,
    -1.12592700331943, -0.0223875051165868, -1.00669117539666,
    -0.767908950053204, 0.741273747051315, -0.660442635455312,
    -0.378235632938994, 0.157994938534514, 0.256557857668818,
    0.453644541261786, 1.35596809802487, -0.885063661917815,
    -0.30930508539073, -0.484437428441091, -0.680397057388975,
    0.323317832884207, -0.391279959856498, -0.335061896210372,
    0.787911219130169, -1.42856626720698, -0.809244264279233,
    0.271723402237907, 1.29585926575938, -0.843662783781471,
    -0.546309129668818, 1.11987087298992, -0.287691665322028,
    -0.407596125357697, 0.421079822226018, -0.203683949175984,
    -0.506420935705565, -1.48745070064998, 2.98813095173742), .Dim = c(100L,
    2L)), eta = structure(c(0.608061249843629, -0.0191207237552713,
    -1.92171823401932, -0.0969923372826235, -0.491147750351499,
    0.555740601179997, -1.04664659699362, 0.736822968584897,
    1.65355794099015, 0.46119788879401, 1.43687711750966, 0.211415152198288,
    0.747775975930166, -2.05000666996001, -0.383795394836927,
    -1.43271799553657, -1.49353539917315, -0.230681342449307,
    -0.758703144325241, 0.186075205302628, -0.877667589205747,
    1.07643603859261, -0.338137179955938, 0.20556347025947, 1.95276465884012,
    -0.870233013267931, -2.73568319838995, 0.0639968164871824,
    -0.0635378148953816, 0.465895660873514, 0.607655412328365,
    0.247045006616704, -0.619726830411226, 2.81689629171822,
    -0.666976672622143, -1.00444859015722, 0.140171040441973,
    0.118854642873728, 0.567308882965184, -0.720630657064124,
    -0.345493626198116, -0.059365595339508, -0.0980865950770764,
    0.663826357992559, -1.29716717578434, -0.555320150149317,
    0.805247860696866, -1.15468013868579, 1.28166145714878, -0.929153647814354,
    0.00853091598494569, 0.64926816792872, 0.135228105583198,
    1.24328602891805, 0.505739592963873, -1.19210665820443, -0.563398869737474,
    -0.700237006160757, 2.31748505872556, 0.19692401748727, -0.322156394164643,
    0.208130933598952, -1.01668007395328, 0.905118941710702,
    0.208338938482407, 0.359345546274427, 0.935400570199648,
    2.71587312191788, -0.791477447330055, 0.544537131175877,
    -2.01092712449554, -1.53547546237093, 0.398365848136025,
    0.0300673361878003, -0.729206095427417, -0.466207353251134,
    1.40062461984987, -1.30706562134411, 0.218314164783198, 0.0751071005674195,
    1.01053845211762, 0.125699161250542, 0.551915892875734, 0.616543914620155,
    0.660065580590367, -0.64586031755069, -0.205830287249337,
    0.692310834145615, -0.271728396176891, -0.92248028394206,
    0.779671924838716, -1.97686764557391, 0.823751806493211,
    1.67789479810997, 0.344045899752605, -0.802937766060013,
    0.296885522341494, -0.0380665704953448, -0.0552593122556613,
    -0.430514876335188, -0.0904205814489126, -0.596314026244364,
    7.74425593656144, -0.635670919614227, -0.457771577224065,
    -0.179246876615499, -0.459163072462882, 0.098249562130651,
    -0.0177230761901338, -0.209720087256826, -0.222303242469444,
    -0.258970283553037, -0.268443975168002, 0.929986552439215,
    -0.52761240382482, -0.738551978199718, 1.21058579715136,
    -0.527745555540511, -0.221842008207235, -0.89178773158352,
    0.4344917951203, 0.253330996972127, -0.740686595338142, -0.298695628806584,
    0.0672302715601344, -0.234997384568, 1.4558734414959, -0.0943814091630137,
    -0.296244915272161, 1.82293196827317, -0.206077105020781,
    0.156608082506924, -0.34304665105351, -0.0503753020861603,
    -0.472169998720476, 0.398218767110896, -0.490522010918893,
    -0.252400966828056, -0.356763772085612, 0.226546028407034,
    0.00521730191593969, -0.536843908644964, 0.0365022100493933,
    0.0412109004993199, 3.27591039521804, -0.534965328367714,
    0.197706948224705, -0.255654366027332, 0.0182667678204581,
    -0.13412894893229, -0.317977215743676, -0.157702225296186,
    -0.0158269359566257, -0.448564714996027, -0.509667623220771,
    -0.0551193928990105, -0.527800692291516, -0.374547351006027,
    0.129549215859652, -0.726259272519656, 0.0100232459846534,
    -0.341403993681537, -0.418026359886543, -0.344049716880403,
    -0.319461516369487, -0.184091155482793, -0.303374792138442,
    -0.0516251285268527, -0.73486043220077, -0.412789276232324,
    1.04717780171581, 1.75514893852069, -0.207679340560722, -0.0652164954431638,
    -0.296037389881425, -0.852875715730112, 0.0181788268004257,
    0.0263621182599582, -0.298551453787786, -0.33108882345197,
    -0.115097861998707, 0.307359043331081, 0.104025617173598,
    -0.295855034529089, -0.345802025322858, -0.350648301919645,
    0.0518797764487525, -0.194894919372296, -0.100949806439042,
    -0.495062640690686, 0.0138115760840902, 2.08151169219714,
    -0.737344811162936, -0.231769946010446, -0.166962659907379,
    -0.457667365452717, 0.0260651671928889, -0.407744786364688,
    -0.273596030595168, 0.12501814836062), .Dim = c(100L, 2L)),
    alpha0 = c(0.689409859623227, 0.310590140376773), mu0 = c(-0.542165533726129,
    0.510930199253648), beta0 = c(0.395113597768731, 0.800636736160821
    ), tau0 = c(1.69060560845033, 0.0941040008696826), gamma0 = c(0.943158883420632,
    1.52664647150361), alphaN = 50), .Names = c("pi", "theta",
"eta", "alpha0", "mu0", "beta0", "tau0", "gamma0", "alphaN"))
K3 <-
structure(list(pi = structure(c(0.217287453127645, 0.0513985564196419,
0.647104533726244, 0.769294714042117, 0.771425110053198, 0.218762955303844,
0.0824561750626698, 0.295650715224332, 0.135448926366138, 0.416782860107914,
0.273289976648533, 0.841332638944827, 0.465030737193549, 0.0403131721118168,
0.331430317493461, 0.170370866578984, 0.552760816455478, 0.296433278417337,
0.188741314977637, 0.469918122699421, 0.645204012271019, 0.577162646287895,
0.173211551906023, 0.0845058210739402, 0.174215003079526, 0.909155615889217,
0.221301932536699, 0.160007348477992, 0.0655109992362795, 0.0784101115372405,
0.342110412357066, 0.615523190693461, 0.720678400155535, 0.170465571831633,
0.239580121237882, 0.533253348932249, 0.647228321060674, 0.709674385987003,
0.0573471434952066, 0.536105960299695, 0.156887602201881, 0.248876452924701,
0.259086290654403, 0.628807355749649, 0.404356553102824, 0.122854232567293,
0.238273225295258, 0.744784920194212, 0.705929684130123, 0.870738978820131,
0.25822012524821, 0.550424904331626, 0.0977425325032559, 0.484824620604748,
0.482693374235631, 0.279395456742311, 0.752405310714211, 0.0632734173707355,
0.813964547709823, 0.668922153141649, 0.114850044657475, 0.481808762103202,
0.628914735778772, 0.500980471300079, 0.0137784010559546, 0.330337126812848,
0.252311073648811, 0.896993753568912, 0.843046301839851, 0.501464475710064,
0.401089478805563, 0.22593037029408, 0.28563888749931, 0.130443529842838,
0.100151509753348, 0.623461838205931, 0.245136213409978, 0.0913839505535126,
0.313975121898731, 0.215709243340099, 0.44638755205031, 0.107937870880051,
0.0934797164159566, 0.113988189711438, 0.642763128894492, 0.531612579687654,
0.564721245967357, 0.284754404520029, 0.821581355541352, 0.775472682156334,
0.156103877899945, 0.368815222618169, 0.190225272031677, 0.181576962367753,
0.0503324952921259, 0.690738574042847, 0.90746510056536, 0.0687932918542867,
0.134117960939245, 0.722471562292651, 0.464694459823321, 0.864317662826471,
0.295557924305365, 0.0872728548825936, 0.172150015464616, 0.307788951594479,
0.684034831992794, 0.36999266276916, 0.831355190937439, 0.529681843763514,
0.0469043582712251, 0.116994521697817, 0.508347692458741, 0.913914946788547,
0.623352345114897, 0.796862551065407, 0.319573981921812, 0.6505102629318,
0.306676084169187, 0.17373769053832, 0.24778111584529, 0.285107766919377,
0.569999471479968, 0.783794600948406, 0.744964762818769, 0.0601251460375547,
0.755809992661198, 0.61448839538254, 0.824034690953464, 0.871863181947646,
0.501265341335169, 0.322729772854101, 0.239682644357557, 0.802018192815562,
0.667920120930643, 0.428745076909018, 0.12519403181006, 0.252173756893001,
0.827647458962077, 0.41785720378378, 0.768669600727467, 0.497769069474131,
0.55315825123115, 0.119955692999206, 0.365147180345468, 0.745090987230615,
0.681038692774574, 0.118591327037208, 0.255437333098864, 0.0554095612886695,
0.689642489275716, 0.263871929210212, 0.553108226944937, 0.466893893317437,
0.287461960149028, 0.607429320321394, 0.0128078121314645, 0.722942919577811,
0.0432781502035502, 0.122714372394485, 0.777370558995067, 0.49008181241329,
0.307681491656293, 0.307148948190179, 0.663525474607571, 0.275229046727868,
0.237078728245945, 0.0820078442606224, 0.0408385561749285, 0.0637834000334128,
0.451273284089102, 0.391823949952443, 0.320998325953831, 0.475256957888295,
0.795908306110148, 0.34940710035228, 0.111892468112369, 0.782629020179104,
0.483518298483611, 0.763674189566463, 0.488640309996346, 0.500449394532422,
0.686192336620219, 0.648563802197487, 0.0413850045093748, 0.216572860676933,
0.0397983415246289, 0.650840250870908, 0.171690146553903, 0.128529502043147,
0.462201981395968, 0.393527748219914, 0.520963527206456, 0.375752620761759,
0.594911108917939, 0.220000923192743, 0.0754200054689278, 0.818841236360915,
0.636236033913605, 0.0602160161710714, 0.318018087049034, 0.0842837807538867,
0.0573375419683903, 0.143432431075289, 0.0564248744821859, 0.473448093101677,
0.233508992944537, 0.334356622006508, 0.0331958826964228, 0.0535352961285717,
0.679805665080242, 0.0416728393573556, 0.0266215703477102, 0.0457718810996362,
0.0452173373916422, 0.0327665823556094, 0.12766520162271, 0.053056458650863,
0.504582600853176, 0.356344186762259, 0.107014871883691, 0.137729586792728,
0.256788976614009, 0.131699577977654, 0.0808202341017049, 0.030719238073228,
0.0228880748021025, 0.225504256139468, 0.110454309810256, 0.049726706515113,
0.156624246307765, 0.0617470364524389, 0.039638955486908, 0.0275162353528057,
0.0924997578314751, 0.0380015741587332, 0.227577647129266, 0.0381518571199955,
0.115005397542716, 0.0460368359165254, 0.0744427970706518, 0.253354477601167,
0.187755458114447, 0.251236951251145, 0.230496266551708, 0.132054780202092,
0.0806880819301684, 0.13662375276858, 0.0386329827710135, 0.0738514598911991,
0.052137385476074, 0.185703166458162, 0.349149240551807, 0.0482814860778153,
0.229844665615341, 0.113175222936295, 0.234786877154324, 0.213783663051454,
0.142757302086627, 0.208363474463866, 0.107779396347457, 0.0281094254835073,
0.0634037725649351, 0.191870580509742, 0.322696124336475, 0.394433826459283,
0.510610198105244, 0.0209984021704655, 0.116115141985221, 0.434752124256523,
0.147637237105335, 0.382245679753477, 0.393362786546859, 0.394299512268867,
0.103940184136503, 0.0271310614417892, 0.642971318477653, 0.125987029267384,
0.202506579617657, 0.0206165670934378, 0.0649721379533437, 0.391612734587527,
0.220327946963825, 0.237448008091076, 0.315851866596133, 0.251814559635413,
0.395480412508014, 0.0644053446090623, 0.00672849790474505, 0.095997815800519,
0.381694140704087, 0.237657029161917, 0.288811200761867, 0.442670416870488,
0.354756395789935, 0.0892605027644098, 0.0171148939657125, 0.112365471784799,
0.22964600514715, 0.217312421536278), .Dim = c(100L, 3L)), theta = structure(c(0.934527442396952,
-2.08929392780643, 1.31356317785991, 0.977609847895432, 0.705020433283505,
0.914934082928637, -1.42786508462662, -0.293334154933592, -2.0950769354017,
0.0266109847906976, -0.0613073176984912, -0.320068825706726,
0.528841472709003, -2.68766884887825, 0.44182081668311, -1.88498687772665,
1.66509606545247, 0.853311460148155, -1.47905267282517, 0.348325987796375,
0.232898940758824, 1.46071739079718, 0.280605480813086, -0.676498705061818,
-1.74327686727798, 0.916664048317059, 1.2803785584506, -0.282860421596534,
0.505720704460286, -0.466519040083298, -0.482408185270997, 0.367611615811012,
0.301682895253225, -1.01568714160883, 0.0529288501635801, 1.62192538447367,
-0.0445748600063582, 0.667297586444646, -2.01953033242629, -0.744580689058986,
-0.124026332682938, 0.734130963222082, 0.104923606454771, 0.963793679818791,
1.05997061354833, -0.0525587273259898, 0.888615837797409, 1.32631404571019,
-0.164805680814238, 0.255304285956462, -0.159507654702239, 0.624853681938351,
-0.897579372324214, 0.736485649115313, -0.218187312638907, -1.8748422909816,
0.0569299191152497, -1.99706803223436, -0.381116943184076, 0.318667049490347,
0.224396867558283, 0.586963259483673, -0.427862084242405, 0.287794607469434,
1.26801674835706, 1.2304685159419, 0.46777466755582, 0.353719838626459,
1.18649042898081, 0.078243298057224, 0.632495920779849, -0.0178106079075132,
0.279193421007255, -0.10474315828713, -0.540606792035971, 0.338768219907438,
-1.64184580751465, -2.29473774786605, 0.693301467074568, 0.704880332045843,
-0.418816346578691, -0.331869568715227, 0.400970028576457, -1.51541867969161,
0.762022968847707, -0.586084401897492, -0.273218922924603, 0.986686440789094,
1.05569006979074, 0.731158519641931, -0.481395818426054, 0.0283024031845024,
0.307415015891926, -0.356514487671908, -1.62549395100964, 0.469202883745102,
0.17479671863032, -1.79566376540981, -0.719791782435576, 2.09932195569949,
0.685138511044999, 0.874343490770884, 0.350126601781372, -0.0517730294979136,
2.11539338131691, 0.667272732557917, 0.302671365600413, -0.626062692296054,
-0.326582431189541, -0.460576434484618, -0.653284341218343, 0.764132521346164,
-0.285470936495064, 0.233692289782168, -0.759595779478701, -0.176905411518782,
0.722728590708696, 0.790708236977835, -0.827683574007678, -0.0743691610541969,
-0.419472917007438, 1.0612793419777, 0.0345023675968108, -1.55835342284715,
-0.311632063552537, 1.68232508768383, 0.175685503351613, -0.640232623101765,
-0.786514395630492, -1.73511723216732, -0.837848703201593, 0.704117611872612,
-0.322359792352101, -0.72587836799524, 0.294725673938206, 0.512193508680213,
-1.08835546339716, 1.22213727704751, -0.781404764965623, -1.98558338023649,
-0.294240635803744, 1.06811286728756, -0.0197625996052592, 1.18763602942909,
1.53451889135324, -0.588200385578975, 0.44826734247077, 0.236507945650396,
0.987440417306802, -0.294323992499494, -1.19349950014614, 0.907737298584805,
-2.05049338375568, 1.4530844981674, -1.28812086947959, -0.372416226766349,
-0.980805777063885, -0.582668837430343, -1.6686532995661, -0.265100851422276,
0.106827370037663, -0.488308769562553, 0.707564258839986, -0.947167034506674,
0.0995777210705788, 1.42057838498241, 0.192863229063176, 2.68842820348008,
0.211126453277987, -1.2597441860936, -0.0992782783578889, 0.455465548609828,
0.133685739275616, -0.434466101411473, -1.7244071602897, 0.243421693718192,
1.36227791048029, -0.530888892007653, 0.099871025246949, 0.0433577010781913,
-0.124323739036162, -0.716603373071214, -0.0342670897421691,
0.765038152884428, -0.312687040474458, 0.352125642219718, -1.3499845259085,
-0.264350170696651, 2.34636768722372, 1.26994882476409, -1.04745141391644,
0.812636286416185, -0.0473530683976137, -1.15369966432969, -1.30981550578502,
-0.526123341868357, 1.64766070681608, 0.0743794501285926, -1.53220468209458,
2.88678594046436, -0.358689767584055, 0.858266504561705, 1.81778856619292,
-1.27838397507191, -0.331316825212475, -0.444159476709817, 0.130455635919895,
-1.11965656312746, 1.2566105588467, 0.637788002342788, -1.38173670111055,
1.05724420576447, 1.30635412235995, 0.922901603717543, 0.314676387022446,
0.699922914064957, -0.519883191454012, 1.77894396949347, -0.621746863460927,
-1.12604488746776, 0.000799605273279464, -0.295088727354044,
-0.976188024103763, -1.17365549577423, 0.00952240999527466, 1.07647046337774,
-0.337123138740823, -0.336945636380957, -0.358031188156531, -0.36679819058247,
-0.788658214524961, 0.618458403873463, -0.360722664605988, 1.81700578571163,
1.77082988849173, 2.44193243066173, -0.589567449880563, -0.461409123953364,
-0.137404488611561, 0.715626172289282, 0.840046456116818, -0.445000274213243,
-0.467732182135332, -0.709299561858234, -0.582848132977032, -0.457070827348597,
0.585593105087883, 0.10210201833792, 1.09915387412899, 1.48735874892013,
0.324362708846309, -0.697722992765561, -1.18415695466277, 2.30192395592031,
-0.910444023657222, 0.428324195463686, -0.908441466414473, -0.182946503323944,
-0.782386194333887, -1.11589059125938, -0.0194058573630405, 1.17508594378957,
1.20777762144725, -0.381010649415486, -1.15608800034427, 0.325409637406301,
-0.824743773953944, 1.16277121022067, -0.490014782855453, -1.33566305724212,
-0.586456816639668, -0.643771349136791, -1.12244300289108, -0.898553238796326,
-0.309432945586034, 2.97237832298502, -0.130261430087009, 0.0870139846297829,
-0.9916260593301, 1.79481005331551, 0.610483565452153, -1.22871364800931,
-0.282263168183716, -0.0094887763853432, -0.827245293843414,
-0.301435682544466, -1.61995132860089, 0.199849658243215, 2.34314099538057,
-0.212958684907773, -1.25817066021079, 0.0656153995881933, 0.17325405931415,
-0.786678700844533, -0.922842138740494, -0.0644063802053135,
1.01983311508809, 0.425913100992636, -1.72796975261816, -0.0250538830827407
), .Dim = c(100L, 3L)), eta = structure(c(0.738631621616827,
-0.11392386340001, -1.43478488391969, -0.795900668637443, -0.738789092163986,
0.291779782540643, 1.28764015458264, 0.571586947585497, -0.369000167660541,
0.169646977888796, 0.525301417100338, -0.423198920979705, -0.118607199039409,
0.956640836719179, -1.44985837592955, 0.387529201196245, -1.30461457238179,
-0.111519759297766, -0.0592477532669983, 0.11806442104485, -1.10565815326472,
-1.93621730685597, 0.229673964783226, 1.19228440500439, 0.310510145820933,
-1.04049843281952, -2.0888168493751, 0.914930870745826, 1.7688149833241,
2.87447960665937, 0.568541550506216, -0.315041630756807, -0.93127383096029,
0.888003350463212, 0.226692772466857, -0.337008353667311, -0.700999372557974,
-0.578381732477236, -0.183960327949978, -0.824024188734121, 1.71801547143076,
0.566919420114403, 0.676302585976745, -0.0322853856611733, -0.118495394440071,
0.174060934784128, 0.908417886535487, -1.32010932834942, -0.0172818867518189,
-1.12888714026272, 0.305793617296064, -0.0799023739887545, 0.806295848761277,
0.126166310988124, -0.522680968508634, -0.214122619825364, -0.940743402498721,
0.0239398878820356, -1.1869000645132, -0.248791982297526, 1.18043895603243,
-1.44413082595945, -0.90767484117369, -1.30016215258944, 3.95711379895421,
0.229388556809541, 0.4894865762178, -1.07818514187653, -1.09046816177808,
-0.458631932767, -1.68316025629294, 0.735794996352964, 0.194978901540692,
0.356052193901108, 1.23863092154363, -0.705361779379597, 0.0685790834708483,
0.139383083310412, -0.0636399481604334, 0.775215056265972, 0.0783121288627469,
1.47223498056736, 2.0041145585056, -0.217337608619913, -0.340150788677706,
-0.363802847470365, -0.84684233453891, -0.0606173299656181, -0.737390283653907,
-1.00219797963187, 1.42547174315216, -0.94473916552769, 1.24533939167784,
0.999148443304441, 0.931158424831034, -1.18983991203327, -0.468197709790347,
0.103246577012258, 1.00737410783989, -0.284070470891024, -0.155047518679297,
-0.278196970804359, 0.641169364518892, -1.57393785919602, -1.493661354058,
0.249041598751188, -0.372229115652413, 0.593192097893964, -0.722037556310246,
-0.568271536375303, 2.62915614138049, -0.131249239283987, -0.939825984462523,
-0.684857338467709, -0.250201891778373, -0.705316732040973, 0.627775533386289,
-0.876656106437483, 0.565296739156892, -1.75755728853688, -0.193694564469009,
0.853925015464886, -0.385792726375212, -0.129147416021756, -0.728316762864856,
0.899417175817059, 0.193132962659889, -0.228331860766582, -0.269730019086783,
-0.0107919126021864, -0.270403252070628, -0.405860881745933,
-1.39127032568712, -0.754261442606505, -0.52519697509624, -1.08645050548829,
1.80116344166344, -1.30551158636707, 0.0388322684186448, -0.70053510628785,
-0.728904746421501, -0.0436225667641243, -0.278249145966625,
1.09761303216865, -1.11906091833282, -0.530680995934564, -0.368628888288362,
0.863818073403201, -0.296967832026011, 0.509467911626742, -0.480440507128657,
-0.166517510586149, -0.278496664646212, -1.04444881275238, 0.481697668237163,
-0.221897107764122, 3.66041073531312, -0.264360512464318, 1.96114701794456,
-1.55963758020495, -0.425866540936677, 0.0453627239014129, -0.590486793374563,
0.536600406339764, -0.0732028442395997, 0.203669912803812, 0.343250757431747,
-0.0319511696203233, 1.99997277290569, 1.49538154753483, 0.170709548680322,
-0.504758643665902, 0.601934220997267, -0.190080018887312, -0.614295523890034,
-1.29630496480485, 0.65083002196467, -0.632952950066615, -1.19544542775767,
-0.628704154433171, -0.671073652411956, -0.0269072091206185,
0.0800070693186786, -0.0218126464246009, 4.07051563365548, 0.365433084274225,
2.45745753671256, -0.91851771654775, -0.672697228328939, 1.38319567145178,
0.233810456036464, 0.21357650112772, 0.458887836874958, 0.699412825239503,
0.254681646828039, 0.240500330168277, 0.403427584385665, -0.257667818757975,
-0.314629688851637, 0.768735744582638, -0.567373896728174, -0.432893299802572,
0.0725529271392947, 1.988974153908, 1.58165802699799, -0.535737352851198,
-0.692967188127065, -0.246533223824588, 0.534102429273871, -0.517577297397983,
-0.523919313335953, 1.05364917933773, 0.504808652156324, 0.495077175086824,
-0.724218335804162, -1.03141130435177, 1.51944390947327, 0.307093877659636,
-0.499024746288104, 0.854734895684107, -0.109521900481045, 1.27097564905365,
-1.0836227666941, -0.668930638913161, -0.497522765045917, -0.607615924570792,
3.95231117204315, -0.476057982841144, -0.590362724762641, 1.8877710384026,
-0.806013529390239, 0.69943436102879, 1.61181326685187, -0.0236626806537716,
-0.6577063532458, 0.695531365059885, -0.810045464544272, 2.03141903888503,
-0.410999237232819, -0.0335485207620555, 1.05234922581904, -0.919058251780253,
-0.486886274738554, -0.376591278061647, 1.891771956653, -0.892757075975253,
1.11748217697499, -0.596087828440718, 0.793402099849563, -0.479868167794758,
0.190740038517039, -0.815777513995346, -0.336419129748604, 1.84817326744499,
-0.82145914575339, -0.68837166255963, -0.850347267947441, -0.665559775271875,
-0.612881373515302, 1.38290561267538, -0.347321645391872, 0.878973434021575,
-0.268976437149783, -0.72815253341258, -0.650675426482912, -0.543959599873191,
-0.677405552946767, -0.615249274759044, -1.07771812662631, -0.750305879856655,
1.15074750268157, -0.468011893017563, -0.499883220631561, -0.457963113395211,
-0.624002887927784, 2.22333004199078, -0.362449373844522, -0.45612798838836,
2.33854211612509, 2.68068491894996, -0.542973752708956, -0.102085561478491,
-0.270064875658765, -0.311135471605851, -0.680628429211529, -0.780861661216602,
-0.308475485628401, -0.658543958159945, 0.6712196970321, -0.79377587093345,
-0.367359801545747, -0.360277487142701, -1.06788546695868, -0.577408725853645,
-0.468830004058401, -0.755067202374653, 0.375709788053031, -0.286417499118644,
-0.653460291838493, -1.05459730240097), .Dim = c(100L, 3L)),
    alpha0 = c(0.387790912133521, 0.432392032418236, 0.179817055448243
    ), mu0 = c(-0.783768618915435, -0.221196846055776, 1.11967331782497
    ), beta0 = c(0.445798427609989, 0.413154313360721, 1.05133848178348
    ), tau0 = c(2.8476319821693, 1.99364477366622, 0.634865601056395
    ), gamma0 = c(1.83726410698349, 1.89567767307138, 1.58763318421333
    ), alphaN = 50), .Names = c("pi", "theta", "eta", "alpha0",
"mu0", "beta0", "tau0", "gamma0", "alphaN"))
K4 <-
structure(list(pi = structure(c(0.210284731451054, 0.561317751338692,
0.107531092557761, 0.0313031817893378, 0.0306055950453064, 0.206118647044215,
0.123635645026266, 0.345646512740516, 0.197602259224253, 0.301485986504561,
0.241478961459238, 0.0935779532732588, 0.0413524227124534, 0.0206023877648695,
0.274663143820074, 0.247381956393096, 0.0398799341081556, 0.393401627147367,
0.187854654321379, 0.0812502406405963, 0.144917230424709, 0.210099541549356,
0.22312693596994, 0.0847400854756854, 0.171183030105497, 0.0744795637638045,
0.0858429943514246, 0.170631823467883, 0.782329851086885, 0.383263606885262,
0.380499689565613, 0.0374189130354757, 0.045999922806691, 0.191784844186989,
0.462678751355487, 0.224636104690191, 0.344374634877381, 0.479059465902087,
0.152097637262014, 0.289069133121838, 0.141391250035434, 0.195711167883121,
0.246854088611218, 0.0391630605132005, 0.362678491613532, 0.0452216643758634,
0.254273730544617, 0.0815955559838887, 0.169562610437091, 0.152860799407551,
0.141677026113685, 0.314753973565563, 0.474255919732593, 0.227821961275628,
0.425228504490976, 0.314015011168311, 0.0361580635443423, 0.123936961618327,
0.142103592923495, 0.0432579555202817, 0.137708009289552, 0.267679556868423,
0.166152001370228, 0.206885264156346, 0.0849353273002354, 0.343137053839993,
0.0717017290532511, 0.085772503943093, 0.781825334130748, 0.068170275297377,
0.114706339197089, 0.0296538738983236, 0.0500527941031725, 0.0499551318867975,
0.211400182186386, 0.213111262773568, 0.245718517342742, 0.11927556971937,
0.334244517506818, 0.169038114156085, 0.417747036029029, 0.00959109680188979,
0.275389875728337, 0.1168697696689, 0.032187716448068, 0.316899476218196,
0.461016442380178, 0.0785584363424109, 0.0197363420211424, 0.76772697750527,
0.196973437621095, 0.209152788897436, 0.190221769339498, 0.301918619101084,
0.318914394758303, 0.151544740591981, 0.0735775815031031, 0.117025592568656,
0.249570923695583, 0.674501257385348, 0.100739982034961, 0.281706650901449,
0.746102726999397, 0.703392332970587, 0.786626003125745, 0.0785211671067852,
0.717380853993931, 0.207116660859123, 0.0991815622525382, 0.0702228409761295,
0.49427257811871, 0.217063333776846, 0.410015427454943, 0.0536878719964546,
0.344064316467297, 0.265391689250324, 0.544030214545912, 0.301030288433295,
0.206385014220859, 0.409765715993, 0.537008797128151, 0.215594824617491,
0.397216384340737, 0.561749551628589, 0.468953790982128, 0.814352553851579,
0.747886307214521, 0.203259541711352, 0.0476056323844081, 0.0757949119347114,
0.264708506026578, 0.0976286878577134, 0.264331927796427, 0.0656400058665831,
0.327378151732311, 0.468161554890323, 0.247924209226044, 0.482516492929955,
0.583919414438575, 0.517855653082369, 0.485047011456785, 0.312956899995487,
0.671700745591672, 0.602566587569891, 0.0360611834219146, 0.485893184762891,
0.635922115821894, 0.70529622729286, 0.0761029985432749, 0.742304625004379,
0.621767176102106, 0.154096234380806, 0.0392622319865238, 0.322741744782985,
0.265644857493676, 0.314356402971804, 0.140776704443742, 0.645857754839526,
0.0610681067401238, 0.656240568655194, 0.0352525028874672, 0.433239422931551,
0.263679483807991, 0.544049910507982, 0.0170267835344885, 0.245319665464901,
0.273554338529562, 0.245560606445585, 0.0416435773818151, 0.552803328152525,
0.654565885614676, 0.307573183461906, 0.355600051988897, 0.353891155100747,
0.453959973747443, 0.124476609177038, 0.348220500824581, 0.633813459899717,
0.444126708949536, 0.283102149880657, 0.0176794423496842, 0.100817234531771,
0.136109069777988, 0.474521173733132, 0.595654709147477, 0.547254110608448,
0.0435878608435286, 0.054737115446731, 0.810314020073359, 0.0956046629472617,
0.0609098316960506, 0.0759395402333755, 0.520967122206699, 0.134957413036054,
0.354551427269692, 0.628466210416715, 0.82183607422827, 0.218236467716801,
0.189271452462576, 0.232536403942774, 0.401172610094787, 0.110408905435826,
0.116171628921507, 0.0940827768444709, 0.123581369390088, 0.147905599325806,
0.0216050374441521, 0.420594837156395, 0.673351584385402, 0.568048728810185,
0.0451383687159463, 0.647673616900243, 0.521515452143166, 0.56639181091758,
0.324781413007455, 0.453245402739775, 0.381330076435479, 0.283034071694329,
0.0973230763890989, 0.176443464549307, 0.104881236666257, 0.51382074550247,
0.355798834506307, 0.334175596856447, 0.347042675849553, 0.0758482467056985,
0.137918767132817, 0.454952682560903, 0.0508222900758355, 0.492274360192888,
0.278152557171961, 0.711339303304535, 0.464477746658985, 0.715691228712426,
0.174348890040462, 0.268978527007272, 0.0961085982622736, 0.020672266388249,
0.217725582558766, 0.148647046775859, 0.104135102861464, 0.229751760889875,
0.0524603106359661, 0.108105605490008, 0.351151718791572, 0.433985064228684,
0.0295694871157638, 0.0764941154427647, 0.443240381822915, 0.026690614598813,
0.167543755200591, 0.510655631540087, 0.476477084114651, 0.0600089438207118,
0.069055758282046, 0.236179915911699, 0.717754736903557, 0.0848101872874693,
0.66046678836731, 0.246242687945755, 0.795339634224611, 0.0323556643923174,
0.4783771440224, 0.0590438201275803, 0.328961077409363, 0.395438444622885,
0.321789827257135, 0.656735249275493, 0.148336547822896, 0.347385259535062,
0.208247733968687, 0.629218592859655, 0.349614259422177, 0.573641076868936,
0.202000025792443, 0.469787351023671, 0.393412286846258, 0.145032325693296,
0.205532085508408, 0.527256036792339, 0.497602396812712, 0.690185568183585,
0.34920343864164, 0.220617592248335, 0.337464788863648, 0.0760457995905531,
0.459309520494497, 0.534315714281633, 0.16320062087974, 0.040268587135743,
0.372171959069937, 0.459643734136238, 0.0326038935864328, 0.409334578568702,
0.0623564250836818, 0.212652733344468, 0.0874649037623274, 0.506813809625142,
0.354411221694032, 0.0511327721024939, 0.287802676419197, 0.0465666923240326,
0.0301945515213349, 0.171221708395605, 0.0591870324388603, 0.567454586523194,
0.13737846353565, 0.0266419892439661, 0.0298645941378071, 0.060242443709124,
0.219110091706106, 0.0416850960496516, 0.0271166976894378, 0.359317929321096,
0.0564911267051731, 0.033980951616805, 0.0347597749104531, 0.0225340127250093,
0.508437255068662, 0.332540578817098, 0.213192735780883, 0.0604848883306825,
0.0238578451830159, 0.0193347660392782, 0.0128205030628226, 0.0353196356789178,
0.0283519313012371, 0.171155952259862, 0.119242226452871, 0.0486671209871386,
0.0766392472358478, 0.153613095802276, 0.225190402737897, 0.0268839212340011,
0.03559420687174, 0.0382238134122134, 0.311592557634301, 0.0177517747797088,
0.046257365740645, 0.0444281670199338, 0.269426635646317, 0.261580171231516,
0.0289848551611442, 0.250164746426901, 0.250108606172981, 0.034900086632562,
0.0802346665177257, 0.136614101280487, 0.311094009196719, 0.0781439609892568,
0.0690120425836186, 0.0204941605135448, 0.0100047641662324, 0.389427350120675,
0.240070879733302, 0.135448669948186, 0.105310495108359, 0.145395096254678,
0.136361511969071, 0.0542587878787688, 0.0316998535983695, 0.266725355807709,
0.0917913707993816, 0.190021005208091, 0.569076811755914, 0.0161048360722204,
0.332954105160052, 0.0119316403358283, 0.0281945406645408, 0.0316411370150352,
0.0224800412195484, 0.0335543497801153, 0.244732894485753, 0.0225126361435193,
0.132639818273728, 0.192624777025724, 0.0126486949864186, 0.101878644687617,
0.0160966880352375, 0.0206036991709188, 0.0669711248085754, 0.199406100482754,
0.239297615852034, 0.187991464349634, 0.0346927855408071, 0.0598006135828028,
0.0360861762817967, 0.332388733929225, 0.00674901702575937, 0.0963997724117249,
0.369944771612918, 0.255263936732951, 0.25620721486737, 0.15378938929416,
0.264177752888322, 0.00733631564683627, 0.0171214405062994, 0.157924130089402,
0.206746402147809, 0.0418295665693842), .Dim = c(100L, 4L)),
    theta = structure(c(1.28107931194233, 2.06712106260122, -1.11979183072359,
    0.116506953868236, -1.56896224255009, 1.23704307693697, 1.64517323362476,
    0.316986244875731, -1.18886866010092, 0.359123886349685,
    0.429623456803822, -0.144267805224826, 0.2649889890891, -0.0519205507412458,
    0.312126944029553, -1.15015735458459, -1.24520967546971,
    1.14715488822911, -0.824098737218858, 0.29089511195037, -0.912784636144002,
    -1.29386394441868, 0.724839438391337, -0.131399678502111,
    -1.07179168177401, -1.20308634523831, -1.43634664168596,
    0.203554705193321, 0.875364388771928, -0.277878145581143,
    0.0541491461798494, 0.134245309453337, -1.02367102861636,
    -0.412089494183686, 0.687145128005745, 1.35612467168413,
    -0.0976744983267706, 1.00960412300763, 0.432429976443531,
    -0.690859452616592, 0.378037005665203, 1.02620134209161,
    0.583223663815131, 1.24173788612957, 1.35900856398778, 0.783906488510492,
    1.27398848380691, 1.48061619648152, 0.0136308998199595, -1.09925142311055,
    -0.653722108971759, 0.826088030076283, -0.259941079395478,
    0.97937817261639, 0.191103334780751, -1.08153013153296, 0.290154495890376,
    0.694496963320466, -1.66472134124475, -1.67675875684897,
    0.689890507736313, 0.600130567200788, -1.3416561676317, 0.674371250297404,
    1.12499958147385, 1.5863733192729, -1.07435097253949, -1.21452822707716,
    1.44665334437252, 0.56551310541083, -1.72839516420608, -1.21699109887884,
    -1.13971933427055, 0.164261147169933, -1.36067565032783,
    -0.468731037655452, -0.957697880117146, -1.4857150103021,
    1.09984451447359, 1.11649422690839, 0.0872625903136964, -1.53607117533207,
    0.90667206535614, -0.841636421550387, -1.47792451189305,
    -0.0558072636619941, 0.120907561188813, -1.33470538000572,
    1.39939156617306, 1.12282388917398, 0.0743996529185858, -0.193683716994851,
    0.757653502230613, 0.249723991595361, -0.0117243328041238,
    -0.796060487892466, -0.57454943802432, -0.690625773532366,
    -0.417459196816579, 2.34513752862926, 1.08898074554827, 2.19495091161048,
    1.00891397344283, 0.397042552308072, -0.046327811183561,
    0.70811065783361, 0.936571121233933, 0.0684188977889355,
    -0.32347241832595, -0.28302917386577, -0.236611962865092,
    -1.02658064690315, -0.147446766763877, -0.482626767706527,
    -0.50889410554348, -0.509363461493623, 1.35561100158224,
    2.13825755044139, -0.517489431485098, -0.315615466777907,
    -0.419393406582385, 1.8577346222505, 0.528693804408607, -1.14910767978564,
    -0.405953944161445, 0.657148566375387, 0.786881801906499,
    -0.245049465115785, -0.252820381283136, -1.47738749849858,
    -0.177644096504732, -0.815676035006781, -1.36005916022572,
    -1.05923409527004, 1.88602681383467, 1.25853438941608, -0.560018013851232,
    0.783999765815125, -0.15714698130786, -1.61730476807283,
    -0.834888499897876, 1.01059387065743, 0.656667743823848,
    0.326110781759627, 0.831987997090746, -0.280608125967632,
    1.16386585714921, 0.741147505043654, -0.923376450846198,
    -0.0664864815800418, -1.03065283589394, 0.68045135326577,
    -0.213466542591566, 0.463643389731221, -0.967849077676226,
    -0.404773717147692, -1.15844984306867, -0.0981129873991779,
    -1.29219979626831, -0.544597846494766, 0.285451221068347,
    0.353072526145953, -1.20158365253834, -0.524421228322318,
    0.667507847263456, 2.31801933205312, -0.340809364457782,
    -0.385743171940853, 0.907378883671346, -0.775655647390625,
    0.478352511632289, -0.805755119473728, -0.555577136847008,
    -0.213132139177307, -1.43794680408706, -1.29319231985759,
    2.99192700869669, -0.336300374876154, 0.730152732030147,
    0.400860320448784, -0.966398617767534, -1.31496131163535,
    0.409177693937005, 1.21544369758058, -0.216272578587612,
    0.323829951665837, -0.884872950743614, -1.7803529444406,
    0.417151679197279, 1.98604941103274, -0.753672301377713,
    -0.33390690296184, 0.60420774927454, -0.51162469141125, -0.744313096970892,
    -0.0135811138438501, -0.568523224068194, -0.442873246280333,
    -1.79351326879245, 2.48577071124605, 0.227623924729932, 1.07372796761799,
    2.65358708851206, -0.561051295316625, 1.34758581439513, 0.199025534504815,
    0.358604631344444, -0.581392432291489, -0.422987001002143,
    -0.855991236662914, -0.967850927974245, -1.47282485787725,
    -0.684517427344574, -0.169526689912091, -0.428951950578221,
    0.233023284878779, 0.404945174060238, 0.84707438182031, -0.791990137923116,
    -0.496655088413473, 0.240805303877222, 0.992486229548813,
    -0.224893345400136, -1.41846359095208, 0.420894882560626,
    -0.334825492840342, 0.813167906148352, -0.750388691047474,
    0.308726246546609, -1.48553283418323, -1.00121660470987,
    -0.828850027508861, -0.636312169775462, -0.920859883678148,
    1.47153718015513, 0.31002549700819, -0.427478064842491, 3.42890414912526,
    -0.948935192968774, -1.25770624491948, 0.0596023862212884,
    1.01308081412768, 2.31958750674534, 0.551352526498316, 0.818316254549961,
    -0.650549598553512, 0.464466489325201, 0.0748691158264944,
    -1.49220000640285, -0.485853428263958, -0.150086354448268,
    -0.0112583511646306, -0.844493732666868, -0.534593026124342,
    -0.800695456131975, 0.0345134263213566, -1.34597065294361,
    -0.567527479958602, -1.48403754171405, -0.143072534994432,
    -0.154549317379302, -0.597778472779048, -0.390541865741291,
    -0.745117097214735, -0.244776493490708, 2.61694046610909,
    -0.259456247353128, -0.565903650108426, 0.929440492009542,
    -0.603152987062694, 1.11696328655427, 0.544348506153049,
    -0.293457582938897, -0.15588006702023, -0.353537329158298,
    -0.702083596908945, 2.16148249486928, 0.900929568661015,
    0.151868615360015, -0.332327338667132, -0.561331961786525,
    -1.04035891261667, 0.0148851579574887, 0.861683383493539,
    0.350896718526115, -0.258972096403301, -1.22421988803605,
    -0.684043895012955, 1.52757943440744, 0.672128970286218,
    -1.14572061262438, 0.164106776689537, 2.43720133636118, -0.660473104046677,
    -0.282884132539371, 0.741628092805415, 0.806560408231462,
    0.0781034843465383, -1.19079007840009, 1.88261516950771,
    -0.626193071924432, -0.529562053363806, 1.85009156779685,
    -1.53883719674202, 0.748978337302575, -0.808440390814065,
    0.0876764841409461, 0.253293082950854, 0.924456482016659,
    0.127985414654029, -1.25671303770749, 0.658074733976671,
    0.881743721413701, -1.3063516776267, -0.247171222763354,
    0.339681855160101, -0.155708737448041, 1.38091122394791,
    -0.913481226893822, -1.35157456026028, -0.848887068677631,
    0.79597862616902, 1.90812939349141, 0.477846462960166, 1.16776765127999,
    0.482968171256523, 1.24864180157437, -0.433275089669405,
    -0.777568018802154, -0.661768561815588, -0.390623609191088,
    -0.399938828472157, -1.52446480132046, 1.39110740764243,
    2.16187440893404, 1.94735454503317, -1.1351312679268, 1.10167006317699,
    0.489272958448961, 0.375057430592598, -0.539499450742417,
    -0.738064516596026, 0.772667776649792, -0.986574406081179,
    -0.876629180880825, 0.796916380022931, 0.219663107119699,
    -0.25145903952464, -1.03415171291323, 0.976290490179399,
    -0.246044486948181, 1.37529383057496, 0.923444924151923,
    -0.502455916891372, -1.19393125346238, -0.16087899483809,
    -0.420346713522089, -0.187564170397763, -1.0115313724445,
    -0.548146057530684, 0.654309106707187, -1.47061112165959,
    0.356693575753039, -0.674910221437918, -1.42978617699721,
    1.87516225382027, -0.617353505026703, 1.41513416527724, -0.722124333264478,
    -0.805780748129011, 0.302703656606314, 0.827750471726668,
    -0.954958783535867, 0.725345505215146, -0.795068834941182,
    -0.257966567547567, 0.128773582127336, 0.030967667686332,
    -0.836771056223738, 1.34643269102054, 0.210287470575774,
    -1.09967161501398, -0.727693445676646, -0.182299014587206,
    1.10486694732084, 1.0834429386996, -1.49179031300875, -0.914468779443052,
    1.85618225396913, -0.522485079701031, -1.51042090925608,
    -0.334576486335725, -0.159466060159472, -0.208482054172158,
    -0.918183015462937, 2.03838089723348, 0.622965301437934,
    -0.273213654218653, -1.83039749550429, 1.89721014770039), .Dim = c(100L,
    4L)), eta = structure(c(0.387357691135456, -0.919761207951423,
    -0.700623780440212, 2.39113721690086, -0.11601628197446,
    0.0506161947087653, 0.0549015627446014, 0.0193494450109296,
    -0.995439268342327, 0.0724063136717941, 0.193784296560065,
    1.22198324984236, 0.710450539991891, 1.95928773529583, -0.57071964231488,
    -0.360681626719852, -0.86102773393786, -0.608171507514286,
    -0.524036526556456, 0.517211857093462, -1.02568543413826,
    -0.659407804305673, -0.270065524095328, 0.726822819092318,
    -0.128121392315767, -0.345172858047461, -1.49694576984556,
    0.545438731445048, -1.15464219261549, -0.199229011518879,
    0.0822620684856425, 1.88923639141628, 0.716505596004774,
    0.433509183564341, -0.465376570138587, 0.302350709053632,
    -0.394533730559198, -0.871404502939654, 0.585450784904972,
    -0.744523568449789, 1.41922419858584, 0.455885802086104,
    0.276257224620197, 1.97136498987861, -0.583162294429881,
    1.23790971060647, 0.453750212654579, 1.19077669465468, 0.877364929168743,
    -0.528240214223696, -1.26000397483169, 0.0183196768986726,
    -0.860645038629796, 0.388348677044663, -0.988096069439135,
    -0.764600087879578, 2.99122288913305, 0.621128545137504,
    -0.129233221180956, -1.81499096221981, 0.692459963952361,
    -0.230768794243435, -0.206701384108919, 0.104209690224973,
    1.24203734651018, -0.236830517564855, -0.644989696428231,
    0.00241495072117355, -1.54116740770781, 0.659083517759494,
    -0.760176908309927, 0.0178250778938068, -0.486516864368944,
    1.17758741301732, -0.768141649326467, -1.45019400150867,
    -0.400266034812413, -0.430906458321122, -0.574252922545041,
    0.466246125285045, -0.357799330610415, 1.92546027493196,
    0.477323611397565, -0.709695850508985, 1.15894432948091,
    -0.27414927157798, -1.2074616202726, -0.457139948029633,
    3.62189422839642, -1.53322901712852, 0.898310376748464, -1.11960802455339,
    0.853916953436443, 0.440735649336889, -1.12270839255698,
    -1.07859060838004, 0.325857243431886, -0.826117131098276,
    -1.3469282209886, -0.721024837409828, 0.0827902390607397,
    -1.63956796276912, -0.588847406513804, -0.708951493386917,
    -0.58985781244143, 2.29773036028012, -1.1217060101623, 0.415685072517357,
    -0.0311095604240434, 1.54875136073181, -1.18752776989391,
    0.204503306792055, -0.107158173098617, 0.756162594949853,
    -1.20063632764096, -0.0182450622206033, -0.8374345123658,
    -0.600930361651591, 0.0959063377514675, 0.0817880600675514,
    -0.438492917816135, 0.26980042773613, -1.40918041718202,
    -0.428237014512586, -0.915447835309612, -0.804725757465104,
    -0.31526367684539, -0.11125361828099, 1.73030644148995, 2.14850343411372,
    -1.07847306715502, 0.73001235416616, -0.158998223889316,
    1.63230458890619, -0.161903205418513, -1.30450750300287,
    0.802480271772105, -1.14330928572096, -0.921630481971129,
    -1.03786455500883, -0.72250988030475, -0.0495528144432695,
    -0.75699788352874, -0.184227448294887, 2.78839495537979,
    -0.684754360581658, -0.778286597640707, -1.14943894763403,
    1.77859591563032, -0.806763680532519, -0.197512720461643,
    0.624521080611954, 0.951662852954288, -0.520364001602847,
    0.167885984866976, -0.0432457242540501, -0.0933252100493874,
    -1.01346408835399, 0.92599041031205, -0.284349017949284,
    2.11415072898737, -1.44697823345592, 0.234787160055282, -1.08279140970392,
    2.909806282266, -0.219822361053383, 0.225393214143776, 0.471090895257095,
    1.12315336077801, -0.513562222355611, -0.478684542601457,
    0.224247768247782, -0.0842997056234841, -0.350906517104212,
    -0.0787793138525767, 0.442751144389015, -0.706610934709785,
    -0.751737344270202, -1.44242992080358, -0.532226302569938,
    2.43583112534009, 1.05713973012153, 1.23407755758217, -0.353129743469912,
    -0.187254324451343, -1.16454638524613, 1.42494107920678,
    0.617249796477557, -0.689937547296257, 0.43505129753032,
    1.36428303054254, 0.489905655550707, -0.0973924368281786,
    0.949976070970272, 0.039958622980375, -0.550555919089476,
    -0.350183664956465, 0.2793495859953, 0.526624676228683, -1.40566361552007,
    -0.353611189091563, 0.781374241250927, -0.865408903669251,
    -1.39850823299668, 0.073388110340433, 1.25832129769394, 1.29749246061261,
    -0.606092037482962, -0.694019552098184, -0.537314474484242,
    2.13440035982797, -0.49469090799012, -0.876174548684903,
    -1.09618249324197, -0.0122855969348753, -0.493482970193775,
    -0.0156779892138535, -1.29479516016036, 0.705859941542336,
    -1.56744756561959, 0.851258350301087, -0.548183485925964,
    -0.185625797670476, -0.683844377882718, -0.773353060851434,
    1.71587025106071, -0.418339819369906, -0.50080465848537,
    -0.00706744113144577, -0.12892325097952, -0.0502961724761858,
    -0.220594809525994, -1.10021328155362, -0.764019959826718,
    -1.38446651287621, 0.674550906271179, 1.40835567895482, -0.103114440362787,
    1.06854242371523, 0.59253473868171, 1.14088742744369, 0.316828019268859,
    0.420256319183535, 0.867942851437119, -1.04691629258787,
    -0.83485987536936, 3.15733133292278, 1.02510307566821, 0.128966999544092,
    1.57064533046373, 0.370778167832248, -0.734516201016336,
    -0.855306101927501, 2.88288011523976, 1.42943948443055, 0.280872263804826,
    -0.710702703561493, 1.07398913195216, -0.58383424554207,
    0.208994826299007, -0.556118782688653, 2.79682178210612,
    -0.508747061173135, 1.46066542447063, -1.15088374586354,
    -1.01784980680583, 0.0378882120261718, -0.810675458424778,
    -1.41050267306135, -1.29640444628658, -0.0154234001511911,
    -0.614562812603284, 0.340002367448513, -0.820560890117588,
    0.0949073797586113, -0.0965303292552881, -1.09965513795963,
    0.0900933966234438, 0.947945683904449, -0.726207713545618,
    -0.651369468483167, -0.242835226960384, 0.0811510387767707,
    -0.124455110122057, -0.404843004989638, 0.455149188256675,
    -0.90056372375452, 0.00898143211019542, -0.649017673068319,
    2.76365113549458, 0.0327910864884076, 0.0964143838861557,
    -1.44873242621947, -0.571626053341633, 0.485261530371723,
    -0.929709209976426, 0.170246944425461, 0.153934382631421,
    -0.0898478597921085, 0.625026650906675, -0.788512408852318,
    2.32225117624463, 0.708252491179169, 1.19799269650167, -0.3546424437041,
    -0.677038784907152, -0.97320418681869, 0.302770314702609,
    0.287658525957357, -0.776718841787808, -0.939397888353129,
    0.53946719539946, 0.0888493757741455, 0.334058068912825,
    -0.925711380242579, -1.11432186335529, 0.922463395510915,
    0.75758046144107, -0.711229495884294, 0.431177284655456,
    -0.591998560851981, 0.340614046641713, 1.11448048733588,
    0.691940556047144, 0.336652703368511, -0.874183559197874,
    -0.419213213766093, -0.662375362323594, -0.83712607254332,
    1.29646522351558, -0.886563283952238, -0.358530672894636,
    0.989603929786316, -0.303497429332038, 1.58553986857323,
    0.249448232747491, -0.928018448798753, 0.627902290651246,
    0.493385704855158, -0.305229553723598, -0.51092793809799,
    -1.03743426876391, 2.45743399056914, -0.612594080819972,
    1.10038997364642, -0.44225303968887, 0.593672142748171, -0.797881737318395,
    -0.589585198972327, -0.743830305306839, -0.320309889447735,
    0.452131799193948, 0.0246659533678013, -0.981418914097911,
    -0.954937346827864, -0.926351911353289, -0.928704337610995,
    -0.844408703210934, -0.800042415229122, -0.98076995443178,
    0.0592676759467146, 0.852545543043613, -0.750962428683859,
    -0.898267746982151, 0.29270427000655, 0.338783267584473,
    -0.734123232530419, -0.497573087707947, 2.43065149672742,
    1.43235267374338, 1.01198267779448, 0.745085111699414, -0.638950560014443,
    1.72143905482614, -0.815274408863957, -1.13054404132028,
    4.22196422230738, -0.525611813045331, 1.4421134100631, 1.85569167668323,
    -0.757274772770625, -0.277885204359713, -0.623596915055086,
    -0.542131333356386, -0.66557243469754, 0.265821293215938,
    1.54224028192353, -0.656703524687117, 0.231121166848342,
    -0.943752347553263, -0.623457065590568, -0.62413958069948,
    -1.17089442096504, -0.829806243051932, -0.61522496228339,
    1.22055092718712, -0.00686569171795235, -0.680909604278302,
    -0.841907343351749, 0.839229617106057), .Dim = c(100L, 4L
    )), alpha0 = c(0.213379774662305, 0.351272581339338, 0.304065611670538,
    0.131282032327819), mu0 = c(-1.0286800443943, -0.458321625851734,
    0.000847700766499287, 1.48904839591483), beta0 = c(0.504129628827274,
    0.360071274823093, 0.509659200772171, 1.12712760043936),
    tau0 = c(3.65627610123875, 3.09517789012677, 2.20948702980688,
    1.24181072263623), gamma0 = c(1.7324742499152, 2.378467772105,
    2.2558465994263, 1.96638232604759), alphaN = 50), .Names = c("pi",
"theta", "eta", "alpha0", "mu0", "beta0", "tau0", "gamma0", "alphaN"
))