- 金錢
- 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(
: `; W5 H) F$ _9 s makeLearner("classif.lda", id = "lda"),9 v9 ?: \, F( x0 U
makeLearner("classif.rpart", id = "rpart"),
! _. P: @- W% P; D makeLearner("classif.randomForest", id = "randomForest")( c0 ~+ E- w9 f# C. @0 a& `
)
0 l" u' S( j3 @# j' N
: a/ V; C1 P/ Q1 z## Get additional Tasks from package mlbench8 K- X. d0 E6 q& E+ f; y
ring.task = convertMLBenchObjToTask("mlbench.ringnorm", n = 10)
& x' x8 O4 ?" s2 lwave.task = convertMLBenchObjToTask("mlbench.waveform", n = 10)
4 |5 |! |) Y/ Z
* Z& g N9 Y( |3 Vtasks = list(iris.task, sonar.task, pid.task, ring.task, wave.task)
! }. f( L( d3 q5 zrdesc = makeResampleDesc("CV", iters = 3); |- A$ T# |/ C9 i
meas = list(mmce, ber, timetrain)
0 a. ^$ T+ [: w5 ]. bbmr = benchmark(lrns, tasks, rdesc, meas, show.info = FALSE)# Y. r z0 C1 E. n
bmr
6 m) W0 X4 s: }. I4 aplotBMRBoxplots(bmr, measure = ber, style = "violin", pretty.names = FALSE) +
2 d& F) w5 {" ^$ t aes(color = learner.id) +( W- T$ l4 p8 x Z7 d/ O: Z
theme(strip.text.x = element_text(size = 8)) |
|