- 金錢
- 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(0 x. ^. T. U" N# m. o1 c0 O( w
makeLearner("classif.lda", id = "lda"),% f! r- A; O6 N. {- I
makeLearner("classif.rpart", id = "rpart"),
/ [1 `3 s% Q9 c. F( J makeLearner("classif.randomForest", id = "randomForest")
# \; i; r" N+ e" d4 t+ K)- w) a% ^7 y- d( W
* a+ r( G6 P( ~ g1 H8 b## Get additional Tasks from package mlbench# l4 t7 {2 m9 J F: l$ J
ring.task = convertMLBenchObjToTask("mlbench.ringnorm", n = 10)
O9 Y3 C6 ~2 ?3 c% jwave.task = convertMLBenchObjToTask("mlbench.waveform", n = 10)
. o1 Y$ S `$ v, f8 s% N9 {1 F8 \ l- j0 c+ G
tasks = list(iris.task, sonar.task, pid.task, ring.task, wave.task)
! W/ O& B) @ ~/ t4 x3 F A) e! jrdesc = makeResampleDesc("CV", iters = 3)
4 m1 j+ S+ i# imeas = list(mmce, ber, timetrain). X. A: s# R0 o. V1 W
bmr = benchmark(lrns, tasks, rdesc, meas, show.info = FALSE)
5 C8 e/ M- T, Q4 U; p* c; w6 ?bmr
% A* o4 b" W. PplotBMRBoxplots(bmr, measure = ber, style = "violin", pretty.names = FALSE) +
/ x- M( O5 \/ v- l& r aes(color = learner.id) +
, C6 v1 s' O6 r! T7 z) W% D+ v+ S theme(strip.text.x = element_text(size = 8)) |
|