Commit | Line | Data |
---|---|---|
a961f8a1 BA |
1 | library(aggexp) |
2 | rr_all = runAlgorithm("rr", experts=1:22, stations="PQV_2014", H=183) | |
3 | ml_all = runAlgorithm("ml", experts=1:22, stations="PQV_2014", H=183, grad=TRUE) | |
4 | ml_half = runAlgorithm("ml", experts=c(1:10,11,13,15,17,19,21), stations="PQV_2014", H=183, grad=TRUE) | |
5 | rr_half = runAlgorithm("rr", experts=c(1:10,11,13,15,17,19,21), stations="PQV_2014", H=183) | |
6 | rr_nogam = runAlgorithm("rr", experts=1:10, stations="PQV_2014", H=183) | |
7 | ml_nogam = runAlgorithm("ml", experts=1:10, stations="PQV_2014", H=183, grad=TRUE) | |
8 | ||
9 | png("comparePerformances.png", width=1920, height=1080) | |
10 | par(las=1, mfrow=c(2,3)) | |
11 | plotCloud(rr_nogam, main="RR - no GAM") | |
12 | plotCloud(rr_half, main="RR - high polluted GAM") | |
13 | plotCloud(rr_all, main="RR - all GAM") | |
14 | plotCloud(ml_nogam, main="ML - no GAM") | |
15 | plotCloud(ml_half, main="ML - high polluted GAM") | |
16 | plotCloud(ml_all, main="ML - all GAM") | |
17 | dev.off() |