Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ### Region continuous
- R> set.seed(1)
- R> bll = read.csv("bll_SB.csv", header=TRUE)
- R> bll_SB <- na.omit(data.frame(bll))
- R> bll_SB$SB_Pres <- factor(bll_SB$SB_Pres)
- R> SBcf <- cforest(SB_Pres ~ ., data=bll_SB, control=cforest_unbiased())
- R> varimp(SBcf, conditional = FALSE)
- Slope Dist2Shr Bathy Chla SST
- 0.003296 0.012235 0.014388 0.089745 0.028143
- DaylightHours MoonPhase Region
- 0.008847 0.003367 0.095878
- ### Region categorical
- R> set.seed(1)
- R> bll_SB$Region <- factor(bll_SB$Region)
- R> SBcf <- cforest(SB_Pres ~ ., data=bll_SB, control=cforest_unbiased())
- R> varimp(SBcf, conditional = FALSE)
- Slope Dist2Shr Bathy Chla SST
- 0.003633 0.015908 0.008286 0.085367 0.028847
- DaylightHours MoonPhase Region
- 0.009520 0.002969 0.093061
Advertisement
Add Comment
Please, Sign In to add comment