＞library(gbmplus)
> softcorals <- read.csv('softcorals.csv', check.names = FALSE）
> set.seed(123)
> fit_softcorals <- gbm(有效态~pH+有机质+Clay+CEC+Feox+Alox+Mnox+EC+TN+TIC+游离Fe+游离Mn +游离Al,
+ data = softcorals, n.trees = 100, cv.folds = 5)
错误于inherits(x, "data.frame") : 找不到对象'softcorals'