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

Question

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

ann <-nnet（Label〜。，data = normed [Train_w_catDS，-1]，weights = data.weights [Train_w_catDS]，size = h，衰落= 5e-4，maxit

= 200）

规范在哪里

规范<-cbind（data_w_catDS [，1：2]，as.data.frame（lapply（data_w_catDS [，-c（1,2）]，function（col）{col / max（abs（col））}）） ）

但我不断收到错误：

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

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