Vamos pensar sobre a questão do voto, sinalizando através de uma cesta factível de representantes. Além disso, como impor restrições factíveis e ativas para que se obtenha um resultado global maior.
retail <- read_excel('Online Retail.xlsx')
retail <- retail[complete.cases(retail), ]
retail<- retail %>% mutate(Description = as.factor(Description))
retai<- retail %>% mutate(Country = as.factor(Country))
retail$Date <- as.Date(retail$InvoiceDate)
retail$Time <- format(retail$InvoiceDate,"%H:%M:%S")
retail$InvoiceNo <- as.numeric(as.character(retail$InvoiceNo))
glimpse(retail)
## Rows: 406,829
## Columns: 10
## $ InvoiceNo <dbl> 536365, 536365, 536365, 536365, 536365, 536365, 53...
## $ StockCode <chr> "85123A", "71053", "84406B", "84029G", "84029E", "...
## $ Description <fct> WHITE HANGING HEART T-LIGHT HOLDER, WHITE METAL LA...
## $ Quantity <dbl> 6, 6, 8, 6, 6, 2, 6, 6, 6, 32, 6, 6, 8, 6, 6, 3, 2...
## $ InvoiceDate <dttm> 2010-12-01 08:26:00, 2010-12-01 08:26:00, 2010-12...
## $ UnitPrice <dbl> 2.55, 3.39, 2.75, 3.39, 3.39, 7.65, 4.25, 1.85, 1....
## $ CustomerID <dbl> 17850, 17850, 17850, 17850, 17850, 17850, 17850, 1...
## $ Country <chr> "United Kingdom", "United Kingdom", "United Kingdo...
## $ Date <date> 2010-12-01, 2010-12-01, 2010-12-01, 2010-12-01, 2...
## $ Time <chr> "08:26:00", "08:26:00", "08:26:00", "08:26:00", "0...
Fazendo uma breve análise gráfica
## # A tibble: 10 x 3
## StockCode Description freq
## <chr> <fct> <int>
## 1 20725 LUNCH BAG RED RETROSPOT 1358
## 2 20727 LUNCH BAG BLACK SKULL. 1126
## 3 21212 PACK OF 72 RETROSPOT CAKE CASES 1080
## 4 22423 REGENCY CAKESTAND 3 TIER 1905
## 5 22720 SET OF 3 CAKE TINS PANTRY DESIGN 1232
## 6 47566 PARTY BUNTING 1416
## 7 84879 ASSORTED COLOUR BIRD ORNAMENT 1418
## 8 85099B JUMBO BAG RED RETROSPOT 1662
## 9 85123A WHITE HANGING HEART T-LIGHT HOLDER 2070
## 10 POST POSTAGE 1196
Agora minerando os dados
retail_sorted <- retail[order(retail$CustomerID),]
library(plyr)
## -------------------------------------------------------------------------
## You have loaded plyr after dplyr - this is likely to cause problems.
## If you need functions from both plyr and dplyr, please load plyr first, then dplyr:
## library(plyr); library(dplyr)
## -------------------------------------------------------------------------
##
## Attaching package: 'plyr'
## The following objects are masked from 'package:dplyr':
##
## arrange, count, desc, failwith, id, mutate, rename, summarise,
## summarize
## The following object is masked from 'package:purrr':
##
## compact
itemList <- ddply(retail,c("CustomerID","Date"),
function(df1)paste(df1$Description,
collapse = ","))
Precisamos agora apenas da coluna dos itens
retail <- read_excel('Online Retail.xlsx')
retail <- retail[complete.cases(retail), ]
retail$Description <-factor(retail$Description)
retail$Country <- as.factor(retail$Country)
retail$Date <- as.Date(retail$InvoiceDate)
retail$Time <- format(retail$InvoiceDate,"%H:%M:%S")
retail$InvoiceNo <- as.numeric(as.character(retail$InvoiceNo))
glimpse(retail)
## Rows: 406,829
## Columns: 10
## $ InvoiceNo <dbl> 536365, 536365, 536365, 536365, 536365, 536365, 53...
## $ StockCode <chr> "85123A", "71053", "84406B", "84029G", "84029E", "...
## $ Description <fct> WHITE HANGING HEART T-LIGHT HOLDER, WHITE METAL LA...
## $ Quantity <dbl> 6, 6, 8, 6, 6, 2, 6, 6, 6, 32, 6, 6, 8, 6, 6, 3, 2...
## $ InvoiceDate <dttm> 2010-12-01 08:26:00, 2010-12-01 08:26:00, 2010-12...
## $ UnitPrice <dbl> 2.55, 3.39, 2.75, 3.39, 3.39, 7.65, 4.25, 1.85, 1....
## $ CustomerID <dbl> 17850, 17850, 17850, 17850, 17850, 17850, 17850, 1...
## $ Country <fct> United Kingdom, United Kingdom, United Kingdom, Un...
## $ Date <date> 2010-12-01, 2010-12-01, 2010-12-01, 2010-12-01, 2...
## $ Time <chr> "08:26:00", "08:26:00", "08:26:00", "08:26:00", "0...
retail_sorted <- retail[order(retail$CustomerID),]
itemList <- ddply(retail,c("CustomerID","Date"),
function(df1)paste(df1$Description,
collapse = ","))
itemList$CustomerID <- NULL
itemList$Date <- NULL
colnames(itemList) <- c("items")
write.csv(itemList,"market_basket.csv", quote = FALSE, row.names = TRUE)
#tr<-as(itemList,"transactions")
tr <- read.transactions('market_basket.csv', format = 'basket', sep=',')
library(plyr)
itemFrequencyPlot(tr, topN=20, type='absolute')
Criando algumas regras
rules <- apriori(tr, parameter = list(supp=0.001, conf=0.8))
## Apriori
##
## Parameter specification:
## confidence minval smax arem aval originalSupport maxtime support minlen
## 0.8 0.1 1 none FALSE TRUE 5 0.001 1
## maxlen target ext
## 10 rules TRUE
##
## Algorithmic control:
## filter tree heap memopt load sort verbose
## 0.1 TRUE TRUE FALSE TRUE 2 TRUE
##
## Absolute minimum support count: 19
##
## set item appearances ...[0 item(s)] done [0.00s].
## set transactions ...[27165 item(s), 19297 transaction(s)] done [0.58s].
## sorting and recoding items ... [2407 item(s)] done [0.01s].
## creating transaction tree ... done [0.02s].
## checking subsets of size 1 2 3 4 5 6 7 8 9 10 done [1.14s].
## writing ... [87110 rule(s)] done [0.11s].
## creating S4 object ... done [0.14s].
rules <- sort(rules, by='confidence', decreasing = TRUE)
summary(rules)
## set of 87110 rules
##
## rule length distribution (lhs + rhs):sizes
## 2 3 4 5 6 7 8 9 10
## 105 3133 9732 26228 29873 14020 3218 680 121
##
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 2.000 5.000 6.000 5.627 6.000 10.000
##
## summary of quality measures:
## support confidence coverage lift
## Min. :0.001036 Min. :0.8000 Min. :0.001036 Min. : 8.781
## 1st Qu.:0.001088 1st Qu.:0.8333 1st Qu.:0.001244 1st Qu.: 19.305
## Median :0.001192 Median :0.8750 Median :0.001399 Median : 24.786
## Mean :0.001383 Mean :0.8834 Mean :0.001572 Mean : 50.921
## 3rd Qu.:0.001503 3rd Qu.:0.9231 3rd Qu.:0.001658 3rd Qu.: 43.662
## Max. :0.018086 Max. :1.0000 Max. :0.021765 Max. :622.484
## count
## Min. : 20.00
## 1st Qu.: 21.00
## Median : 23.00
## Mean : 26.69
## 3rd Qu.: 29.00
## Max. :349.00
##
## mining info:
## data ntransactions support confidence
## tr 19297 0.001 0.8
topRules <- rules[1:10]
plot(topRules)
## To reduce overplotting, jitter is added! Use jitter = 0 to prevent jitter.
plot(topRules, method="graph")
plot(topRules, method = "grouped")
Suponha que os eleitores sejam independentes.
rm(list = ls())
id<-rep(seq(1,1000),3)
hist(id)
ale<-rnorm(3000)
vot<-ifelse(ale<0.5,"bols",ifelse(ale<0.8,"haddad","meire"))
dt<-as.data.frame(cbind(id,vot))
dt <- split(dt$vot, dt$id)
library(arules)
dt2 = as(dt,"transactions")
## Warning in asMethod(object): removing duplicated items in transactions
# Convert data to transaction level
dt2 = as(dt,"transactions")
## Warning in asMethod(object): removing duplicated items in transactions
summary(dt2)
## transactions as itemMatrix in sparse format with
## 1000 rows (elements/itemsets/transactions) and
## 3 columns (items) and a density of 0.5866667
##
## most frequent items:
## bols meire haddad (Other)
## 975 515 270 0
##
## element (itemset/transaction) length distribution:
## sizes
## 1 2 3
## 332 576 92
##
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 1.00 1.00 2.00 1.76 2.00 3.00
##
## includes extended item information - examples:
## labels
## 1 bols
## 2 haddad
## 3 meire
##
## includes extended transaction information - examples:
## transactionID
## 1 1
## 2 10
## 3 100
inspect(dt2)
## items transactionID
## [1] {bols,meire} 1
## [2] {bols,haddad} 10
## [3] {bols} 100
## [4] {bols,haddad,meire} 1000
## [5] {bols} 101
## [6] {bols} 102
## [7] {bols,meire} 103
## [8] {bols,haddad} 104
## [9] {haddad,meire} 105
## [10] {bols} 106
## [11] {bols,haddad} 107
## [12] {bols,haddad} 108
## [13] {bols,meire} 109
## [14] {bols,haddad} 11
## [15] {bols,meire} 110
## [16] {bols} 111
## [17] {bols} 112
## [18] {bols} 113
## [19] {bols} 114
## [20] {bols,meire} 115
## [21] {bols,meire} 116
## [22] {bols,meire} 117
## [23] {bols} 118
## [24] {bols,meire} 119
## [25] {bols,meire} 12
## [26] {bols,meire} 120
## [27] {bols,haddad} 121
## [28] {bols} 122
## [29] {bols,meire} 123
## [30] {bols,haddad,meire} 124
## [31] {bols} 125
## [32] {bols,haddad,meire} 126
## [33] {bols} 127
## [34] {bols} 128
## [35] {bols,haddad} 129
## [36] {bols,haddad,meire} 13
## [37] {bols} 130
## [38] {bols,haddad,meire} 131
## [39] {bols,haddad} 132
## [40] {bols,meire} 133
## [41] {bols,haddad,meire} 134
## [42] {bols} 135
## [43] {bols,meire} 136
## [44] {bols,haddad} 137
## [45] {bols,meire} 138
## [46] {bols,meire} 139
## [47] {bols,meire} 14
## [48] {bols,haddad} 140
## [49] {bols,meire} 141
## [50] {bols,meire} 142
## [51] {bols,haddad,meire} 143
## [52] {bols,meire} 144
## [53] {bols,meire} 145
## [54] {bols} 146
## [55] {bols} 147
## [56] {bols,meire} 148
## [57] {bols,meire} 149
## [58] {bols} 15
## [59] {bols,meire} 150
## [60] {bols,meire} 151
## [61] {bols,haddad,meire} 152
## [62] {bols,meire} 153
## [63] {bols,meire} 154
## [64] {bols,haddad,meire} 155
## [65] {bols,haddad} 156
## [66] {bols,meire} 157
## [67] {bols,haddad,meire} 158
## [68] {bols,meire} 159
## [69] {bols} 16
## [70] {bols} 160
## [71] {bols} 161
## [72] {bols,haddad} 162
## [73] {bols} 163
## [74] {bols,haddad,meire} 164
## [75] {bols,haddad} 165
## [76] {bols} 166
## [77] {bols,meire} 167
## [78] {bols,meire} 168
## [79] {bols,haddad} 169
## [80] {bols,haddad} 17
## [81] {bols,haddad,meire} 170
## [82] {bols,meire} 171
## [83] {bols} 172
## [84] {bols} 173
## [85] {bols,haddad} 174
## [86] {bols,haddad,meire} 175
## [87] {bols,haddad,meire} 176
## [88] {bols} 177
## [89] {bols,meire} 178
## [90] {bols,meire} 179
## [91] {bols} 18
## [92] {bols} 180
## [93] {bols} 181
## [94] {bols} 182
## [95] {bols,meire} 183
## [96] {bols,haddad,meire} 184
## [97] {bols,meire} 185
## [98] {bols} 186
## [99] {bols} 187
## [100] {bols,meire} 188
## [101] {bols,meire} 189
## [102] {bols,meire} 19
## [103] {bols,meire} 190
## [104] {bols,haddad} 191
## [105] {bols,haddad} 192
## [106] {bols,haddad} 193
## [107] {bols,meire} 194
## [108] {bols,haddad,meire} 195
## [109] {bols,haddad,meire} 196
## [110] {bols,meire} 197
## [111] {bols} 198
## [112] {bols,meire} 199
## [113] {bols,meire} 2
## [114] {bols,meire} 20
## [115] {bols} 200
## [116] {bols,meire} 201
## [117] {bols,meire} 202
## [118] {bols,meire} 203
## [119] {bols,meire} 204
## [120] {bols} 205
## [121] {bols,meire} 206
## [122] {bols,meire} 207
## [123] {bols,haddad} 208
## [124] {bols,meire} 209
## [125] {bols} 21
## [126] {bols} 210
## [127] {bols,meire} 211
## [128] {bols,meire} 212
## [129] {bols,haddad,meire} 213
## [130] {bols,meire} 214
## [131] {bols,meire} 215
## [132] {bols} 216
## [133] {bols,meire} 217
## [134] {bols,haddad} 218
## [135] {bols,haddad} 219
## [136] {bols} 22
## [137] {bols,haddad,meire} 220
## [138] {bols} 221
## [139] {bols,meire} 222
## [140] {bols,haddad} 223
## [141] {bols,haddad,meire} 224
## [142] {bols,meire} 225
## [143] {bols,meire} 226
## [144] {bols,meire} 227
## [145] {bols} 228
## [146] {bols} 229
## [147] {bols,haddad,meire} 23
## [148] {bols,haddad,meire} 230
## [149] {bols,meire} 231
## [150] {bols,meire} 232
## [151] {bols,meire} 233
## [152] {bols,haddad} 234
## [153] {bols,meire} 235
## [154] {bols} 236
## [155] {bols} 237
## [156] {bols,haddad} 238
## [157] {bols,haddad,meire} 239
## [158] {bols} 24
## [159] {bols} 240
## [160] {bols,haddad,meire} 241
## [161] {bols,haddad} 242
## [162] {bols} 243
## [163] {bols} 244
## [164] {bols,haddad} 245
## [165] {bols,meire} 246
## [166] {bols,meire} 247
## [167] {bols,haddad} 248
## [168] {meire} 249
## [169] {bols,meire} 25
## [170] {bols} 250
## [171] {bols,haddad,meire} 251
## [172] {bols,meire} 252
## [173] {bols} 253
## [174] {bols,haddad} 254
## [175] {bols} 255
## [176] {bols,meire} 256
## [177] {bols} 257
## [178] {bols,haddad} 258
## [179] {bols} 259
## [180] {bols} 26
## [181] {bols,haddad} 260
## [182] {bols,meire} 261
## [183] {bols,haddad} 262
## [184] {bols,meire} 263
## [185] {bols,meire} 264
## [186] {bols,haddad} 265
## [187] {bols,haddad} 266
## [188] {bols} 267
## [189] {bols,haddad} 268
## [190] {bols,haddad,meire} 269
## [191] {bols,haddad,meire} 27
## [192] {bols,meire} 270
## [193] {bols,meire} 271
## [194] {bols,meire} 272
## [195] {bols,meire} 273
## [196] {bols} 274
## [197] {haddad,meire} 275
## [198] {bols} 276
## [199] {bols,meire} 277
## [200] {bols,meire} 278
## [201] {meire} 279
## [202] {bols,meire} 28
## [203] {bols,meire} 280
## [204] {haddad,meire} 281
## [205] {bols} 282
## [206] {bols,meire} 283
## [207] {bols} 284
## [208] {bols} 285
## [209] {bols,haddad} 286
## [210] {bols,haddad} 287
## [211] {haddad,meire} 288
## [212] {bols,meire} 289
## [213] {bols,meire} 29
## [214] {bols} 290
## [215] {bols} 291
## [216] {bols,meire} 292
## [217] {bols,meire} 293
## [218] {bols,meire} 294
## [219] {bols,meire} 295
## [220] {bols,haddad} 296
## [221] {bols,meire} 297
## [222] {bols} 298
## [223] {bols,meire} 299
## [224] {bols,meire} 3
## [225] {bols} 30
## [226] {bols} 300
## [227] {bols} 301
## [228] {bols,meire} 302
## [229] {bols} 303
## [230] {bols,meire} 304
## [231] {bols} 305
## [232] {bols,haddad} 306
## [233] {bols,meire} 307
## [234] {bols,meire} 308
## [235] {bols,haddad} 309
## [236] {bols,meire} 31
## [237] {bols,meire} 310
## [238] {bols} 311
## [239] {bols,haddad,meire} 312
## [240] {bols} 313
## [241] {bols,meire} 314
## [242] {bols,haddad} 315
## [243] {bols} 316
## [244] {bols,meire} 317
## [245] {bols,meire} 318
## [246] {bols,meire} 319
## [247] {bols,meire} 32
## [248] {bols,meire} 320
## [249] {bols} 321
## [250] {bols} 322
## [251] {bols,haddad} 323
## [252] {bols,meire} 324
## [253] {bols,meire} 325
## [254] {bols,haddad} 326
## [255] {bols,haddad} 327
## [256] {bols,meire} 328
## [257] {bols} 329
## [258] {bols,haddad,meire} 33
## [259] {bols,haddad} 330
## [260] {bols,haddad,meire} 331
## [261] {bols} 332
## [262] {bols,meire} 333
## [263] {bols,meire} 334
## [264] {bols,haddad} 335
## [265] {bols,meire} 336
## [266] {meire} 337
## [267] {bols,haddad} 338
## [268] {bols,haddad} 339
## [269] {bols,haddad,meire} 34
## [270] {bols,meire} 340
## [271] {bols,haddad} 341
## [272] {bols} 342
## [273] {bols,meire} 343
## [274] {bols,meire} 344
## [275] {bols,meire} 345
## [276] {bols,meire} 346
## [277] {bols,meire} 347
## [278] {bols} 348
## [279] {bols,meire} 349
## [280] {bols,meire} 35
## [281] {bols,haddad} 350
## [282] {bols} 351
## [283] {meire} 352
## [284] {bols,meire} 353
## [285] {bols} 354
## [286] {bols,meire} 355
## [287] {bols} 356
## [288] {bols,meire} 357
## [289] {bols,haddad,meire} 358
## [290] {bols,meire} 359
## [291] {bols,meire} 36
## [292] {bols} 360
## [293] {bols,haddad} 361
## [294] {bols,meire} 362
## [295] {bols,haddad} 363
## [296] {bols} 364
## [297] {bols} 365
## [298] {bols,haddad} 366
## [299] {bols,haddad} 367
## [300] {bols} 368
## [301] {bols} 369
## [302] {bols,meire} 37
## [303] {bols,haddad,meire} 370
## [304] {bols} 371
## [305] {bols,haddad} 372
## [306] {bols,haddad,meire} 373
## [307] {bols,meire} 374
## [308] {bols,meire} 375
## [309] {bols,meire} 376
## [310] {bols,meire} 377
## [311] {bols,meire} 378
## [312] {bols} 379
## [313] {bols,meire} 38
## [314] {bols,meire} 380
## [315] {bols,haddad,meire} 381
## [316] {bols,meire} 382
## [317] {bols} 383
## [318] {bols} 384
## [319] {bols} 385
## [320] {bols,meire} 386
## [321] {bols,haddad} 387
## [322] {bols,haddad} 388
## [323] {bols} 389
## [324] {bols,meire} 39
## [325] {haddad,meire} 390
## [326] {bols} 391
## [327] {bols,meire} 392
## [328] {bols} 393
## [329] {bols,haddad,meire} 394
## [330] {bols,haddad} 395
## [331] {bols,haddad} 396
## [332] {bols,meire} 397
## [333] {bols,meire} 398
## [334] {bols,haddad} 399
## [335] {bols,meire} 4
## [336] {bols} 40
## [337] {bols,haddad} 400
## [338] {bols,meire} 401
## [339] {bols,meire} 402
## [340] {bols,meire} 403
## [341] {meire} 404
## [342] {bols,meire} 405
## [343] {bols,meire} 406
## [344] {bols,haddad} 407
## [345] {bols,haddad} 408
## [346] {bols} 409
## [347] {bols,meire} 41
## [348] {bols} 410
## [349] {bols,meire} 411
## [350] {bols,meire} 412
## [351] {bols} 413
## [352] {bols,meire} 414
## [353] {bols,meire} 415
## [354] {bols,meire} 416
## [355] {bols} 417
## [356] {bols,haddad} 418
## [357] {bols,haddad} 419
## [358] {bols,meire} 42
## [359] {bols,haddad} 420
## [360] {bols} 421
## [361] {bols,haddad} 422
## [362] {bols,meire} 423
## [363] {bols} 424
## [364] {haddad,meire} 425
## [365] {bols,meire} 426
## [366] {bols,meire} 427
## [367] {bols,meire} 428
## [368] {haddad,meire} 429
## [369] {haddad,meire} 43
## [370] {bols,meire} 430
## [371] {bols,meire} 431
## [372] {bols,meire} 432
## [373] {bols,haddad,meire} 433
## [374] {bols,haddad,meire} 434
## [375] {bols,meire} 435
## [376] {bols} 436
## [377] {bols,meire} 437
## [378] {meire} 438
## [379] {bols,meire} 439
## [380] {bols,haddad,meire} 44
## [381] {bols,haddad} 440
## [382] {bols} 441
## [383] {bols,meire} 442
## [384] {bols,meire} 443
## [385] {bols,meire} 444
## [386] {bols} 445
## [387] {bols} 446
## [388] {bols,haddad} 447
## [389] {bols} 448
## [390] {bols,haddad,meire} 449
## [391] {bols,meire} 45
## [392] {bols,haddad,meire} 450
## [393] {bols,meire} 451
## [394] {bols,meire} 452
## [395] {bols,meire} 453
## [396] {bols,meire} 454
## [397] {bols,haddad} 455
## [398] {bols,haddad} 456
## [399] {bols} 457
## [400] {bols} 458
## [401] {bols} 459
## [402] {bols} 46
## [403] {bols,haddad,meire} 460
## [404] {bols,meire} 461
## [405] {bols} 462
## [406] {bols} 463
## [407] {bols,haddad} 464
## [408] {bols} 465
## [409] {bols,meire} 466
## [410] {bols} 467
## [411] {bols} 468
## [412] {bols} 469
## [413] {bols,meire} 47
## [414] {bols,haddad} 470
## [415] {bols,meire} 471
## [416] {bols} 472
## [417] {bols,haddad,meire} 473
## [418] {bols,meire} 474
## [419] {bols,meire} 475
## [420] {bols} 476
## [421] {bols} 477
## [422] {bols,meire} 478
## [423] {bols} 479
## [424] {bols} 48
## [425] {bols,meire} 480
## [426] {bols,haddad} 481
## [427] {bols} 482
## [428] {bols} 483
## [429] {bols,meire} 484
## [430] {bols,meire} 485
## [431] {bols,meire} 486
## [432] {haddad,meire} 487
## [433] {bols} 488
## [434] {bols,haddad,meire} 489
## [435] {bols} 49
## [436] {bols} 490
## [437] {bols} 491
## [438] {bols,haddad} 492
## [439] {bols,haddad} 493
## [440] {bols,meire} 494
## [441] {bols,meire} 495
## [442] {bols} 496
## [443] {bols,haddad} 497
## [444] {bols} 498
## [445] {bols} 499
## [446] {bols,meire} 5
## [447] {bols,haddad,meire} 50
## [448] {bols} 500
## [449] {bols} 501
## [450] {bols,meire} 502
## [451] {bols} 503
## [452] {bols} 504
## [453] {bols,meire} 505
## [454] {bols,meire} 506
## [455] {bols} 507
## [456] {bols,meire} 508
## [457] {bols} 509
## [458] {bols} 51
## [459] {bols,meire} 510
## [460] {bols} 511
## [461] {bols} 512
## [462] {bols,meire} 513
## [463] {bols,meire} 514
## [464] {haddad,meire} 515
## [465] {bols,meire} 516
## [466] {bols,meire} 517
## [467] {bols,haddad,meire} 518
## [468] {bols} 519
## [469] {bols,haddad,meire} 52
## [470] {bols} 520
## [471] {bols,meire} 521
## [472] {bols} 522
## [473] {bols,haddad} 523
## [474] {bols,meire} 524
## [475] {bols,haddad} 525
## [476] {bols} 526
## [477] {bols} 527
## [478] {bols,meire} 528
## [479] {bols} 529
## [480] {haddad,meire} 53
## [481] {bols,haddad} 530
## [482] {bols,meire} 531
## [483] {bols,haddad,meire} 532
## [484] {bols,meire} 533
## [485] {bols} 534
## [486] {haddad,meire} 535
## [487] {bols,haddad} 536
## [488] {bols} 537
## [489] {bols,meire} 538
## [490] {bols,haddad} 539
## [491] {bols} 54
## [492] {bols,haddad} 540
## [493] {bols,meire} 541
## [494] {bols,meire} 542
## [495] {bols} 543
## [496] {bols,meire} 544
## [497] {bols,haddad} 545
## [498] {bols} 546
## [499] {bols} 547
## [500] {bols} 548
## [501] {bols} 549
## [502] {bols,meire} 55
## [503] {bols,haddad} 550
## [504] {bols,meire} 551
## [505] {bols,meire} 552
## [506] {bols} 553
## [507] {bols,haddad,meire} 554
## [508] {bols,haddad} 555
## [509] {bols,meire} 556
## [510] {bols,haddad} 557
## [511] {bols} 558
## [512] {bols,meire} 559
## [513] {bols,haddad,meire} 56
## [514] {bols,meire} 560
## [515] {bols,haddad} 561
## [516] {bols} 562
## [517] {bols,haddad,meire} 563
## [518] {bols,meire} 564
## [519] {bols} 565
## [520] {bols,meire} 566
## [521] {bols} 567
## [522] {bols} 568
## [523] {bols,meire} 569
## [524] {bols,meire} 57
## [525] {bols,meire} 570
## [526] {bols} 571
## [527] {bols,meire} 572
## [528] {bols,meire} 573
## [529] {bols} 574
## [530] {bols,haddad} 575
## [531] {bols,meire} 576
## [532] {bols,meire} 577
## [533] {bols,haddad,meire} 578
## [534] {bols} 579
## [535] {bols,haddad,meire} 58
## [536] {bols} 580
## [537] {bols} 581
## [538] {bols,meire} 582
## [539] {bols} 583
## [540] {bols} 584
## [541] {bols} 585
## [542] {bols} 586
## [543] {bols} 587
## [544] {bols,haddad} 588
## [545] {bols} 589
## [546] {bols,meire} 59
## [547] {bols} 590
## [548] {bols,haddad,meire} 591
## [549] {bols} 592
## [550] {bols,meire} 593
## [551] {bols} 594
## [552] {bols,meire} 595
## [553] {bols,meire} 596
## [554] {bols,meire} 597
## [555] {bols} 598
## [556] {bols,haddad,meire} 599
## [557] {bols,meire} 6
## [558] {bols} 60
## [559] {bols} 600
## [560] {bols} 601
## [561] {bols,meire} 602
## [562] {bols,meire} 603
## [563] {bols,meire} 604
## [564] {bols} 605
## [565] {bols} 606
## [566] {bols,meire} 607
## [567] {bols,meire} 608
## [568] {bols,haddad} 609
## [569] {bols,haddad,meire} 61
## [570] {bols} 610
## [571] {bols,meire} 611
## [572] {bols,meire} 612
## [573] {bols,meire} 613
## [574] {bols,meire} 614
## [575] {bols} 615
## [576] {bols,meire} 616
## [577] {bols} 617
## [578] {bols,meire} 618
## [579] {bols,meire} 619
## [580] {bols} 62
## [581] {bols,meire} 620
## [582] {bols} 621
## [583] {bols,haddad} 622
## [584] {bols} 623
## [585] {bols,meire} 624
## [586] {bols} 625
## [587] {bols} 626
## [588] {bols} 627
## [589] {bols,meire} 628
## [590] {bols} 629
## [591] {bols,haddad,meire} 63
## [592] {bols} 630
## [593] {bols,haddad} 631
## [594] {bols,meire} 632
## [595] {bols,meire} 633
## [596] {bols,meire} 634
## [597] {bols,haddad,meire} 635
## [598] {bols,haddad,meire} 636
## [599] {bols} 637
## [600] {bols} 638
## [601] {bols,haddad} 639
## [602] {bols,haddad,meire} 64
## [603] {bols} 640
## [604] {bols} 641
## [605] {haddad,meire} 642
## [606] {bols,meire} 643
## [607] {bols} 644
## [608] {bols} 645
## [609] {bols,meire} 646
## [610] {bols,haddad,meire} 647
## [611] {bols,meire} 648
## [612] {bols,haddad} 649
## [613] {bols,haddad,meire} 65
## [614] {bols} 650
## [615] {bols,meire} 651
## [616] {bols,meire} 652
## [617] {bols,haddad} 653
## [618] {bols,meire} 654
## [619] {bols,meire} 655
## [620] {bols} 656
## [621] {bols} 657
## [622] {bols} 658
## [623] {bols,haddad,meire} 659
## [624] {bols,haddad,meire} 66
## [625] {bols} 660
## [626] {bols} 661
## [627] {bols,meire} 662
## [628] {bols} 663
## [629] {bols} 664
## [630] {bols} 665
## [631] {bols} 666
## [632] {bols,meire} 667
## [633] {bols} 668
## [634] {bols} 669
## [635] {bols,meire} 67
## [636] {bols,haddad} 670
## [637] {bols,meire} 671
## [638] {bols,meire} 672
## [639] {bols,meire} 673
## [640] {bols,meire} 674
## [641] {bols,meire} 675
## [642] {bols,meire} 676
## [643] {bols} 677
## [644] {haddad,meire} 678
## [645] {bols,haddad,meire} 679
## [646] {bols,meire} 68
## [647] {bols,haddad,meire} 680
## [648] {bols} 681
## [649] {bols} 682
## [650] {bols,meire} 683
## [651] {bols,meire} 684
## [652] {bols,meire} 685
## [653] {bols,meire} 686
## [654] {bols,meire} 687
## [655] {bols,meire} 688
## [656] {haddad} 689
## [657] {bols,meire} 69
## [658] {bols} 690
## [659] {bols,meire} 691
## [660] {bols,haddad} 692
## [661] {bols,meire} 693
## [662] {bols,meire} 694
## [663] {bols} 695
## [664] {bols} 696
## [665] {bols} 697
## [666] {bols} 698
## [667] {bols} 699
## [668] {bols,meire} 7
## [669] {bols,meire} 70
## [670] {bols,haddad} 700
## [671] {bols,meire} 701
## [672] {bols,meire} 702
## [673] {bols,haddad,meire} 703
## [674] {bols,meire} 704
## [675] {bols} 705
## [676] {bols} 706
## [677] {bols,meire} 707
## [678] {bols} 708
## [679] {bols,meire} 709
## [680] {bols,haddad} 71
## [681] {bols,meire} 710
## [682] {bols} 711
## [683] {bols,haddad,meire} 712
## [684] {bols,meire} 713
## [685] {bols,haddad} 714
## [686] {haddad,meire} 715
## [687] {bols,haddad} 716
## [688] {bols,meire} 717
## [689] {bols} 718
## [690] {bols,haddad} 719
## [691] {bols} 72
## [692] {bols,haddad} 720
## [693] {bols,meire} 721
## [694] {bols} 722
## [695] {bols,meire} 723
## [696] {bols,haddad,meire} 724
## [697] {bols} 725
## [698] {bols,haddad} 726
## [699] {bols,haddad,meire} 727
## [700] {bols,haddad} 728
## [701] {bols,meire} 729
## [702] {bols,meire} 73
## [703] {bols,meire} 730
## [704] {bols} 731
## [705] {bols,meire} 732
## [706] {bols,haddad} 733
## [707] {bols} 734
## [708] {bols} 735
## [709] {bols} 736
## [710] {bols} 737
## [711] {bols,haddad} 738
## [712] {bols,meire} 739
## [713] {bols} 74
## [714] {bols} 740
## [715] {bols,meire} 741
## [716] {bols,meire} 742
## [717] {bols,meire} 743
## [718] {bols,meire} 744
## [719] {bols,haddad} 745
## [720] {bols,haddad} 746
## [721] {bols} 747
## [722] {bols,meire} 748
## [723] {bols,haddad} 749
## [724] {bols,meire} 75
## [725] {bols,haddad} 750
## [726] {bols} 751
## [727] {bols} 752
## [728] {bols} 753
## [729] {bols,meire} 754
## [730] {bols,meire} 755
## [731] {bols,haddad} 756
## [732] {bols,meire} 757
## [733] {bols,meire} 758
## [734] {bols} 759
## [735] {bols} 76
## [736] {bols} 760
## [737] {bols,meire} 761
## [738] {bols,haddad,meire} 762
## [739] {bols,meire} 763
## [740] {bols,meire} 764
## [741] {bols} 765
## [742] {bols} 766
## [743] {bols,meire} 767
## [744] {bols,haddad} 768
## [745] {bols,meire} 769
## [746] {bols,meire} 77
## [747] {bols,meire} 770
## [748] {bols} 771
## [749] {bols,meire} 772
## [750] {bols,haddad,meire} 773
## [751] {bols} 774
## [752] {bols,haddad,meire} 775
## [753] {bols,haddad,meire} 776
## [754] {bols,meire} 777
## [755] {bols} 778
## [756] {bols,haddad} 779
## [757] {bols} 78
## [758] {bols,haddad} 780
## [759] {bols} 781
## [760] {bols,meire} 782
## [761] {bols,meire} 783
## [762] {bols,meire} 784
## [763] {bols,meire} 785
## [764] {bols,haddad} 786
## [765] {bols,meire} 787
## [766] {bols} 788
## [767] {bols,meire} 789
## [768] {bols,haddad,meire} 79
## [769] {bols} 790
## [770] {bols,meire} 791
## [771] {bols} 792
## [772] {bols,haddad} 793
## [773] {bols,meire} 794
## [774] {bols} 795
## [775] {bols,meire} 796
## [776] {bols,meire} 797
## [777] {bols,meire} 798
## [778] {bols} 799
## [779] {bols,meire} 8
## [780] {bols,meire} 80
## [781] {bols} 800
## [782] {bols} 801
## [783] {bols} 802
## [784] {bols} 803
## [785] {bols} 804
## [786] {haddad,meire} 805
## [787] {bols,meire} 806
## [788] {bols,haddad} 807
## [789] {bols} 808
## [790] {bols,meire} 809
## [791] {bols,haddad} 81
## [792] {bols,haddad} 810
## [793] {bols,meire} 811
## [794] {bols} 812
## [795] {bols,meire} 813
## [796] {bols} 814
## [797] {bols,meire} 815
## [798] {bols,haddad} 816
## [799] {bols} 817
## [800] {bols,haddad,meire} 818
## [801] {bols,haddad} 819
## [802] {bols,haddad} 82
## [803] {bols} 820
## [804] {bols} 821
## [805] {bols,haddad} 822
## [806] {bols,haddad,meire} 823
## [807] {bols,haddad,meire} 824
## [808] {bols,haddad} 825
## [809] {bols} 826
## [810] {bols,meire} 827
## [811] {bols,meire} 828
## [812] {bols,haddad,meire} 829
## [813] {bols,meire} 83
## [814] {bols} 830
## [815] {bols} 831
## [816] {bols,meire} 832
## [817] {bols,meire} 833
## [818] {bols,haddad,meire} 834
## [819] {bols,meire} 835
## [820] {bols,haddad} 836
## [821] {bols} 837
## [822] {bols,meire} 838
## [823] {bols} 839
## [824] {bols,meire} 84
## [825] {meire} 840
## [826] {bols} 841
## [827] {bols,haddad} 842
## [828] {bols,haddad} 843
## [829] {bols} 844
## [830] {bols,haddad} 845
## [831] {bols} 846
## [832] {bols} 847
## [833] {bols} 848
## [834] {bols,meire} 849
## [835] {bols,meire} 85
## [836] {bols} 850
## [837] {bols} 851
## [838] {bols} 852
## [839] {bols} 853
## [840] {bols} 854
## [841] {bols} 855
## [842] {bols,meire} 856
## [843] {bols} 857
## [844] {bols} 858
## [845] {bols} 859
## [846] {bols,meire} 86
## [847] {bols} 860
## [848] {bols,haddad} 861
## [849] {bols} 862
## [850] {bols,meire} 863
## [851] {bols,meire} 864
## [852] {bols} 865
## [853] {bols,meire} 866
## [854] {bols,meire} 867
## [855] {bols,haddad} 868
## [856] {bols,haddad,meire} 869
## [857] {bols,meire} 87
## [858] {bols,meire} 870
## [859] {bols,haddad,meire} 871
## [860] {bols,haddad} 872
## [861] {bols,meire} 873
## [862] {bols} 874
## [863] {bols,meire} 875
## [864] {bols,meire} 876
## [865] {bols,meire} 877
## [866] {bols,haddad} 878
## [867] {bols,meire} 879
## [868] {bols,haddad} 88
## [869] {bols} 880
## [870] {bols,meire} 881
## [871] {bols,meire} 882
## [872] {bols} 883
## [873] {bols,meire} 884
## [874] {haddad,meire} 885
## [875] {bols,meire} 886
## [876] {bols,haddad} 887
## [877] {bols,haddad} 888
## [878] {bols} 889
## [879] {bols,meire} 89
## [880] {bols} 890
## [881] {bols} 891
## [882] {bols,meire} 892
## [883] {bols,haddad} 893
## [884] {bols} 894
## [885] {bols,meire} 895
## [886] {bols,meire} 896
## [887] {bols,meire} 897
## [888] {bols,meire} 898
## [889] {bols,meire} 899
## [890] {bols,haddad} 9
## [891] {bols} 90
## [892] {bols,meire} 900
## [893] {bols,haddad,meire} 901
## [894] {bols} 902
## [895] {bols,meire} 903
## [896] {bols} 904
## [897] {bols,haddad} 905
## [898] {bols,meire} 906
## [899] {bols} 907
## [900] {bols} 908
## [901] {bols,haddad,meire} 909
## [902] {bols,meire} 91
## [903] {bols} 910
## [904] {bols,meire} 911
## [905] {bols} 912
## [906] {bols,meire} 913
## [907] {bols,meire} 914
## [908] {bols} 915
## [909] {bols} 916
## [910] {bols} 917
## [911] {bols,haddad} 918
## [912] {bols,haddad} 919
## [913] {bols,meire} 92
## [914] {bols} 920
## [915] {bols,haddad,meire} 921
## [916] {bols,meire} 922
## [917] {bols} 923
## [918] {bols} 924
## [919] {bols,meire} 925
## [920] {bols,haddad} 926
## [921] {bols,haddad} 927
## [922] {bols,haddad,meire} 928
## [923] {bols,meire} 929
## [924] {bols} 93
## [925] {bols,meire} 930
## [926] {bols,haddad} 931
## [927] {bols,haddad} 932
## [928] {bols,meire} 933
## [929] {bols,meire} 934
## [930] {bols,haddad} 935
## [931] {bols,haddad} 936
## [932] {bols,meire} 937
## [933] {bols,meire} 938
## [934] {bols} 939
## [935] {bols,meire} 94
## [936] {bols,haddad} 940
## [937] {bols,meire} 941
## [938] {bols,meire} 942
## [939] {bols,meire} 943
## [940] {bols,meire} 944
## [941] {bols,meire} 945
## [942] {bols,meire} 946
## [943] {bols,meire} 947
## [944] {bols} 948
## [945] {bols} 949
## [946] {bols,meire} 95
## [947] {bols,haddad,meire} 950
## [948] {bols,haddad} 951
## [949] {bols} 952
## [950] {bols,haddad} 953
## [951] {bols,haddad} 954
## [952] {bols} 955
## [953] {bols,meire} 956
## [954] {bols} 957
## [955] {bols} 958
## [956] {bols,meire} 959
## [957] {bols} 96
## [958] {bols} 960
## [959] {bols,meire} 961
## [960] {bols,haddad,meire} 962
## [961] {bols,haddad} 963
## [962] {bols,haddad} 964
## [963] {bols,haddad,meire} 965
## [964] {bols,haddad} 966
## [965] {bols,haddad,meire} 967
## [966] {bols,meire} 968
## [967] {bols,haddad} 969
## [968] {bols} 97
## [969] {bols} 970
## [970] {bols,meire} 971
## [971] {bols,meire} 972
## [972] {bols,meire} 973
## [973] {bols,haddad,meire} 974
## [974] {bols} 975
## [975] {bols} 976
## [976] {bols,meire} 977
## [977] {bols} 978
## [978] {bols,meire} 979
## [979] {bols} 98
## [980] {bols,haddad} 980
## [981] {bols,haddad} 981
## [982] {bols} 982
## [983] {bols,haddad} 983
## [984] {bols,meire} 984
## [985] {bols,haddad,meire} 985
## [986] {bols,meire} 986
## [987] {bols,meire} 987
## [988] {bols} 988
## [989] {bols,meire} 989
## [990] {bols,meire} 99
## [991] {bols} 990
## [992] {bols,haddad} 991
## [993] {bols,meire} 992
## [994] {bols,meire} 993
## [995] {bols,meire} 994
## [996] {bols} 995
## [997] {bols} 996
## [998] {bols,meire} 997
## [999] {bols,meire} 998
## [1000] {bols,meire} 999
# Most Frequent Items
sum(itemFrequency(dt2, type = "relative"))
## [1] 1.76
itemFrequencyPlot(dt2,topN = 3)
rules <- apriori(dt2, parameter = list(supp=0.001, conf=0.8))
## Apriori
##
## Parameter specification:
## confidence minval smax arem aval originalSupport maxtime support minlen
## 0.8 0.1 1 none FALSE TRUE 5 0.001 1
## maxlen target ext
## 10 rules TRUE
##
## Algorithmic control:
## filter tree heap memopt load sort verbose
## 0.1 TRUE TRUE FALSE TRUE 2 TRUE
##
## Absolute minimum support count: 1
##
## set item appearances ...[0 item(s)] done [0.00s].
## set transactions ...[3 item(s), 1000 transaction(s)] done [0.00s].
## sorting and recoding items ... [3 item(s)] done [0.00s].
## creating transaction tree ... done [0.00s].
## checking subsets of size 1 2 3 done [0.00s].
## writing ... [4 rule(s)] done [0.00s].
## creating S4 object ... done [0.00s].
rules<-sort(rules, decreasing=TRUE,by="confidence")
inspect(rules)
## lhs rhs support confidence coverage lift count
## [1] {} => {bols} 0.975 0.9750000 1.000 1.0000000 975
## [2] {meire} => {bols} 0.491 0.9533981 0.515 0.9778442 491
## [3] {haddad} => {bols} 0.252 0.9333333 0.270 0.9572650 252
## [4] {haddad,meire} => {bols} 0.092 0.8440367 0.109 0.8656787 92
plot(rules)
plot(rules, method="graph")
plot(rules, method = "grouped")
Agora com dependência
rm(list = ls())
library(tidyselect)
## Warning: package 'tidyselect' was built under R version 3.6.3
library("mvtnorm")
## Warning: package 'mvtnorm' was built under R version 3.6.2
sigma=matrix(c(1,-0.5,-0.6,-0.5,1,0.7,-0.6,0.7,1),nrow=3,ncol=3,byrow = TRUE)
x <- rmvnorm(n=1000, mean=c(0.5,0.2,0.3),sigma = sigma)
vot<-ifelse(x<0.5,"bols",ifelse(x<0.7,"haddad","meire"))
id<-rep(seq(1,1000),each=3)
votos<-as.vector(vot)
dt<-as.data.frame(cbind(id,votos))
#dt %>%
# group_by(votos) %>% summarize(fre=n())
dt <- split(dt$vot,dt$id)
library(arules)
dt2 = as(dt,"transactions")
## Warning in asMethod(object): removing duplicated items in transactions
# Convert data to transaction level
dt2 = as(dt,"transactions")
## Warning in asMethod(object): removing duplicated items in transactions
summary(dt2)
## transactions as itemMatrix in sparse format with
## 1000 rows (elements/itemsets/transactions) and
## 3 columns (items) and a density of 0.6183333
##
## most frequent items:
## bols meire haddad (Other)
## 916 744 195 0
##
## element (itemset/transaction) length distribution:
## sizes
## 1 2 3
## 246 653 101
##
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 1.000 2.000 2.000 1.855 2.000 3.000
##
## includes extended item information - examples:
## labels
## 1 bols
## 2 haddad
## 3 meire
##
## includes extended transaction information - examples:
## transactionID
## 1 1
## 2 10
## 3 100
inspect(dt2)
## items transactionID
## [1] {bols,meire} 1
## [2] {bols,meire} 10
## [3] {bols,meire} 100
## [4] {bols,meire} 1000
## [5] {bols,meire} 101
## [6] {bols,meire} 102
## [7] {meire} 103
## [8] {bols,haddad,meire} 104
## [9] {bols,meire} 105
## [10] {bols,haddad} 106
## [11] {meire} 107
## [12] {bols,haddad} 108
## [13] {bols,meire} 109
## [14] {bols,meire} 11
## [15] {bols,meire} 110
## [16] {bols} 111
## [17] {bols,meire} 112
## [18] {bols,meire} 113
## [19] {bols,meire} 114
## [20] {bols,haddad,meire} 115
## [21] {bols,meire} 116
## [22] {bols,haddad} 117
## [23] {bols,meire} 118
## [24] {meire} 119
## [25] {bols,meire} 12
## [26] {bols,meire} 120
## [27] {bols,meire} 121
## [28] {bols,meire} 122
## [29] {bols,meire} 123
## [30] {bols,meire} 124
## [31] {meire} 125
## [32] {bols,meire} 126
## [33] {bols,meire} 127
## [34] {bols,meire} 128
## [35] {bols} 129
## [36] {bols,meire} 13
## [37] {bols,meire} 130
## [38] {bols,meire} 131
## [39] {bols,meire} 132
## [40] {bols} 133
## [41] {meire} 134
## [42] {bols,meire} 135
## [43] {bols,meire} 136
## [44] {bols,haddad,meire} 137
## [45] {meire} 138
## [46] {bols,meire} 139
## [47] {bols,meire} 14
## [48] {bols} 140
## [49] {bols,meire} 141
## [50] {bols,meire} 142
## [51] {bols} 143
## [52] {meire} 144
## [53] {bols,meire} 145
## [54] {bols,haddad,meire} 146
## [55] {bols,haddad,meire} 147
## [56] {bols,meire} 148
## [57] {bols,meire} 149
## [58] {bols,haddad} 15
## [59] {meire} 150
## [60] {bols,meire} 151
## [61] {bols,meire} 152
## [62] {bols,meire} 153
## [63] {bols,haddad} 154
## [64] {bols,meire} 155
## [65] {bols,meire} 156
## [66] {bols,meire} 157
## [67] {bols,meire} 158
## [68] {bols,meire} 159
## [69] {haddad,meire} 16
## [70] {bols,haddad} 160
## [71] {bols,meire} 161
## [72] {haddad,meire} 162
## [73] {bols} 163
## [74] {bols,meire} 164
## [75] {bols,meire} 165
## [76] {bols} 166
## [77] {haddad,meire} 167
## [78] {bols,meire} 168
## [79] {bols,meire} 169
## [80] {bols,meire} 17
## [81] {bols,meire} 170
## [82] {bols,haddad} 171
## [83] {bols,meire} 172
## [84] {bols,meire} 173
## [85] {bols,meire} 174
## [86] {bols,haddad,meire} 175
## [87] {bols,meire} 176
## [88] {bols,meire} 177
## [89] {meire} 178
## [90] {bols} 179
## [91] {bols,meire} 18
## [92] {bols,meire} 180
## [93] {bols,meire} 181
## [94] {bols,meire} 182
## [95] {bols,meire} 183
## [96] {bols,meire} 184
## [97] {bols,meire} 185
## [98] {bols,meire} 186
## [99] {bols,meire} 187
## [100] {meire} 188
## [101] {bols,meire} 189
## [102] {bols,meire} 19
## [103] {meire} 190
## [104] {bols,meire} 191
## [105] {bols,meire} 192
## [106] {bols} 193
## [107] {bols} 194
## [108] {bols} 195
## [109] {meire} 196
## [110] {bols} 197
## [111] {meire} 198
## [112] {bols} 199
## [113] {bols,meire} 2
## [114] {bols} 20
## [115] {bols,meire} 200
## [116] {bols,meire} 201
## [117] {bols} 202
## [118] {bols,meire} 203
## [119] {bols,haddad,meire} 204
## [120] {bols,meire} 205
## [121] {bols,meire} 206
## [122] {bols} 207
## [123] {bols,meire} 208
## [124] {bols,meire} 209
## [125] {bols,meire} 21
## [126] {bols,meire} 210
## [127] {bols,haddad} 211
## [128] {bols,meire} 212
## [129] {bols} 213
## [130] {bols,haddad,meire} 214
## [131] {meire} 215
## [132] {bols,meire} 216
## [133] {bols,meire} 217
## [134] {bols,meire} 218
## [135] {bols,meire} 219
## [136] {bols,meire} 22
## [137] {bols,meire} 220
## [138] {bols,meire} 221
## [139] {meire} 222
## [140] {bols,meire} 223
## [141] {bols,meire} 224
## [142] {bols,haddad,meire} 225
## [143] {bols,haddad} 226
## [144] {bols,meire} 227
## [145] {meire} 228
## [146] {bols,meire} 229
## [147] {bols,haddad} 23
## [148] {bols,meire} 230
## [149] {bols,meire} 231
## [150] {bols,haddad,meire} 232
## [151] {bols,meire} 233
## [152] {bols,haddad} 234
## [153] {bols} 235
## [154] {bols,meire} 236
## [155] {bols} 237
## [156] {bols,meire} 238
## [157] {bols,meire} 239
## [158] {bols,meire} 24
## [159] {bols,meire} 240
## [160] {bols,meire} 241
## [161] {bols} 242
## [162] {bols,meire} 243
## [163] {haddad,meire} 244
## [164] {bols,haddad,meire} 245
## [165] {bols,meire} 246
## [166] {bols,haddad} 247
## [167] {meire} 248
## [168] {bols,haddad,meire} 249
## [169] {meire} 25
## [170] {bols,meire} 250
## [171] {bols,meire} 251
## [172] {haddad,meire} 252
## [173] {bols,haddad} 253
## [174] {bols,haddad,meire} 254
## [175] {haddad,meire} 255
## [176] {bols,haddad,meire} 256
## [177] {bols} 257
## [178] {bols,meire} 258
## [179] {bols,meire} 259
## [180] {bols,meire} 26
## [181] {bols,meire} 260
## [182] {bols,meire} 261
## [183] {meire} 262
## [184] {bols,meire} 263
## [185] {bols} 264
## [186] {meire} 265
## [187] {bols} 266
## [188] {bols,meire} 267
## [189] {bols,haddad} 268
## [190] {bols,meire} 269
## [191] {haddad,meire} 27
## [192] {bols,meire} 270
## [193] {bols,meire} 271
## [194] {bols,meire} 272
## [195] {bols,meire} 273
## [196] {haddad,meire} 274
## [197] {bols,meire} 275
## [198] {bols,haddad,meire} 276
## [199] {bols,haddad} 277
## [200] {meire} 278
## [201] {bols,meire} 279
## [202] {meire} 28
## [203] {bols,meire} 280
## [204] {bols,haddad} 281
## [205] {bols,meire} 282
## [206] {bols,meire} 283
## [207] {bols,meire} 284
## [208] {bols,haddad,meire} 285
## [209] {haddad,meire} 286
## [210] {bols,meire} 287
## [211] {meire} 288
## [212] {bols,meire} 289
## [213] {bols,meire} 29
## [214] {bols,meire} 290
## [215] {bols} 291
## [216] {bols} 292
## [217] {bols,meire} 293
## [218] {bols} 294
## [219] {bols} 295
## [220] {bols,meire} 296
## [221] {bols,meire} 297
## [222] {bols,meire} 298
## [223] {bols,meire} 299
## [224] {bols} 3
## [225] {bols,meire} 30
## [226] {haddad,meire} 300
## [227] {bols,meire} 301
## [228] {bols,meire} 302
## [229] {bols,haddad,meire} 303
## [230] {bols,meire} 304
## [231] {meire} 305
## [232] {bols} 306
## [233] {meire} 307
## [234] {bols,meire} 308
## [235] {bols,meire} 309
## [236] {meire} 31
## [237] {bols,meire} 310
## [238] {bols} 311
## [239] {meire} 312
## [240] {bols,meire} 313
## [241] {bols,haddad,meire} 314
## [242] {bols,meire} 315
## [243] {bols,meire} 316
## [244] {bols} 317
## [245] {bols,meire} 318
## [246] {bols,meire} 319
## [247] {bols,haddad,meire} 32
## [248] {bols,meire} 320
## [249] {bols,meire} 321
## [250] {bols,meire} 322
## [251] {bols} 323
## [252] {bols,meire} 324
## [253] {bols,haddad,meire} 325
## [254] {bols,meire} 326
## [255] {bols,haddad,meire} 327
## [256] {meire} 328
## [257] {bols} 329
## [258] {bols,meire} 33
## [259] {bols,meire} 330
## [260] {bols,meire} 331
## [261] {bols,meire} 332
## [262] {bols,haddad,meire} 333
## [263] {bols,meire} 334
## [264] {bols,meire} 335
## [265] {meire} 336
## [266] {bols} 337
## [267] {bols,meire} 338
## [268] {bols,haddad} 339
## [269] {bols,meire} 34
## [270] {bols,meire} 340
## [271] {bols} 341
## [272] {bols,meire} 342
## [273] {bols,haddad} 343
## [274] {bols,haddad,meire} 344
## [275] {bols,meire} 345
## [276] {bols,meire} 346
## [277] {bols,meire} 347
## [278] {bols,meire} 348
## [279] {bols,meire} 349
## [280] {bols,haddad} 35
## [281] {bols,meire} 350
## [282] {bols,meire} 351
## [283] {bols,meire} 352
## [284] {bols,haddad,meire} 353
## [285] {bols,haddad,meire} 354
## [286] {bols,haddad} 355
## [287] {bols,meire} 356
## [288] {bols,meire} 357
## [289] {bols,meire} 358
## [290] {bols,meire} 359
## [291] {bols,haddad} 36
## [292] {bols,meire} 360
## [293] {bols,meire} 361
## [294] {bols,meire} 362
## [295] {haddad,meire} 363
## [296] {bols} 364
## [297] {bols,meire} 365
## [298] {bols,haddad,meire} 366
## [299] {bols,meire} 367
## [300] {bols,meire} 368
## [301] {bols,haddad} 369
## [302] {bols} 37
## [303] {bols} 370
## [304] {bols,meire} 371
## [305] {haddad,meire} 372
## [306] {bols,meire} 373
## [307] {bols} 374
## [308] {bols} 375
## [309] {bols,haddad,meire} 376
## [310] {bols,haddad,meire} 377
## [311] {bols,meire} 378
## [312] {bols,meire} 379
## [313] {bols,meire} 38
## [314] {bols,meire} 380
## [315] {bols,haddad} 381
## [316] {bols} 382
## [317] {bols,meire} 383
## [318] {bols} 384
## [319] {bols,meire} 385
## [320] {bols,meire} 386
## [321] {bols,meire} 387
## [322] {bols,haddad} 388
## [323] {bols} 389
## [324] {bols} 39
## [325] {bols,meire} 390
## [326] {bols} 391
## [327] {bols,meire} 392
## [328] {bols,meire} 393
## [329] {bols,haddad} 394
## [330] {bols,meire} 395
## [331] {bols,meire} 396
## [332] {bols,meire} 397
## [333] {bols,meire} 398
## [334] {bols,haddad} 399
## [335] {bols,haddad,meire} 4
## [336] {bols,meire} 40
## [337] {bols,haddad,meire} 400
## [338] {bols,haddad} 401
## [339] {bols,meire} 402
## [340] {bols,meire} 403
## [341] {bols} 404
## [342] {bols,meire} 405
## [343] {bols,haddad,meire} 406
## [344] {bols} 407
## [345] {bols,meire} 408
## [346] {bols,meire} 409
## [347] {bols,meire} 41
## [348] {bols} 410
## [349] {bols,meire} 411
## [350] {bols} 412
## [351] {bols,meire} 413
## [352] {bols,meire} 414
## [353] {bols,haddad} 415
## [354] {bols,haddad,meire} 416
## [355] {bols,meire} 417
## [356] {bols,haddad,meire} 418
## [357] {bols,meire} 419
## [358] {bols,haddad,meire} 42
## [359] {bols,haddad,meire} 420
## [360] {bols} 421
## [361] {bols,meire} 422
## [362] {bols,meire} 423
## [363] {bols,meire} 424
## [364] {meire} 425
## [365] {bols} 426
## [366] {bols,meire} 427
## [367] {bols,meire} 428
## [368] {bols} 429
## [369] {bols,meire} 43
## [370] {bols} 430
## [371] {bols} 431
## [372] {bols,meire} 432
## [373] {bols,meire} 433
## [374] {bols,meire} 434
## [375] {bols,meire} 435
## [376] {bols,meire} 436
## [377] {bols} 437
## [378] {bols,haddad,meire} 438
## [379] {bols} 439
## [380] {bols,meire} 44
## [381] {bols,meire} 440
## [382] {bols} 441
## [383] {bols,meire} 442
## [384] {bols,haddad} 443
## [385] {bols,meire} 444
## [386] {bols,haddad,meire} 445
## [387] {bols} 446
## [388] {bols} 447
## [389] {bols,meire} 448
## [390] {bols,haddad} 449
## [391] {bols,haddad,meire} 45
## [392] {bols,meire} 450
## [393] {bols,meire} 451
## [394] {bols} 452
## [395] {bols} 453
## [396] {bols,meire} 454
## [397] {bols} 455
## [398] {bols,haddad,meire} 456
## [399] {bols} 457
## [400] {bols} 458
## [401] {bols,meire} 459
## [402] {bols,meire} 46
## [403] {bols,meire} 460
## [404] {bols,meire} 461
## [405] {bols} 462
## [406] {bols} 463
## [407] {bols,meire} 464
## [408] {bols,meire} 465
## [409] {bols,meire} 466
## [410] {bols} 467
## [411] {bols,meire} 468
## [412] {bols} 469
## [413] {bols,meire} 47
## [414] {bols,meire} 470
## [415] {bols,haddad} 471
## [416] {bols} 472
## [417] {bols,meire} 473
## [418] {bols,meire} 474
## [419] {bols,haddad} 475
## [420] {bols,meire} 476
## [421] {bols} 477
## [422] {bols} 478
## [423] {bols,meire} 479
## [424] {bols,meire} 48
## [425] {bols,haddad,meire} 480
## [426] {bols,haddad,meire} 481
## [427] {bols} 482
## [428] {bols} 483
## [429] {bols,meire} 484
## [430] {bols} 485
## [431] {bols,meire} 486
## [432] {meire} 487
## [433] {haddad,meire} 488
## [434] {bols,meire} 489
## [435] {meire} 49
## [436] {bols,meire} 490
## [437] {bols,haddad,meire} 491
## [438] {bols,meire} 492
## [439] {bols,meire} 493
## [440] {bols} 494
## [441] {bols} 495
## [442] {bols,haddad,meire} 496
## [443] {bols,meire} 497
## [444] {bols,meire} 498
## [445] {bols,haddad,meire} 499
## [446] {bols,meire} 5
## [447] {bols,meire} 50
## [448] {bols,haddad,meire} 500
## [449] {bols} 501
## [450] {bols} 502
## [451] {bols,meire} 503
## [452] {bols,meire} 504
## [453] {bols,haddad,meire} 505
## [454] {bols,meire} 506
## [455] {bols,meire} 507
## [456] {meire} 508
## [457] {bols,meire} 509
## [458] {bols,meire} 51
## [459] {bols,haddad} 510
## [460] {bols} 511
## [461] {bols,meire} 512
## [462] {bols,meire} 513
## [463] {bols,meire} 514
## [464] {bols,meire} 515
## [465] {bols,meire} 516
## [466] {bols,meire} 517
## [467] {bols} 518
## [468] {bols,meire} 519
## [469] {meire} 52
## [470] {bols,meire} 520
## [471] {bols,meire} 521
## [472] {bols} 522
## [473] {bols,meire} 523
## [474] {bols,meire} 524
## [475] {bols,meire} 525
## [476] {bols} 526
## [477] {bols,haddad,meire} 527
## [478] {bols,haddad} 528
## [479] {bols} 529
## [480] {bols,meire} 53
## [481] {bols,meire} 530
## [482] {bols,meire} 531
## [483] {bols,haddad,meire} 532
## [484] {bols,meire} 533
## [485] {bols,meire} 534
## [486] {bols,haddad,meire} 535
## [487] {bols,meire} 536
## [488] {bols,meire} 537
## [489] {bols,meire} 538
## [490] {bols,haddad} 539
## [491] {bols,meire} 54
## [492] {bols,meire} 540
## [493] {bols,meire} 541
## [494] {bols,meire} 542
## [495] {bols} 543
## [496] {bols,meire} 544
## [497] {bols,meire} 545
## [498] {bols} 546
## [499] {bols,meire} 547
## [500] {haddad,meire} 548
## [501] {bols} 549
## [502] {bols,meire} 55
## [503] {bols,meire} 550
## [504] {bols} 551
## [505] {bols} 552
## [506] {bols,meire} 553
## [507] {bols,meire} 554
## [508] {bols,meire} 555
## [509] {bols,meire} 556
## [510] {bols} 557
## [511] {bols,haddad} 558
## [512] {bols,meire} 559
## [513] {bols,haddad} 56
## [514] {meire} 560
## [515] {bols,meire} 561
## [516] {bols,meire} 562
## [517] {bols} 563
## [518] {bols} 564
## [519] {bols,meire} 565
## [520] {bols} 566
## [521] {bols,haddad,meire} 567
## [522] {bols,haddad,meire} 568
## [523] {bols,haddad} 569
## [524] {bols,meire} 57
## [525] {bols} 570
## [526] {meire} 571
## [527] {bols,meire} 572
## [528] {bols,meire} 573
## [529] {haddad,meire} 574
## [530] {bols,meire} 575
## [531] {bols,meire} 576
## [532] {bols,meire} 577
## [533] {bols,haddad} 578
## [534] {bols,meire} 579
## [535] {bols,haddad,meire} 58
## [536] {bols,meire} 580
## [537] {bols} 581
## [538] {bols} 582
## [539] {bols,meire} 583
## [540] {bols} 584
## [541] {bols,meire} 585
## [542] {bols,meire} 586
## [543] {bols,haddad,meire} 587
## [544] {bols,haddad} 588
## [545] {bols,haddad,meire} 589
## [546] {bols,meire} 59
## [547] {bols,meire} 590
## [548] {bols,meire} 591
## [549] {bols,haddad,meire} 592
## [550] {bols,meire} 593
## [551] {bols,meire} 594
## [552] {bols,meire} 595
## [553] {bols,meire} 596
## [554] {bols,meire} 597
## [555] {bols,meire} 598
## [556] {bols,haddad} 599
## [557] {meire} 6
## [558] {bols,meire} 60
## [559] {bols,meire} 600
## [560] {bols,haddad} 601
## [561] {bols,meire} 602
## [562] {bols,meire} 603
## [563] {bols,haddad,meire} 604
## [564] {bols} 605
## [565] {bols,meire} 606
## [566] {bols} 607
## [567] {meire} 608
## [568] {bols,haddad,meire} 609
## [569] {bols,meire} 61
## [570] {bols,meire} 610
## [571] {bols,meire} 611
## [572] {bols,haddad} 612
## [573] {bols,haddad} 613
## [574] {bols,meire} 614
## [575] {bols,meire} 615
## [576] {bols,haddad} 616
## [577] {bols} 617
## [578] {bols} 618
## [579] {bols} 619
## [580] {meire} 62
## [581] {bols,meire} 620
## [582] {bols} 621
## [583] {bols,meire} 622
## [584] {bols,meire} 623
## [585] {bols,meire} 624
## [586] {bols,meire} 625
## [587] {bols,meire} 626
## [588] {bols,meire} 627
## [589] {bols,meire} 628
## [590] {bols} 629
## [591] {bols} 63
## [592] {bols,meire} 630
## [593] {bols} 631
## [594] {bols,meire} 632
## [595] {bols,haddad,meire} 633
## [596] {bols,meire} 634
## [597] {bols,meire} 635
## [598] {bols} 636
## [599] {bols,haddad} 637
## [600] {bols} 638
## [601] {bols,meire} 639
## [602] {bols,haddad,meire} 64
## [603] {bols} 640
## [604] {bols} 641
## [605] {bols} 642
## [606] {bols,meire} 643
## [607] {bols,meire} 644
## [608] {bols,meire} 645
## [609] {bols,haddad,meire} 646
## [610] {bols,meire} 647
## [611] {bols} 648
## [612] {meire} 649
## [613] {bols,meire} 65
## [614] {bols,meire} 650
## [615] {bols,meire} 651
## [616] {bols,meire} 652
## [617] {bols,haddad,meire} 653
## [618] {bols,meire} 654
## [619] {bols,meire} 655
## [620] {bols,meire} 656
## [621] {bols,meire} 657
## [622] {bols} 658
## [623] {bols,meire} 659
## [624] {bols} 66
## [625] {bols} 660
## [626] {haddad,meire} 661
## [627] {bols,meire} 662
## [628] {bols,meire} 663
## [629] {bols,meire} 664
## [630] {bols,meire} 665
## [631] {bols} 666
## [632] {bols,meire} 667
## [633] {bols,meire} 668
## [634] {bols,meire} 669
## [635] {bols,meire} 67
## [636] {bols,haddad,meire} 670
## [637] {bols,haddad,meire} 671
## [638] {bols} 672
## [639] {bols,meire} 673
## [640] {bols} 674
## [641] {bols,meire} 675
## [642] {bols} 676
## [643] {bols,meire} 677
## [644] {bols,meire} 678
## [645] {bols} 679
## [646] {bols,haddad} 68
## [647] {bols,meire} 680
## [648] {bols,meire} 681
## [649] {bols,meire} 682
## [650] {bols,meire} 683
## [651] {bols,meire} 684
## [652] {bols,haddad,meire} 685
## [653] {bols,meire} 686
## [654] {bols,meire} 687
## [655] {bols,meire} 688
## [656] {bols,meire} 689
## [657] {bols,haddad} 69
## [658] {bols,meire} 690
## [659] {bols,meire} 691
## [660] {bols,haddad} 692
## [661] {bols,meire} 693
## [662] {bols} 694
## [663] {bols} 695
## [664] {haddad,meire} 696
## [665] {bols} 697
## [666] {bols,haddad} 698
## [667] {bols,meire} 699
## [668] {bols,meire} 7
## [669] {meire} 70
## [670] {bols} 700
## [671] {bols,meire} 701
## [672] {bols,meire} 702
## [673] {bols} 703
## [674] {bols,meire} 704
## [675] {bols,meire} 705
## [676] {meire} 706
## [677] {bols,meire} 707
## [678] {bols,meire} 708
## [679] {bols,meire} 709
## [680] {haddad,meire} 71
## [681] {bols,haddad,meire} 710
## [682] {bols,meire} 711
## [683] {bols} 712
## [684] {bols,meire} 713
## [685] {bols,meire} 714
## [686] {bols} 715
## [687] {bols,meire} 716
## [688] {bols,haddad} 717
## [689] {bols,meire} 718
## [690] {bols} 719
## [691] {bols} 72
## [692] {bols,haddad,meire} 720
## [693] {bols,haddad,meire} 721
## [694] {bols,meire} 722
## [695] {bols,meire} 723
## [696] {bols,meire} 724
## [697] {bols,meire} 725
## [698] {bols,meire} 726
## [699] {bols,meire} 727
## [700] {bols,meire} 728
## [701] {bols,meire} 729
## [702] {bols,meire} 73
## [703] {bols,meire} 730
## [704] {bols,meire} 731
## [705] {bols,meire} 732
## [706] {bols} 733
## [707] {bols,meire} 734
## [708] {bols,meire} 735
## [709] {bols,meire} 736
## [710] {bols} 737
## [711] {bols} 738
## [712] {bols,meire} 739
## [713] {bols,meire} 74
## [714] {bols,haddad,meire} 740
## [715] {bols} 741
## [716] {bols,meire} 742
## [717] {bols,meire} 743
## [718] {bols,meire} 744
## [719] {bols} 745
## [720] {bols,haddad,meire} 746
## [721] {bols,haddad,meire} 747
## [722] {bols,meire} 748
## [723] {bols,meire} 749
## [724] {meire} 75
## [725] {bols,meire} 750
## [726] {meire} 751
## [727] {bols,meire} 752
## [728] {bols,haddad} 753
## [729] {bols,haddad} 754
## [730] {bols,haddad,meire} 755
## [731] {bols,meire} 756
## [732] {bols,meire} 757
## [733] {bols,meire} 758
## [734] {bols,haddad} 759
## [735] {bols,haddad,meire} 76
## [736] {bols,meire} 760
## [737] {bols,meire} 761
## [738] {bols,meire} 762
## [739] {bols} 763
## [740] {bols} 764
## [741] {bols,meire} 765
## [742] {bols,meire} 766
## [743] {bols,haddad,meire} 767
## [744] {bols,meire} 768
## [745] {bols,meire} 769
## [746] {bols,meire} 77
## [747] {bols} 770
## [748] {bols} 771
## [749] {bols} 772
## [750] {bols} 773
## [751] {bols,meire} 774
## [752] {meire} 775
## [753] {bols,meire} 776
## [754] {bols} 777
## [755] {haddad,meire} 778
## [756] {bols,haddad} 779
## [757] {bols,meire} 78
## [758] {bols,haddad} 780
## [759] {bols,haddad,meire} 781
## [760] {bols,haddad} 782
## [761] {bols,meire} 783
## [762] {haddad,meire} 784
## [763] {bols} 785
## [764] {bols} 786
## [765] {bols} 787
## [766] {bols} 788
## [767] {bols} 789
## [768] {bols} 79
## [769] {bols,meire} 790
## [770] {bols} 791
## [771] {bols,haddad,meire} 792
## [772] {bols} 793
## [773] {bols,meire} 794
## [774] {bols,meire} 795
## [775] {bols,meire} 796
## [776] {bols,meire} 797
## [777] {bols,meire} 798
## [778] {bols,meire} 799
## [779] {bols,meire} 8
## [780] {bols,meire} 80
## [781] {meire} 800
## [782] {bols,meire} 801
## [783] {bols,meire} 802
## [784] {bols,meire} 803
## [785] {bols,meire} 804
## [786] {bols} 805
## [787] {bols,meire} 806
## [788] {haddad,meire} 807
## [789] {bols} 808
## [790] {bols,haddad} 809
## [791] {bols} 81
## [792] {bols,meire} 810
## [793] {bols,meire} 811
## [794] {bols,meire} 812
## [795] {bols,meire} 813
## [796] {bols,haddad} 814
## [797] {bols,meire} 815
## [798] {bols,haddad} 816
## [799] {bols,meire} 817
## [800] {bols} 818
## [801] {bols,haddad,meire} 819
## [802] {bols} 82
## [803] {bols,haddad,meire} 820
## [804] {bols,meire} 821
## [805] {bols} 822
## [806] {bols,meire} 823
## [807] {bols} 824
## [808] {bols} 825
## [809] {bols} 826
## [810] {bols} 827
## [811] {bols,meire} 828
## [812] {bols,meire} 829
## [813] {bols,meire} 83
## [814] {bols} 830
## [815] {meire} 831
## [816] {bols,haddad,meire} 832
## [817] {bols,meire} 833
## [818] {bols} 834
## [819] {bols} 835
## [820] {bols,meire} 836
## [821] {bols} 837
## [822] {bols,meire} 838
## [823] {bols,meire} 839
## [824] {bols,meire} 84
## [825] {bols} 840
## [826] {bols,meire} 841
## [827] {bols,meire} 842
## [828] {bols,meire} 843
## [829] {bols,meire} 844
## [830] {bols} 845
## [831] {bols,haddad,meire} 846
## [832] {bols,haddad} 847
## [833] {bols,meire} 848
## [834] {bols,meire} 849
## [835] {bols,meire} 85
## [836] {bols,meire} 850
## [837] {bols,haddad,meire} 851
## [838] {bols,meire} 852
## [839] {bols,meire} 853
## [840] {bols,meire} 854
## [841] {bols,meire} 855
## [842] {meire} 856
## [843] {bols} 857
## [844] {bols,meire} 858
## [845] {bols,meire} 859
## [846] {bols,meire} 86
## [847] {bols,meire} 860
## [848] {bols,meire} 861
## [849] {bols,haddad,meire} 862
## [850] {bols,meire} 863
## [851] {bols,meire} 864
## [852] {bols,meire} 865
## [853] {haddad,meire} 866
## [854] {bols,meire} 867
## [855] {haddad,meire} 868
## [856] {bols,meire} 869
## [857] {bols,meire} 87
## [858] {bols,meire} 870
## [859] {bols,meire} 871
## [860] {bols,meire} 872
## [861] {bols,meire} 873
## [862] {bols} 874
## [863] {bols,haddad,meire} 875
## [864] {bols,meire} 876
## [865] {bols} 877
## [866] {meire} 878
## [867] {bols,meire} 879
## [868] {bols,meire} 88
## [869] {bols,meire} 880
## [870] {bols,meire} 881
## [871] {bols,meire} 882
## [872] {bols,meire} 883
## [873] {bols,haddad,meire} 884
## [874] {bols,meire} 885
## [875] {bols,meire} 886
## [876] {bols,meire} 887
## [877] {bols,meire} 888
## [878] {bols,meire} 889
## [879] {bols,meire} 89
## [880] {bols,meire} 890
## [881] {bols,haddad,meire} 891
## [882] {bols} 892
## [883] {meire} 893
## [884] {bols,meire} 894
## [885] {bols} 895
## [886] {bols,haddad,meire} 896
## [887] {bols} 897
## [888] {bols,meire} 898
## [889] {haddad,meire} 899
## [890] {bols,haddad,meire} 9
## [891] {bols,meire} 90
## [892] {bols,haddad} 900
## [893] {bols,meire} 901
## [894] {bols,haddad} 902
## [895] {meire} 903
## [896] {bols,meire} 904
## [897] {bols} 905
## [898] {bols,meire} 906
## [899] {bols} 907
## [900] {haddad,meire} 908
## [901] {bols,meire} 909
## [902] {bols,meire} 91
## [903] {bols} 910
## [904] {bols,meire} 911
## [905] {bols,haddad,meire} 912
## [906] {bols,haddad} 913
## [907] {bols,meire} 914
## [908] {bols,haddad,meire} 915
## [909] {bols,haddad} 916
## [910] {bols,haddad,meire} 917
## [911] {bols,meire} 918
## [912] {bols} 919
## [913] {bols,meire} 92
## [914] {haddad,meire} 920
## [915] {bols} 921
## [916] {bols,meire} 922
## [917] {bols,haddad,meire} 923
## [918] {bols,meire} 924
## [919] {haddad,meire} 925
## [920] {bols,meire} 926
## [921] {bols} 927
## [922] {bols} 928
## [923] {bols,meire} 929
## [924] {bols} 93
## [925] {bols,meire} 930
## [926] {bols,meire} 931
## [927] {bols,meire} 932
## [928] {bols} 933
## [929] {bols,meire} 934
## [930] {bols,meire} 935
## [931] {meire} 936
## [932] {bols,haddad,meire} 937
## [933] {bols,meire} 938
## [934] {bols} 939
## [935] {bols,meire} 94
## [936] {bols,meire} 940
## [937] {bols,haddad,meire} 941
## [938] {meire} 942
## [939] {bols,haddad,meire} 943
## [940] {bols,meire} 944
## [941] {bols,meire} 945
## [942] {bols,meire} 946
## [943] {bols,meire} 947
## [944] {bols,meire} 948
## [945] {bols,meire} 949
## [946] {bols,haddad,meire} 95
## [947] {bols} 950
## [948] {bols,meire} 951
## [949] {bols,meire} 952
## [950] {bols,meire} 953
## [951] {bols,meire} 954
## [952] {bols,haddad,meire} 955
## [953] {bols,meire} 956
## [954] {bols} 957
## [955] {bols,meire} 958
## [956] {bols,meire} 959
## [957] {bols,meire} 96
## [958] {meire} 960
## [959] {bols,haddad,meire} 961
## [960] {bols,meire} 962
## [961] {bols,meire} 963
## [962] {bols} 964
## [963] {bols,meire} 965
## [964] {bols} 966
## [965] {bols} 967
## [966] {bols,meire} 968
## [967] {bols,meire} 969
## [968] {bols,haddad} 97
## [969] {bols,meire} 970
## [970] {bols,meire} 971
## [971] {bols,meire} 972
## [972] {bols} 973
## [973] {bols,haddad,meire} 974
## [974] {bols} 975
## [975] {bols,meire} 976
## [976] {bols,meire} 977
## [977] {bols,meire} 978
## [978] {bols} 979
## [979] {bols,meire} 98
## [980] {bols,haddad,meire} 980
## [981] {bols} 981
## [982] {haddad,meire} 982
## [983] {bols,meire} 983
## [984] {bols,meire} 984
## [985] {bols,meire} 985
## [986] {bols,haddad,meire} 986
## [987] {bols,meire} 987
## [988] {bols,haddad,meire} 988
## [989] {bols,meire} 989
## [990] {bols,meire} 99
## [991] {meire} 990
## [992] {bols} 991
## [993] {bols,meire} 992
## [994] {bols,haddad,meire} 993
## [995] {bols,meire} 994
## [996] {bols,meire} 995
## [997] {bols,meire} 996
## [998] {bols,meire} 997
## [999] {meire} 998
## [1000] {bols,meire} 999
# Most Frequent Items
if (!require("RColorBrewer")) {
# install color package of R
install.packages("RColorBrewer")
#include library RColorBrewer
library(RColorBrewer)
}
## Loading required package: RColorBrewer
itemFrequencyPlot(dt2,topN=3,type="relative",col=brewer.pal(8,'Pastel2'),main="Votos Relativos por Item")
#sum(itemFrequency(dt2, type = "relative"))
#itemFrequencyPlot(dt2,topN = 9)
rules<-apriori(dt2, parameter = list(supp=0.001, conf=0.5))
## Apriori
##
## Parameter specification:
## confidence minval smax arem aval originalSupport maxtime support minlen
## 0.5 0.1 1 none FALSE TRUE 5 0.001 1
## maxlen target ext
## 10 rules TRUE
##
## Algorithmic control:
## filter tree heap memopt load sort verbose
## 0.1 TRUE TRUE FALSE TRUE 2 TRUE
##
## Absolute minimum support count: 1
##
## set item appearances ...[0 item(s)] done [0.00s].
## set transactions ...[3 item(s), 1000 transaction(s)] done [0.00s].
## sorting and recoding items ... [3 item(s)] done [0.00s].
## creating transaction tree ... done [0.00s].
## checking subsets of size 1 2 3 done [0.00s].
## writing ... [8 rule(s)] done [0.00s].
## creating S4 object ... done [0.00s].
rules<-sort(rules, decreasing=TRUE,by="confidence")
inspect(rules)
## lhs rhs support confidence coverage lift count
## [1] {} => {bols} 0.916 0.9160000 1.000 1.0000000 916
## [2] {meire} => {bols} 0.660 0.8870968 0.744 0.9684463 660
## [3] {haddad} => {bols} 0.167 0.8564103 0.195 0.9349457 167
## [4] {haddad,meire} => {bols} 0.101 0.7829457 0.129 0.8547443 101
## [5] {} => {meire} 0.744 0.7440000 1.000 1.0000000 744
## [6] {bols} => {meire} 0.660 0.7205240 0.916 0.9684463 660
## [7] {haddad} => {meire} 0.129 0.6615385 0.195 0.8891646 129
## [8] {bols,haddad} => {meire} 0.101 0.6047904 0.167 0.8128903 101
subRules<-rules[quality(rules)$confidence>0.4]
top10subRules <- head(subRules, n = 10, by = "confidence")
plot(top10subRules, method = "graph", engine = "htmlwidget")
plot(subRules)
plot(rules, method="graph")
plot(rules, method = "grouped")