初学R语言,第一个程序就遇到好多问题。
svm.r 文件内容如下:
library(e1071)
loadData <- function(filename){
data <- read.table (filename,skip=2, head =F , sep=',')
data <- data[,-(21:22)]
c = ncol(data)
data <- data[,(4:c)]
data
}
trainModel <- function(data,V23){
fit <- svm(V23 ~ ., data = data)
summary(fit)
fit
}
pridictAns <- function(model, filename ,type = "class"){
t <-read.table (filename, head = T , sep=',',fileEncoding = "UTF-8")
pre <- predict(model,t,type="class")
pre
}
Args <- commandArgs(TRUE)
data <- loadData(Args[1])#"D:\ModelManage\data\2.csv"
model <- trainModel(data,V23)
ans <- pridictAns(model,Args[2])#"D:\ModelManage\data.csv"
cat(ans)
程序在Rstudio里面运行是正确的。
svm.r 和 rscript.exe在同一目录下。
cmd里面执行的命令是
rscript svm.r D:\ModelManage\data\2.csv D:\ModelManage\data.csv
结果如上图,不能正确执行。
百度了很久,也不知道问题出在哪。
多谢各位~