- 金錢
- 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(
+ s+ r# z8 h$ j5 ] makeLearner("classif.lda", id = "lda"),
2 M7 e- j- n$ }+ r5 u7 e, M" } makeLearner("classif.rpart", id = "rpart"),7 @4 {: p) u, z5 l) a
makeLearner("classif.randomForest", id = "randomForest")
3 u# e" C' ]4 E! z); ]6 [# ?9 A0 \! G, U
3 r$ {4 g8 q2 y6 m' d: O
## Get additional Tasks from package mlbench
4 u8 u6 ]1 ]5 `+ V9 m( Dring.task = convertMLBenchObjToTask("mlbench.ringnorm", n = 10)
5 z4 p6 l7 A3 F5 j5 G2 nwave.task = convertMLBenchObjToTask("mlbench.waveform", n = 10)
2 d% ]; ]* P" J" M' r4 T5 R U8 u+ w
7 N5 P4 k0 ~0 U! |0 l) ptasks = list(iris.task, sonar.task, pid.task, ring.task, wave.task)
5 A- h$ i5 v/ T ]+ M) f. F Jrdesc = makeResampleDesc("CV", iters = 3)
* `+ P' L; O. p/ R' R* |meas = list(mmce, ber, timetrain)
* u9 J* F- g2 d7 kbmr = benchmark(lrns, tasks, rdesc, meas, show.info = FALSE)
# E" N, b2 R" t7 z( x* Fbmr6 G; s* a& B' Y* u
plotBMRBoxplots(bmr, measure = ber, style = "violin", pretty.names = FALSE) +
5 r G- X/ W& p$ _ aes(color = learner.id) +
, b: b: Z5 I% U8 d/ M) j% D theme(strip.text.x = element_text(size = 8)) |
|