jm=read.table("clipboard")
factor=data.frame(V1=as.factor(jm$V1))#将目标变量转化为因子型
sample1=data.frame(V2=as.numeric(jm$V2),V3=as.numeric(jm$V3),V4=as.numeric(jm$V4),V5=as.numeric(jm$V5))
normalize1=function(x){return((x-min(x))/(max(x)-min(x)))}
samplenorm1=as.data.frame(lapply(sample1,normalize1))
sample2=data.frame(V6=as.numeric(jm$V6))
normalize2=function(x){return((max(x)-x)/(max(x)-min(x)))}
samplenorm2=as.data.frame(lapply(sample2,normalize2))
jm=cbind(factor,samplenorm1,samplenorm2)

library("neuralnet")
concrete_model=neuralnet(V1~V2+V3+V4+V5+V6,data=jm,hidden=5,threshold=0.001,rep=20)


最后这步要运行很久才能出来，而且结果错误，原因是：参数长度为0
大家知道这怎么解决吗？