r - nnet 在 xj[i] 中给出错误错误：无效的下标类型“列表”

Question

我正在尝试在 R 中运行一个 nnet 脚本：

ann <- nnet(标签 ~ ., data=normed[Train_w_catDS,-1], weights=data.weights[Train_w_catDS], size=h, decay=5e-4, maxit

=200)

规范在哪里

normed <- cbind(data_w_catDS[,1:2], as.data.frame(lapply(data_w_catDS[,-c(1,2)], function(col) { col / max(abs(col)) })) )

但我不断收到错误：

xj[i] 中的错误：无效的下标类型“列表”

经过几天的努力，我一直无法解决它。任何意见，将不胜感激。