как я могу поместить репликацию в этот код?
как я могу определить квадрат R из результата?
как я могу получить деревья больше 1000, но мой lr уже 0.001,это проблема?
например: я попробовал tr 1,2,3,4, результат все равно меньше 1000 .. ниже приведен код, который я использовал:
`tesbrt <- gbm.step(data=shrub, gbm.x = 7:11, gbm.y = 13,
family = "gaussian", tree.complexity = 1,
learning.rate = 0.001, bag.fraction = 0.6)
angaus.simp <- gbm.simplify(tesbrt, n.drops = 5)
gbm.plot(tesbrt, n.plots=5, plot.layout=c(2, 3), write.title = FALSE)`
результат, который я получил:
mean total deviance = 2.198
mean residual deviance = 1.967
estimated cv deviance = 2.198 ; se = 0.287
training data correlation = 0.525
cv correlation = 0.103 ; se = 0.076
elapsed time - 0.25 minutes