Comparações

Abre listas

options(rpubs.upload.method = "internal")
mfiles <- list.files(path = ".", pattern = "*.out")
for (f in mfiles) {
    assign(f, read.csv(f, header = FALSE))
}

J48 e Meta vote

deg

wilcox.test(deg_J48_result.out$V1, deg_vote_result.out$V1, paired = TRUE)

## 
##  Wilcoxon signed rank test with continuity correction
## 
## data:  deg_J48_result.out$V1 and deg_vote_result.out$V1
## V = 0, p-value < 2.2e-16
## alternative hypothesis: true location shift is not equal to 0

bet_sp

wilcox.test(bet_sp_J48_result.out$V1, bet_sp_vote_result.out$V1, paired = TRUE)

## 
##  Wilcoxon signed rank test with continuity correction
## 
## data:  bet_sp_J48_result.out$V1 and bet_sp_vote_result.out$V1
## V = 0, p-value < 2.2e-16
## alternative hypothesis: true location shift is not equal to 0

neig

wilcox.test(neig_J48_result.out$V1, neig_vote_result.out$V1, paired = TRUE)

## 
##  Wilcoxon signed rank test with continuity correction
## 
## data:  neig_J48_result.out$V1 and neig_vote_result.out$V1
## V = 800.5, p-value = 8.565e-09
## alternative hypothesis: true location shift is not equal to 0

complete

wilcox.test(complete_J48_result.out$V1, complete_vote_result.out$V1, paired = TRUE)

## 
##  Wilcoxon signed rank test with continuity correction
## 
## data:  complete_J48_result.out$V1 and complete_vote_result.out$V1
## V = 0, p-value < 2.2e-16
## alternative hypothesis: true location shift is not equal to 0

Meta vote (Exp x Random)

deg

wilcox.test(deg_vote_result.out$V1, deg_random_vote_result.out$V1, paired = TRUE)

## 
##  Wilcoxon signed rank test with continuity correction
## 
## data:  deg_vote_result.out$V1 and deg_random_vote_result.out$V1
## V = 5050, p-value < 2.2e-16
## alternative hypothesis: true location shift is not equal to 0

AVG deg_avg_metavote_exp =

mean(deg_vote_result.out$V1)

## [1] 0.7468

deg_avg_metavote_rnd =

mean(deg_random_vote_result.out$V1)

## [1] 0.5009

complete

wilcox.test(complete_vote_result.out$V1, complete_random_vote_result.out$V1, 
    paired = TRUE)

## 
##  Wilcoxon signed rank test with continuity correction
## 
## data:  complete_vote_result.out$V1 and complete_random_vote_result.out$V1
## V = 5050, p-value < 2.2e-16
## alternative hypothesis: true location shift is not equal to 0

AVG complete_avg_metavote_exp =

mean(complete_vote_result.out$V1)

## [1] 0.7919

complete_avg_metavote_rnd =

mean(complete_random_vote_result.out$V1)

## [1] 0.4996

neig

wilcox.test(neig_vote_result.out$V1, neig_random_vote_result.out$V1, paired = TRUE)

## 
##  Wilcoxon signed rank test with continuity correction
## 
## data:  neig_vote_result.out$V1 and neig_random_vote_result.out$V1
## V = 1862, p-value = 0.02283
## alternative hypothesis: true location shift is not equal to 0

AVG neig_avg_metavote_exp =

mean(neig_vote_result.out$V1)

## [1] 0.4873

neig_avg_metavote_rnd =

mean(neig_random_vote_result.out$V1)

## [1] 0.5

bet_sp

wilcox.test(bet_sp_vote_result.out$V1, bet_sp_random_vote_result.out$V1, paired = TRUE)

## 
##  Wilcoxon signed rank test with continuity correction
## 
## data:  bet_sp_vote_result.out$V1 and bet_sp_random_vote_result.out$V1
## V = 5050, p-value < 2.2e-16
## alternative hypothesis: true location shift is not equal to 0

AVG bet_sp_avg_metavote_exp =

mean(bet_sp_vote_result.out$V1)

## [1] 0.7498

bet_avg_metavote_rnd =

mean(bet_sp_random_vote_result.out$V1)

## [1] 0.5003