- 金錢
- 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(+ R' ?& H2 Q6 @) P
makeLearner("classif.lda", id = "lda"),5 N+ v8 b, V c/ n* |! B; j2 v
makeLearner("classif.rpart", id = "rpart"),
1 _- n, X' l/ h* k' A8 y makeLearner("classif.randomForest", id = "randomForest")! V: H+ D& q2 B' {1 |
)
$ ?- c0 D1 F( Q3 Q0 V7 J/ p- ~( F) V: s1 R4 Y8 }. J0 h
## Get additional Tasks from package mlbench9 c4 O) Y. o' A" D, ^
ring.task = convertMLBenchObjToTask("mlbench.ringnorm", n = 10)" ^5 R) Z; C$ A; L( P( j! g$ ]- ]
wave.task = convertMLBenchObjToTask("mlbench.waveform", n = 10)5 e' J8 S7 l) N
# K4 {$ r: x9 K3 }& _7 k* n( [tasks = list(iris.task, sonar.task, pid.task, ring.task, wave.task)( `2 S# }) [6 Q' j0 U. }/ l! Y
rdesc = makeResampleDesc("CV", iters = 3)
/ s6 q, ?0 ]# Q+ O8 Y' O9 o5 x5 Rmeas = list(mmce, ber, timetrain)" }& M9 F# e) ?0 y7 E" f7 l
bmr = benchmark(lrns, tasks, rdesc, meas, show.info = FALSE)
4 B7 L6 ~2 Y, ?bmr; T4 u+ Y% P$ r# w7 D
plotBMRBoxplots(bmr, measure = ber, style = "violin", pretty.names = FALSE) +
) x: r% {' h2 m! h0 z aes(color = learner.id) +, E) C) d) _' x4 [+ t- F3 o* @
theme(strip.text.x = element_text(size = 8)) |
|