请问大家这个程序错在哪里？谢谢！

insects.xlsx (10.39 KB)

2013-11-20 14:46:53 上传

请问大家，这个程序总报错，但是我不清楚错在哪里。谢谢。

> library(randomForest)
randomForest 4.6-7
Type rfNews() to see new features/changes/bug fixes.
Warning message:
package ‘randomForest’ was built under R version 3.0.2
> insect <- read.csv("d:/data/insects.csv", header = TRUE)
> insectRF1 <- randomForest(insect[,c('L1','L2','L3','L4')], insect[,'species'], importance=TRUE, ntree=10000)
> new.data <- data.frame(L1=20, L2=50, L3=30, L4=20)
> predict(RF1, new.data, type="prob")
Error in predict(RF1, new.data, type = "prob") : object 'RF1' not found


实际的附件后缀是csv,但是论坛上传限制，所以我只能传上xlsx.

唐伯小猫 发表于 2013-11-21 14:55
谢谢楼上2位大侠回复啊，好像这句话就已经开始出错了
insectRF1

insectRF1 <- randomForest(insect[,c('L1','L2','L3','L4')], insect[,'species'], importance=TRUE, ntree=10000)
这句干嘛要有‘’号呢？
insectRF1 <- randomForest(insect[,c(2,3,4,5)], insect[,1], importance=TRUE, ntree=10000) 就行了

Error in predict(RF1, new.data, type = "prob") : object 'RF1' not found
感觉是不是应该写成这样？predict(insectRF1, new.data, type = "prob")

R已经告诉你了没有RF1

谢谢楼上2位大侠回复啊，好像这句话就已经开始出错了
insectRF1 <- randomForest(insect[,c('L1','L2','L3','L4')], insect[,'species'], importance=TRUE, ntree=10000)

因为没有结果输出来：（

package ‘randomForest’ was built under R version 3.0.2
---------------------
升级下R主程序再试

唐伯小猫 发表于 2013-11-21 14:55
谢谢楼上2位大侠回复啊，好像这句话就已经开始出错了
insectRF1

  A      B     C
1 0.8203 0.0977 0.082
attr(,"class")
[1] "matrix" "votes"


这是我得到的结果。

d:/data/insects.csv" 的表头有问题，输入R 后，数据就可能出错了。将表头改为一行，再读入即可了。
参数ntree,设到10000,是根本没有必要的，大数据正常在1500-2000就可以，再大不会改善结果除了增加运算成本。象楼主这样的小数据，300-500 也可以了。

非常非常感谢楼上各位，周末鱼块！

yywan0913 发表于 2013-11-20 14:49
insectRF1

> RF1<-randomForest(insect[c('L1','L2','L3','L4')]，insect['species'],importance=TRUE,ntree=10000)Error: unexpected input in "RF1<-randomForest(insect[c('L1','L2','L3','L4')]?请问这是什么问题啊