Mercurial > repos > greg > ks_distribution

comparison ks_distribution.R @ 30:62bb454ad4e9 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author greg
date Mon, 26 Jun 2017 10:28:20 -0400
parents 9b6252925ccf
children 812f09b96a62
comparison
equal deleted inserted replaced
29:96e1400d3125 30:62bb454ad4e9
182 { 182 {
183 pi <- items[1] 183 pi <- items[1]
184 mu <- items[2] 184 mu <- items[2]
185 var <- items[3] 185 var <- items[3]
186 } 186 }
187 if (number_comp == 2) 187 else if (number_comp == 2)
188 { 188 {
189 pi <- items[1:2] 189 pi <- items[1:2]
190 mu <- items[3:4] 190 mu <- items[3:4]
191 var <- items[5:6] 191 var <- items[5:6]
192 } 192 }
193 if (number_comp == 3) 193 else if (number_comp == 3)
194 { 194 {
195 pi <- items[1:3] 195 pi <- items[1:3]
196 mu <- items[4:6] 196 mu <- items[4:6]
197 var <- items[7:9] 197 var <- items[7:9]
198 } 198 }
199 if (number_comp == 4) 199 else if (number_comp == 4)
200 { 200 {
201 pi <- items[1:4] 201 pi <- items[1:4]
202 mu <- items[5:8] 202 mu <- items[5:8]
203 var <- items[9:12] 203 var <- items[9:12]
204 } 204 }
205 if (number_comp == 5) 205 else if (number_comp == 5)
206 { 206 {
207 pi <- items[1:5] 207 pi <- items[1:5]
208 mu <- items[6:10] 208 mu <- items[6:10]
209 var <- items[11:15] 209 var <- items[11:15]
210 } 210 }
211 if (number_comp == 6) 211 else if (number_comp == 6)
212 { 212 {
213 pi <- items[1:6] 213 pi <- items[1:6]
214 mu <- items[7:12] 214 mu <- items[7:12]
215 var <- items[13:18] 215 var <- items[13:18]
216 } 216 }