> local({pkg <- select.list(sort(.packages(all.available = TRUE)),graphics=TRUE)
+ if(nchar(pkg)) library(pkg, character.only=TRUE)})
> library(randomForest)
> insect <- read.csv("C:/Users/LiuYu/Desktop/insects.csv", header = TRUE)
> insectRF1 <- randomForest(insect[,c（L1,L2,L3,L4）], insect[,species], importance=TRUE, ntree=500)
> new.data <- data.frame(L1=20, L2=50, L3=30, L4=20)
> predict(insectRF1, new.data, type="prob")
错误于predict(insectRF1, new.data, type = "prob") :
找不到对象'insectRF1'
> 找关于随机森林的例子做练习，发现了该问题。求指点，谢谢。