- 金錢
- 35
- 威望
- 339
- 貢獻值
- 0
- 推廣值
- 0
- 性別
- 保密
- 在線時間
- 2 小時
- 最後登錄
- 2022-5-27
- 主題
- 5
- 精華
- 0
- 閱讀權限
- 30
- 註冊時間
- 2012-6-6
- 帖子
- 51
![Rank: 3](static/image/common/star_level2.gif) ![Rank: 3](static/image/common/star_level1.gif)
TA的每日心情![](source/plugin/dsu_paulsign/img/emot/nu.gif) | 怒 2022-5-27 16:35 |
---|
簽到天數: 152 天 [LV.7]常住居民III - 推廣值
- 0
- 貢獻值
- 0
- 金錢
- 35
- 威望
- 339
- 主題
- 5
|
lrns = list(8 i b1 e) Y X4 p8 M
makeLearner("classif.lda", id = "lda"),; R2 r: W3 o& R* E; O
makeLearner("classif.rpart", id = "rpart"),4 ^2 e; ~# z5 m- w |. z
makeLearner("classif.randomForest", id = "randomForest")
3 C! S9 d% _6 s( _)
4 u2 T3 l* e, L v# n1 P9 o& \# b8 g" U1 o, i0 c1 x+ f: p
## Get additional Tasks from package mlbench
) \( W' _4 W1 p9 V! q4 K# Vring.task = convertMLBenchObjToTask("mlbench.ringnorm", n = 10), b7 ^) ?: c' c, f
wave.task = convertMLBenchObjToTask("mlbench.waveform", n = 10)
8 B+ \0 B. A( H# f, F! F' x+ [1 A1 q E
tasks = list(iris.task, sonar.task, pid.task, ring.task, wave.task)
' S/ u1 O/ f' U' T' o+ o$ Grdesc = makeResampleDesc("CV", iters = 3): X2 Y. f6 B* O0 |2 @* o& z$ w
meas = list(mmce, ber, timetrain)5 _2 V8 j4 z5 i" W; R1 y' b
bmr = benchmark(lrns, tasks, rdesc, meas, show.info = FALSE)
8 ]* f G% K4 ]5 |4 }' ibmr# _, y. d( V' L
plotBMRBoxplots(bmr, measure = ber, style = "violin", pretty.names = FALSE) +
$ F- Y0 ? N, r aes(color = learner.id) +
1 Y; p# N) S" E% W, U theme(strip.text.x = element_text(size = 8)) |
|