由于匹配错误，无法在Rstudio中建立用于回归的神经网络

Question

我是一名学生，第一次尝试构建用于回归的神经网络来预测我的变量Math_G3。但是由于以下错误，我无法执行此操作：

  

x-y中的错误：不合格数组   另外：警告消息：   1：在cbind（1，act.temp）中：     结果的行数不是向量长度的整数（arg 1）   2：在cbind（1，act.temp）中：     结果的行数不是向量长度（arg 1）的倍数

     

match（x，table，nomatch = 0L）中的错误：     “匹配”需要向量参数

这是我的代码：

index_train_math<-sample(1:nrow(dat_math),0.6*nrow(dat_math))
#from 1st row to end , put random 70 % AS TRAINING DATA
train_math <- dat_math[index_train_math,]
# training data of math    
maxs <-apply(dat_math,2,max)
mins <- apply(dat_math,2,min)
scaled <- as.data.frame(scale(dat_math,center = mins,scale=maxs-mins))
#returns a matrix that needs to be coerced into a data frame
train_math <- scaled[index_train_math,]
test_math <- scaled[-index_train_math,]
n_math <- names(train_math)
f_math <- as.formula(paste("Math_G3 ~ traveltime + studytime + failure + famrel + goout + Dalc + Walc + health + absences + Math_G1 + Math_G2", paste(n_math[!n_math %in% "Math_G3"], collapse = " + ")))
nn <- neuralnet(f_math,data=train_math,hidden=c(5,3),linear.output=T)

以下是我的数据集的预览：

我可以知道我的代码有什么问题以及如何解决它吗？谢谢！