- 金錢
- 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(
4 J& X1 d! `" a" } makeLearner("classif.lda", id = "lda"),
1 o' s' S7 S1 \4 \; P makeLearner("classif.rpart", id = "rpart"),
0 ] u- o* m0 s! E6 g- P1 W# f makeLearner("classif.randomForest", id = "randomForest")
, [, {4 y2 Q3 [, p4 f5 c9 S2 Y)( S0 ], L% _* [
9 p0 F. N/ ?0 K# l/ l1 L4 @
## Get additional Tasks from package mlbench9 L5 H) Q6 Q; c( _5 L
ring.task = convertMLBenchObjToTask("mlbench.ringnorm", n = 10)' Z. z) p! M& l& ]6 p, p
wave.task = convertMLBenchObjToTask("mlbench.waveform", n = 10)) B4 ^* ? j v' d' r9 }
$ \9 k' M1 Q5 o- a
tasks = list(iris.task, sonar.task, pid.task, ring.task, wave.task)
; C' M# ~+ C, V1 J+ u8 Z& Z8 Lrdesc = makeResampleDesc("CV", iters = 3)
' p/ D1 C' [( u! U& @( [( c& R9 Vmeas = list(mmce, ber, timetrain), t0 w. F1 p. b$ }
bmr = benchmark(lrns, tasks, rdesc, meas, show.info = FALSE)% G5 ~) x; n6 K3 E+ Q
bmr1 T# N/ W4 w0 b! O& s: e
plotBMRBoxplots(bmr, measure = ber, style = "violin", pretty.names = FALSE) +
9 O+ j6 O& Q8 c a aes(color = learner.id) +
, n4 g3 v- K, l6 @ theme(strip.text.x = element_text(size = 8)) |
|