- 金錢
- 35
- 威望
- 339
- 貢獻值
- 0
- 推廣值
- 0
- 性別
- 保密
- 在線時間
- 2 小時
- 最後登錄
- 2022-5-27
- 主題
- 5
- 精華
- 0
- 閱讀權限
- 30
- 註冊時間
- 2012-6-6
- 帖子
- 51
 
TA的每日心情 | 怒 2022-5-27 16:35 |
---|
簽到天數: 152 天 [LV.7]常住居民III - 推廣值
- 0
- 貢獻值
- 0
- 金錢
- 35
- 威望
- 339
- 主題
- 5
|
lrns = list(8 f) H6 Y# W E1 Q+ F N, ], |
makeLearner("classif.lda", id = "lda"),6 C" |5 I( q6 B/ \' C9 ~2 m
makeLearner("classif.rpart", id = "rpart"),4 M. S A' V0 }! V- J h
makeLearner("classif.randomForest", id = "randomForest")0 `/ D4 h# ?) P) x, n
): v b' F# z% P# k& P o" l! w. e% `
* T6 x, `# L- ]# h$ t
## Get additional Tasks from package mlbench
+ `- Y7 \3 k2 n/ C6 y5 w1 Iring.task = convertMLBenchObjToTask("mlbench.ringnorm", n = 10)
& S! ~8 P, V. P4 H+ vwave.task = convertMLBenchObjToTask("mlbench.waveform", n = 10)
- j* W, k- {2 n/ W4 z5 h
( K( i' S) P' s l$ c; Ztasks = list(iris.task, sonar.task, pid.task, ring.task, wave.task)
4 \- |, `" R6 I$ a6 Z, N( prdesc = makeResampleDesc("CV", iters = 3)6 h; w7 o/ K4 T$ ^4 w
meas = list(mmce, ber, timetrain)( V& w4 \3 V' n# B; Q( s: T
bmr = benchmark(lrns, tasks, rdesc, meas, show.info = FALSE)
n4 j; S6 v; e0 L( P2 Rbmr! K7 @& S( D: N8 L
plotBMRBoxplots(bmr, measure = ber, style = "violin", pretty.names = FALSE) +. }0 V0 [+ x3 R
aes(color = learner.id) +
1 p: u: m9 t/ K$ r theme(strip.text.x = element_text(size = 8)) |
|