User Tools

Site Tools


lab:projects:03growth_curve_modeling_with_mnar_data:a_simulated_example_single_replication
Model{
  # Model specification for linear growth curve model
  for (i in 1:N){
    LS[i,1:2]~dmnorm(muLS[i,1:2], Inv_cov[1:2,1:2])
    muLS[i,1]<-bL[1]
    muLS[i,2]<-bS[1]
    for (t in 1:5){
      y[i, t] ~ dnorm(muY[i,t], Inv_Sig_e2)
      muY[i,t]<-LS[i,1]+LS[i,2]*t

      ## missing data mechanism
      m[i,t]~dbern(p[i,t])
      p[i,t]<-phi(gam[t,1]+gam[t,2]*LS[i,1]+gam[t,3]*LS[i,2])
    }
  }

  #Priors for model parameter
  for (i in 1:1){
    bL[i] ~ dnorm(0, 1.0E-6)
    bS[i] ~ dnorm(0, 1.0E-6)
  }
  for (i in 1:3){
     for (t in 1:5){
         gam[t,i]~dnorm(0, .001)
     }
   }
  Inv_cov[1:2,1:2]~dwish(R[1:2,1:2], 2)
  R[1,1]<-1
  R[2,2]<-1
  R[2,1]<-R[1,2]
  R[1,2]<-0
  Inv_Sig_e2 ~ dgamma(.001, .001)
  Sig_e2 <- 1/Inv_Sig_e2
  Cov[1:2,1:2]<-inverse(Inv_cov[1:2,1:2])
  Sig_L2 <- Cov[1,1]
  Sig_S2 <- Cov[2,2]
  Cov_LS <- Cov[1,2]
  rho_LS <- Cov[1,2]/sqrt(Cov[1,1]*Cov[2,2])
}

# The (naive) starting values for model parameters.
list(bL=c(60), bS = c(3), Inv_Sig_e2 = .1, Inv_cov= structure(.Data = c(.01,0,0,.4),.Dim=c(2,2)))

list( y = structure(.Data = c( 40.25667, 33.21066, 55.79066, 38.83631, 
40.00714, 41.71415, 58.54795, 62.57786, 46.94252, NA, 65.57477, 58.36546, 
52.49677, 45.12676, 65.86044, NA, 78.51115, NA, 85.51174, NA, 49.11311, 
41.77615, 65.98617, 41.96985, 43.40405, NA, 34.00264, 69.99109, 44.73911, 
39.17017, NA, 43.04485, 39.17419, 51.41215, 62.34769, NA, 76.1071, 68.29808, 
60.11757, NA, 43.82782, 58.48015, 58.1294, 62.78657, NA, NA, 66.85616, 
69.11347, 68.43042, 71.00689, 81.06636, NA, 83.75056, 74.53105, 81.39699, 
42.11709, NA, 54.28155, 70.58605, 59.65621, 54.97104, 71.4244, 102.3012, 
93.62228, 89.12894, 66.06999, 71.40222, 40.86486, 62.28577, 61.54204, 68.58225, 
68.26518, 79.59481, NA, 63.01174, NA, 120.2068, NA, NA, NA, 86.57958, 82.68925, 
72.87673, 83.75656, 87.58842, 69.36738, NA, NA, 75.16355, NA, 24.63673, 
22.74359, 27.56178, 21.32627, 42.84024, 53.99073, 57.22717, 52.54125, NA, NA, 
66.36798, 65.95332, NA, 71.25119, NA, NA, NA, 93.4985, 94.88033, 95.8855, 
41.05863, 59.46943, 44.71288, 47.60532, 53.21017, 55.58332, NA, 70.25794, 
70.85113, NA, 62.2117, NA, 77.02959, 69.22629, 86.55676, 50.94858, 32.29002, 
NA, NA, 51.08067, 100.5493, NA, 68.25035, 98.4895, 110.3060, 20.38884, 
29.92779, NA, 23.95143, 26.12508, 59.10682, NA, 100.9563, 81.13407, 72.84573, 
70.1631, NA, NA, 78.86826, NA, 65.56467, 70.09091, 86.35999, 81.884, 95.4952, 
69.34537, 71.08683, 55.07489, 78.63845, 79.55191, NA, 57.90731, NA, NA, NA, NA, 
54.38721, 73.6942, NA, 67.18398, 39.62580, 64.5008, 18.70678, 53.34018, NA, 
62.03891, 82.4063, 67.64741, NA, NA, 40.03364, 57.75136, NA, 67.72522, 72.0432, 
91.5521, 89.2268, 89.58189, 104.2722, NA, 67.77498, 59.8135, 67.04515, NA, 
72.61952, 88.1452, 93.50781, NA, 92.0763, NA, 79.61648, 74.17471, 77.8081, NA, 
84.07986, 68.3945, NA, 69.43177, 84.78259, 76.40668, NA, 59.93432, 67.28434, 
63.88574, 56.35919, NA, 59.41256, 56.33733, NA, 78.65815, 81.55032, NA, NA, 
90.19214, 84.54722, NA, 85.58091, 69.20691, 71.80479, 82.48576, 56.22945, NA, 
50.80206, 52.74988, NA, NA, 66.23822, 70.10472, 59.50215, 88.84887, 86.08595, 
84.7013, 94.67135, 103.5373, 101.3238, 45.93853, 51.01421, 61.33775, 65.28878, 
64.01578, 40.83789, 39.2437, 57.84149, 47.04963, 68.33888, 47.02023, 55.85195, 
NA, 69.06391, 56.89587, 46.61655, 66.65222, 54.0764, 46.16136, 58.92011, 
80.57303, NA, 67.18647, 75.2758, 83.27272, 51.51635, 87.85089, 68.26245, 
70.10025, 74.46957, NA, NA, 69.16795, NA, 67.54661, 36.36832, 49.93985, 
53.37204, 52.33917, NA, 25.43459, 17.30181, 44.66281, 41.40251, 40.59961, 
71.72719, 68.68997, 59.24842, 74.94939, 67.83137, 61.408, 80.61202, 54.75078, 
63.23108, NA, 59.47035, 78.79218, NA, 89.24809, 86.66174, 92.73067, NA, NA, NA, 
99.24037, NA, 83.57597, 79.8523, NA, NA, 11.21371, 37.88691, 33.30724, 
26.47985, 26.46776, NA, 94.78486, NA, NA, NA, 50.96672, 69.88575, 48.50983, 
72.94087, 65.82692, 69.7268, 89.25488, NA, 97.7314, 105.3995, 86.31162, NA, 
74.1312, 90.0566, 92.56803, 55.46673, 56.77465, NA, NA, 87.14321, 31.15668, 
19.96874, NA, 44.8188, 50.03295, 70.64256, 46.22007, 53.12228, 74.76404, 
70.75588, 36.19541, 39.61157, 34.45145, 28.43428, 46.85291, 64.89584, 48.88961, 
43.87489, 71.67932, 52.7592, 53.65777, NA, 68.59787, 61.17512, NA, 52.73755, 
90.2722, NA, NA, NA, NA, 81.87893, 88.09036, 60.14214, NA, 58.15134, 60.55473, 
NA, 55.71411, 45.69478, 68.66181, 67.42092, 67.02603, 74.81218, 85.70205, NA, 
84.48442, 80.6203, 79.21619, 82.75424, 69.96627, NA, 60.47623, 60.6698, 
73.75548, 65.98384, 57.84005, 51.36992, 60.5414, 62.25243, 65.7203, NA, 
79.71734, NA, NA, NA, 76.54787, NA, NA, 106.775, NA, 74.87885, NA, 92.31366, 
73.06972, 62.10467, 74.09759, 59.97865, 57.54645, 67.9713, 40.76631, 52.14374, 
53.46361, 61.36838, 64.87708, 66.52865, NA, 46.54119, 55.67417, 62.12572, 
74.78427, NA, 68.68404, NA, NA, 73.4576, NA, NA, NA, 105.0183, NA, 57.86, 
63.52976, 66.74448, NA, NA, 66.56725, 66.63297, 66.43446, 69.04045, 68.8077, 
70.09829, 86.34522, 80.31896, 90.83032, 61.49184, 48.48296, 61.20679, NA, 
67.28962, 72.56449, 85.03349, 87.82618, 97.2958, 87.47084, NA, 28.29885, 
58.11604, NA, 39.76469, 56.30325, 43.56174, 61.13392, 79.91058, 83.406, NA, 
80.71447, 100.9761, 83.29387, NA, NA, 89.76237, NA, NA, 99.72049, 93.54335, 
71.65929, 62.7431, 85.49422, NA, 54.32821, 72.99917, 67.41656, 53.6049, 
76.98884, 59.60322, 68.21987, 59.80543, 72.43245, NA, NA, 76.18801, 66.13155, 
88.91895, 97.08565, 60.24263, 72.29281, 54.98922, 90.50329, NA, NA, NA, 
55.17826, 58.84274, 70.84026, 32.63648, 71.2379, NA, 76.80278, 77.12506, 
86.11516, 99.07489, 103.4574, NA, NA, 61.29274, NA, 58.20059, NA, 46.79235, 
81.89559, NA, 68.7728, NA, 64.60364, NA, 54.0054, 80.59603, 70.19321, 71.42213, 
39.62205, 43.00559, 53.46335, 46.74552, 57.62354, 77.14184, 43.62931, 59.92265, 
48.01528, NA, NA, NA, 67.37988, NA, 65.76608, NA, 61.95227, 91.44945, NA, 
90.92257, NA, 65.95531, 95.06046, 86.68181, 103.7810, NA, 68.28898, NA, NA, 
75.82755, 67.90246, 94.8919, NA, 73.26081, 88.94618, 66.58674, 44.72237, 
67.03533, 75.45661, 73.63504, 81.99541, 56.2058, 81.75541, 59.95057, 74.4698, 
NA, 79.92413, NA, 104.2932, NA, 67.33005, 60.32584, 71.1724, 87.83282, 77.7807, 
NA, 48.94709, 66.51839, 62.82142, 62.03484, 62.54236, 65.83553, NA, 70.86028, 
72.48624, 67.08102, 57.21941, 59.94142, 60.28413, NA, 84.7, NA, NA, NA, 
74.88697, 62.69284, 48.047, 45.74446, 57.88193, NA, 62.63428, 57.72969, 
57.30737, 59.30392, 83.69408, 59.43672, 65.97107, 54.0599, 48.96796, 53.33178, 
71.67886, 76.63374, 77.58454, 79.01762, 84.55834, 23.84342, NA, 45.66349, NA, 
33.31862, 62.87816, NA, 53.61662, NA, NA, 55.48381, NA, 68.21309, NA, NA, 
68.87309, 62.11516, 74.36389, 79.33363, NA, NA, NA, 62.33138, 65.48887, 
59.31104, 58.69865, 79.13391, 66.81167, NA, 83.99946, 72.23463, 77.29966, NA, 
NA, 97.11232, 37.56559, 29.66909, 55.47428, 26.55003, 28.50007, 29.23052, 
44.8416, NA, 53.03712, 43.24148, 44.40995, NA, 36.67719, 42.13835, 39.787, 
26.33403, 47.62859, 51.39362, NA, NA, NA, 80.9002, 60.57353, 74.32143, 
71.17978, 56.15496, 61.09237, 58.50784, NA, 91.58377, 63.63432, NA, NA, 
77.2274, 99.25384, 78.33704, 81.49103, 103.7941, NA, 91.54362, 38.83352, 
54.44122, 38.52267, 39.45084, 32.74984, NA, 47.88755, NA, 52.63526, 83.3278, 
76.84172, 69.54663, 71.1256, 51.78575, 59.54899, 80.32568, 85.10573, NA, 
75.44665, 83.5, 55.24931, 59.55601, 49.93795, NA, NA, 48.18828, NA, 71.2271, 
NA, 62.84163, 58.72123, 34.36542, 42.79904, NA, 63.31353, 57.14614, NA, 
86.74015, NA, 109.7513, 72.72168, 82.48651, 70.48383, NA, NA, 58.28142, 
64.46952, NA, 72.07502, 54.09807, 42.82811, 58.48579, NA, 64.32607, 50.90055, 
44.32382, 61.98069, 50.181, 36.98507, 50.85799, 86.3017, 95.56462, 101.8980, 
80.60514, NA, 57.59516, 46.39134, 47.90441, 66.2894, 50.51879, 56.044, 
74.39522, 66.21036, 59.442, 86.31461, 70.79993, NA, 77.38057, 72.4164, 69.6945, 
74.45649, NA, 77.09128, 64.15556, NA, 67.5509, NA, 55.03314, 43.57579, NA, NA, 
71.26146, 91.42311, 94.67504, NA, NA, 71.97287, 72.59527, 76.37737, NA, 
77.53634, NA, NA, 50.69751, 75.0838, 90.92086, NA, 79.28127, NA, NA, 64.14481, 
50.62726, 65.63919, 66.19555, 62.12455, NA, NA, 85.70464, 76.78837, 88.48982, 
74.74586, NA, 72.25345, NA, 59.91079, 52.19618, 58.04849, 45.68411, NA, 
40.77852, NA, 76.4508, 79.2122, 60.35292, 71.09539, 46.75073, 41.88338, 
61.75265, 74.53549, 78.37697, NA, NA, NA, NA, 78.97836, NA, NA, NA, 70.13722, 
68.67067, 63.05411, 61.08085, 56.4796, 65.39619, 75.70972, 80.06866, 64.62655, 
68.39477, 68.72337, 85.2835, 81.76831, NA, 89.44296, 87.57566, 84.57169, 
41.37413, 53.97322, NA, NA, 73.02997, 67.96942, 81.66343, 85.25455, 60.46183, 
75.45987, NA, NA, 83.31917, NA, 108.1447, 44.2936, 53.65951, 48.3128, NA, NA, 
53.05489, 61.40117, 48.12962, 56.25342, 72.05216, 64.66171, 67.45744, 76.39674, 
65.83494, 82.31427, 53.10887, 55.94854, NA, NA, 59.16373, 105.9569, NA, 
94.29583, NA, 107.6116, 38.06168, 67.90612, 78.70852, 68.80427, NA, NA, 
57.92044, 62.56251, 57.01873, 94.47794, 45.28189, 66.48665, 85.8318, 65.95548, 
67.68736, 67.69421, NA, NA, 61.1915, 79.57647, 67.46154, 59.8715, 66.50154, 
71.53575, 68.23093, 63.41517, 87.20675, 59.93159, NA, 88.87571, NA, 48.57177, 
NA, NA, 78.28601, 50.47551, 67.25866, 61.30787, 75.8252, 63.9518, 53.77663, 
46.93366, 68.63662, 63.85217, 77.72055, NA, 45.21745, 42.30496, NA, 67.32916, 
NA, 93.72863, 80.81512, NA, NA, NA, 73.30363, 73.34242, 74.17626, 70.49255, 
77.27383, NA, 84.89263, 79.8176, 111.0185, NA, 82.44561, NA, 56.55658, 
78.40631, 38.13285, 46.60976, 59.59094, 47.52077, 70.95602, NA, NA, 104.8508, 
NA, 101.1351, NA, 34.67947, 55.50714, 47.9917, 51.10954, 54.65947, 65.8663, 
54.33972, NA, 65.28827, 58.90656, 91.5126, NA, 87.16241, NA, 78.92958, NA, NA, 
NA, 100.3980, 87.22783, NA, 87.12594, 90.13608, 99.51065, 76.41873, NA, 
65.31592, 65.70326, 67.23519, 56.16627, NA, 69.28705, 64.71667, 66.78362, 
17.03869, 62.3694, 57.5904, NA, 58.984, 45.75149, 67.75746, 69.97982, 48.64789, 
77.57932, NA, NA, 68.73961, 70.5949, 78.11547, 28.27851, 62.08109, 32.51206, 
44.80753, 54.29163, 71.82825, 56.13985, 72.91337, NA, NA, 64.87659, NA, 
52.46113, 58.24917, NA, 49.68741, 57.72795, 56.423, 86.811, 84.83778, 46.96448, 
69.12855, 51.48846, 70.2108, 52.5982, NA, NA, 79.0545, NA, 90.36136, NA, 
80.80871, NA, 96.99533, NA, NA, 103.4243, NA, 79.73336, NA, NA, 66.14686, 
56.89477, NA, 99.61597, 50.50553, 68.70062, NA, 74.90134, 63.041, 72.27658, NA, 
54.04393, 76.1785, NA, 62.24337, 54.91684, 60.51252, NA, 54.13015, 55.42049, 
67.65, 90.72045, 83.50373, 72.89521, 75.21065, 70.97112, 72.67067, 64.9278, 
71.13362, 86.40064, 88.93383, 88.0853, 93.32624, NA, 54.77942, 58.42791, 
65.79972, 62.1798, 57.46798, 69.7879, NA, NA, 85.23305, NA, 17.35729, 36.38195, 
44.18192, 43.06956, 33.37207, 20.80060, 32.90328, 31.5015, 46.11860, 42.58112, 
55.78628, 66.41394, 46.36676, 43.76082, 57.31942, 36.79884, 50.72622, 63.88747, 
40.73585, 64.15951, NA, 110.1499, 122.6990, NA, 99.03566, NA, 91.93602, 
90.58178, NA, 93.44206, 76.59473, 79.6408, 58.85261, NA, NA, NA, 83.12849, 
84.1322, 81.45375, 80.66675, 48.43524, 50.48788, 43.52486, 38.36345, 83.45426, 
72.677, 78.70011, 89.70954, NA, 77.60943, NA, 34.29408, 23.40242, 45.41042, 
35.1385, NA, 58.0289, 73.98759, 52.32897, 52.17796, NA, 83.31876, NA, 95.98185, 
98.72848, NA, 55.01528, 63.09502, 37.58774, 78.18064, NA, 63.28165, 60.81145, 
NA, 82.10303, 77.13743, NA, 74.47008, 88.0613, 75.06321, 59.41272, 61.64629, 
53.3212, 54.15639, 67.49686, 61.59635, 64.63434, 66.5999, 65.84928, 58.86594, 
NA, 66.0694, NA, 54.45126, 100.1170, NA, 68.35124, 49.07954, 70.96743, 
72.54891, 30.02588, 48.98363, 48.8621, 42.84873, 57.69485, 59.79864, 60.60577, 
70.53369, 86.07098, NA, NA, NA, NA, 102.2434, 102.0969, 55.95673, 58.90051, 
42.55537, 56.36245, NA, 35.49449, 41.04659, NA, 66.9089, 48.81429, 42.18139, 
NA, 60.84268, 51.2551, 50.98958, NA, 59.55744, NA, NA, 61.86662, NA, NA, NA, 
73.41062, 58.31206, 49.65149, 68.82383, 68.15256, NA, 106.5934, 42.14746, 
44.3382, 52.4207, 63.36861, 60.77384, 65.58305, 60.35013, 59.56416, 61.51478, 
67.09184, NA, NA, 67.01011, 79.43763, 69.28629, 34.92167, 44.44663, 40.17563, 
55.80804, 49.94776, 48.64098, 55.27031, 64.88093, 67.30602, 58.226, 71.00931, 
78.06369, 70.39124, 61.90701, 70.30443, 69.17445, 86.65353, NA, NA, NA, 
51.44952, 67.24486, 37.30368, 81.57721, 92.43588, 70.12285, 52.32473, 62.77478, 
71.92394, 86.72951, NA, 52.2731, 48.15708, 70.02507, 68.04725, 88.42209, NA, 
79.92624, 97.54639, 104.6873, NA, NA, 53.1076, 64.63187, 76.74025, NA, 
58.65195, 75.54706, 74.72096, 62.42048, 43.48199, NA, 34.90706, 59.42265, 
47.53273, 89.86766, NA, 87.06513, 90.65915, 87.05093, 63.08933, 54.79823, 
62.29981, 63.44137, 67.97814, 60.1912, 69.88792, NA, 62.19366, 89.3764, 
67.00604, 79.75746, NA, 73.96827, 70.04567, NA, NA, 90.34542, NA, 97.94017, NA, 
46.84872, 93.6047, NA, 76.81014, 28.23243, 33.88218, 37.73588, NA, 54.05981, 
45.25829, 64.91549, 47.60928, 49.51208, NA, 86.28138, 69.51472, 78.01865, 
86.66053, NA, NA, 102.5933, NA, 109.1704, 100.9982, 65.328, NA, 50.98635, 
54.40272, NA, 25.43282, 59.8031, 31.46782, 56.9252, NA, NA, 35.09584, 54.6253, 
64.08581, 55.17989, 38.2676, 24.19522, 20.24067, 45.90146, 57.61352, 58.80545, 
NA, 57.04399, 66.25917, 63.17196, 82.78393, 90.92305, 113.5701, 83.55916, NA, 
63.6728, 89.81345, 56.59024, NA, 73.17424, NA, 52.65578, 59.09774, 56.86072, 
86.29857, NA, 84.71871, 77.85377, 97.336, 85.98079, 74.1644, 59.45634, 
68.52751, NA, NA, 64.86826, 75.0504, NA, 63.40641, 69.57652, NA, 63.76087, 
80.76754, 63.13359, 81.24639, NA, NA, NA, 98.64785, 103.0029, 37.91739, 
45.84293, 48.25492, 49.87349, 43.88038, NA, 62.66551, 51.55104, 64.53809, 
70.16276, 60.8996, 59.04438, NA, 39.15657, 62.70424, 74.22742, NA, 66.06745, 
NA, NA, NA, 53.44317, 46.95014, 50.60147, 44.91747, 57.47087, 87.3206, 
59.13762, 62.50641, NA, NA, NA, NA, 91.67945, 84.0498, 65.44713, 72.27959, 
66.23282, NA, 75.70325, NA, 85.70948, NA, 84.2687, NA, 28.88889, 47.54927, 
31.68178, 32.7653, 43.28927, 59.88922, 76.64767, 67.4288, NA, NA, 27.78698, 
10.67605, 23.25820, 41.35786, 48.17383, NA, 65.33738, 56.28444, 77.32698, 
63.871, 39.37951, 58.19463, 53.99793, NA, 92.70064, NA, 61.00936, 62.11251, 
73.74075, 75.44213, NA, NA, NA, 79.51091, 87.3663, 45.1755, 61.43493, 64.94046, 
71.00101, 76.37508, 28.09426, 35.96401, 26.19688, 53.85792, 38.26787, 34.5761, 
66.43864, NA, 74.18284, 80.86707, 41.17807, 40.06756, 42.9164, NA, 47.87852, 
37.99300, 43.32579, 58.39944, 60.44989, 66.71404, 45.49536, 38.99898, 64.74245, 
61.61373, 53.9818, 71.16603, 73.5484, NA, NA, NA, 51.57324, 50.63198, NA, NA, 
68.19148, 71.19665, 87.98042, 64.01473, NA, NA, 70.46033, NA, NA, NA, 70.2151, 
NA, 92.33935, 99.97658, 97.08827, 116.4196, 56.73801, 53.85559, 78.39056, 
67.09136, 69.77108, 60.8124, 73.01222, 60.16663, NA, 80.09848, NA, 61.14117, 
43.69322, 51.83791, 72.1774, NA, 68.90613, 80.74451, NA, 89.90243, 51.86884, 
61.07656, 90.96196, 90.09464, NA, 66.35266, 50.35388, 65.33423, 77.84726, 
50.07305, 45.68453, NA, 33.53718, NA, NA, NA, 86.7562, 82.91474, 86.06106, NA, 
79.78532, 72.20881, 102.1415, 93.18738, NA, 57.33564, 42.4157, 42.81387, 
66.81018, 64.10547, 65.94811, 72.7638, NA, NA, NA, NA, 40.20926, 82.19228, NA, 
NA, NA, NA, 66.98929, 63.24679, 56.47977, 71.49989, 69.89016, NA, 80.90993, 
86.6848, 25.56590, 15.01436, 25.49909, NA, 37.02165, 45.10252, 63.37002, 
74.29164, 81.18335, 104.3256, 38.87587, NA, 63.41249, 39.34384, 70.5663, 
82.7948, 82.94689, 90.61188, 109.3393, NA, 15.82697, 30.08402, 41.98398, 
61.50597, NA, NA, 57.36446, 58.01353, NA, NA, 37.24593, 61.85336, 64.25388, 
37.75572, 50.42313, 72.2393, 70.27358, 84.58875, 90.58484, 88.33901, 52.54987, 
78.45729, 68.86525, 66.71563, 62.58489, 37.53955, 52.76063, 57.1894, 47.24046, 
55.4493, 67.93623, 65.46715, NA, 75.17282, 51.68839, 56.88493, 58.50415, 
59.49644, 60.78148, 97.11507, 42.56571, 38.15798, 51.03929, 35.98926, NA, 
53.26402, 57.35031, 39.47668, 42.84973, 64.84581, 68.80629, 45.66547, NA, 
59.55469, 64.61403, 40.8638, 48.32186, 43.08598, 45.61133, NA, 42.66306, NA, 
64.99577, 48.38326, NA, 65.25577, 58.74913, 66.63693, 57.82683, 68.5334, NA, 
41.04128, 46.2921, 70.74168, 60.32138, 48.62117, 46.0965, 70.21496, NA, 
90.67505, 39.9012, 52.12952, 48.75541, 38.69902, 52.10674, 48.90245, 86.15229, 
75.65583, NA, 76.07561, 42.23333, 46.28624, 34.7765, 65.22973, 48.05695, 
59.07702, 90.4795, NA, NA, NA, NA, 64.49315, 63.15371, NA, NA, 49.88759, 
70.78453, NA, 102.4041, 59.38165, 53.02274, 81.59635, 80.21894, NA, NA, 
74.75982, 68.31567, 84.5591, 88.58853, 93.0041, 45.61417, 40.75126, 63.3192, 
55.70783, NA, 79.28488, 64.25411, 86.59988, 77.97568, 74.04119, 52.37492, 
49.81539, NA, 85.50999, 71.91885, 72.87676, 59.25271, NA, 58.34479, 68.64723, 
53.03752, NA, 57.6235, 60.191, 81.03886, 41.35666, 59.7797, 63.67467, NA, 
59.91133, 38.87541, 56.13633, 51.21479, NA, 87.64681, NA, 34.00585, 70.31387, 
71.98323, 74.81387, 60.40676, 66.54349, NA, NA, NA, 67.62835, NA, 92.5076, 
67.99198, 84.42378, 51.08247, 72.54741, 61.10532, 80.31024, 69.13735, NA, NA, 
NA, 61.01218, NA, NA, 61.31675, 50.29746, 52.46357, 61.56391, 52.62699, 
47.37393, 64.3563, 58.16292, 35.58270, 74.42763, 72.20084, 73.31511, 69.51471, 
66.9207, 54.75686, 46.07931, NA, 55.4242, 88.1398, NA, 40.71569, NA, 62.01507, 
NA, 61.69894, 50.99719, 65.57177, NA, 79.86356, NA, 79.60463, 87.15491, 85.289, 
99.56101, 83.14384, NA, 90.33843, 94.86487, 54.76428, 69.065, 90.64396, 
85.54702, NA, 74.28954, 75.02675, 68.75173, 86.766, 97.94342, 109.6567, 
58.94473, 49.65823, 49.14016, 52.53682, 65.58246, 71.9806, 61.84407, 79.52094, 
78.9498, NA, 41.85395, NA, NA, 48.4369, 59.48746, 65.32352, 64.78541, NA, 
81.41738, NA, 38.78459, NA, 62.3439, 59.2926, 52.19741, 75.50615, 81.20732, NA, 
63.84328, NA, 78.58555, 92.36523, 76.24814, 83.47149, 78.63093, NA, 61.18076, 
NA, 69.07067, 65.45623, 63.47717, 47.89138, NA, NA, 41.25188, 54.90395, NA, 
83.07491, NA, NA, 84.9993, 66.78191, 73.49891, 59.4829, 59.76287, 75.88209, NA, 
93.85868, 90.36712, 99.39378, NA, 67.36114, 82.73081, NA, 89.39616, 47.16693, 
49.70439, 59.61165, 62.35776, NA, 42.89737, 40.29871, 48.14972, 64.5467, 
50.2281, NA, NA, 61.1634, 54.2383, 78.70757, 45.52441, 60.17381, 47.34233, 
56.93711, 53.98324, NA, NA, 36.46575, NA, NA, 68.3922, 70.54551, NA, 93.52459, 
59.71926, 73.98081, NA, 73.53063, 80.4056, 97.99802, 52.35084, 49.56512, 
66.87847, 47.31395, 60.08906, 44.30878, 40.20363, 63.64369, 45.72122, 65.56435, 
32.39617, NA, 88.41666, 89.15591, 86.4363, 84.72476, 90.76457, 67.03687, 
87.61774, 73.96257, 83.4393, 91.6916, 70.59645, 55.71889, 77.20025, NA, 
53.29072, 55.44723, 74.87974, 70.39156, 32.19508, 51.85668, 34.43508, 36.21845, 
51.6115, NA, NA, 61.45896, 68.90049, NA, 57.40913, 69.9672, 91.87853, 104.3403, 
91.10868, 51.13509, 38.00579, 31.58156, 70.24504, 57.44881, 40.35694, 47.19323, 
49.75011, 63.83079, 68.28053, 64.7903, 58.59153, 46.33921, NA, 61.95853, 
49.62206, 54.01917, 68.58144, 44.23308, 71.055, NA, 50.17876, 77.58297, 
66.12228, 90.35853, NA, NA, 51.53397, 60.07058, 73.33283, 45.86765, 60.30481, 
58.82174, 67.63316, 60.70479, NA, 57.8947, 86.03371, 97.50561, NA, 64.99894, 
NA, NA, NA, 65.20631, 83.6741, 94.35193, 91.14219, NA, NA, NA, NA, 82.11706, 
77.1408, 80.46887, 41.47613, NA, 60.93582, 71.35336, 67.82402, NA, 43.51515, 
43.9832, 48.48611, 50.84884, 66.04058, 87.07478, 70.05939, 81.13674, NA, NA, 
51.52485, 66.83024, 69.66376, 64.85341, 68.68979, 60.89263, NA, NA, 59.67698, 
28.10245, 31.03745, 36.89845, NA, 49.32108, 58.55868, 42.43321, 66.01472, 
54.78088, 63.62493, 33.22507, 42.38858, 49.0856, 75.0984, 52.16445, 62.9188, 
NA, 63.12629, NA, 70.20037, 63.14592, NA, 56.75026, 76.69402, NA, 49.79559, 
53.84468, 57.76568, 52.08621, NA, 78.18508, NA, 81.16072, 72.26845, NA, 
53.93833, 55.33434, 50.88485, 58.54349, 47.68802, NA, 70.4902, NA, NA, 
105.7229, NA, NA, 54.39933, 42.69164, 83.88195, 78.45091, 80.63685, 95.23417, 
88.35923, NA, 74.0349, 88.7492, NA, NA, 73.70979, 74.46604, 83.40177, 58.88337, 
71.79423, 72.20081, 93.21385, 88.86743, NA, NA, NA, 69.08791, 48.64463, 
60.52467, 53.6805, 47.05276, 49.35693, 58.71767, 57.35435, 47.96714, 68.77392, 
40.79406, NA, 77.13325, NA, 78.51274, NA, NA, NA, NA, 102.1760, NA, 50.12865, 
NA, 65.47585, 72.61452, 48.11966, 68.55553, 68.29626, NA, 80.61667, 58.7958, 
46.3542, 46.81271, 58.14021, 55.82216, 65.51894, 40.49398, 59.71027, 74.30452, 
77.46446, 70.71955, 56.53453, 66.5131, 75.43989, 64.22258, 37.18761, 36.48335, 
68.89017, NA, 57.53874, 35.24125, 33.22165, 48.61848, 55.37985, 57.44779, 
25.38699, 38.88102, 61.53836, 45.77457, 54.09212, 39.13839, 78.60023, 57.85687, 
NA, 65.54958, 81.1668, 70.61523, 83.61461, 86.49162, 94.99309, NA, 63.82307, 
46.732, 65.39979, 47.32216, NA, 62.08215, 87.56626, 58.27942, NA, 53.67289, NA, 
68.7428, 59.91095, NA, 86.42749, 86.16537, 92.37984, 91.19342, 92.63745, 
25.20198, 32.99956, 36.32436, 12.26341, NA, NA, 71.4654, NA, 86.72943, 
70.75675, 104.0202, 71.86369, 92.62448, 96.0561, NA, NA, 64.95768, NA, 54.6884, 
84.03179, NA, 70.64183, 70.4947, 92.02997, NA, NA, 108.6812, NA, NA, 105.6493, 
NA, NA, 35.15284, 64.82445, 51.68809, 56.50154, NA, 45.62367, NA, NA, 40.29675, 
34.6001, 25.34596, NA, 59.57378, 42.69633, 56.46673, NA, 53.5414, 83.3461, 
71.81349, 90.60524, NA, 91.70933, 76.44987, NA, NA, 96.08082, 84.45425, NA, NA, 
NA, NA, 96.10915, NA, 85.02638, 59.17071, 75.50658, NA, 66.62242, NA, 85.03776, 
77.97649, 73.45873, NA, 51.05804, 73.44193, NA, NA, 74.27578, NA, 71.59595, 
46.8228, 59.48831, 68.4567, 44.60497, 79.56419, 64.63047, 67.04896, 74.65986, 
71.40241, 84.25169, NA, NA, 100.2202, 63.70064, 79.65993, 82.4714, 91.47016, 
91.16284, 55.00362, 69.80089, 78.81576, NA, 84.8969, 96.58812, 68.04391, 
66.96595, 83.2137, NA, 44.47951, 50.91738, 46.50332, 54.69197, 59.9189, 
60.73069, 68.34313, 62.47299, NA, NA, 57.27647, 59.86473, NA, 65.88308, 
78.32728, 87.24082, 108.7623, NA, 116.0814, 110.1171, 86.212, 68.0397, 
79.65717, 71.75116, 73.99226, 45.59216, NA, NA, 45.6669, 66.21038, 68.423, 
57.82897, 60.55914, 60.33475, NA, 37.46789, 36.57862, 42.68560, 58.32491, NA, 
25.09367, NA, 68.63924, NA, 67.00812, 73.8663, 73.32806, 62.61443, 64.66556, 
44.19054, 63.3095, 60.21678, 67.2434, 47.57189, 63.14547, NA, 78.75092, 
85.51121, NA, 81.66506, NA, 66.74418, NA, NA, 59.11943, NA, 74.99474, 75.35337, 
85.84094, NA, NA, 63.73862, NA, 72.59886, NA, 57.31323, 69.67301, NA, 86.65152, 
NA, 39.97179, 50.1996, 58.60935, 58.2905, 78.7151), .Dim=c( 500, 5 )) , m 
= structure(.Data = c( 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 
1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 
1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 1, 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 
0, 1, 1, 0, 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 
0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 
0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 
0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 
0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 
0, 1, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 
0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 1, 
0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 
1, 1, 0, 1, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 
0, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 
1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 
0, 1, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 
0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 0, 1, 0, 
1, 0, 0, 0, 0, 1, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 
0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 
1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 
1, 0, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 
0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 
1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 
0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 1, 0, 0, 0, 
0, 1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 
1, 0, 1, 0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 1, 1, 0, 0, 0, 1, 0, 1, 1, 
0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 1, 1, 1, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 
0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 1, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 
1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 
0, 1, 0, 0, 0, 1, 0, 1, 0, 1, 1, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 
1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 
1, 0, 1, 0, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 
1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 
0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 
1, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 
0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 
1, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 
1, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 
0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 
1, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 
0, 0, 1, 0, 0, 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 
0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0, 
0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 
1, 0, 0, 1, 1, 0, 0, 0, 0, 1, 1, 0, 1, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 
1, 0, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 
0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 
0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 
0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 
0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 
1, 1, 1, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 
0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 
1, 1, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 
0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 
0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 1, 
1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 
1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 
0, 1, 0, 0, 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 
1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 
0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 
1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 
0, 1, 1, 1, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 
0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 0, 1, 0, 0, 0, 1, 1, 0, 1, 
1, 0, 1, 1, 0, 0, 0, 0, 1, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 
0, 1, 1, 0, 0, 1, 1, 1, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 1, 1, 0, 
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 
0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 
0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 0, 0, 1, 1, 0, 1, 0, 
1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0), .Dim=c( 500, 5 )) , N = 500 )

Page Tools