R神经网络

时间:2018-01-03 16:38:21

标签: r neural-network data-analysis

我正在玩成人数据集 https://archive.ics.uci.edu/ml/datasets/adult和R.我正在尝试使用import SimpleSchema from 'simpl-schema'包来训练具有反向传播的神经网络。我已经清理了数据。现在我想尝试运行这部分:

neuralnet

我得到了这个错误:

  

神经元中的错误[[i]]%*%权重[[i]]:需要数字/复杂矩阵/向量参数

P.S:

  1. 我把火车装上干净的火车
  2. n获取数据集的所有名称
  3. f返回n <- names(cleanTrain) f <- as.formula(paste("income~", paste(n[!n %in% "income"], collapse = " + "))) nn <- neuralnet(f, data=cleanTrain, hidden = 10, algorithm = "backprop", learningrate=0.35)
  4. 哪个错误?

1 个答案:

答案 0 :(得分:0)

Hello首先使用一个函数来清除成人数据库,你可以在Statistical Consulting Group找到它,然后如果反向传播算法不起作用,则将所有变量转换为数字。您可以在neural net in R查看示例。最后使用以下代码应用算法。

source("http://scg.sdsu.edu/wp-content/uploads/2013/09/dataprep.r")
train = as.data.frame(sapply(data$train, as.numeric))
train$income = train$income-1

library(neuralnet)
n <- names(train)
f <- as.formula(paste("income~", paste(n[!n %in% "income"], collapse = " + ")))
nn <- neuralnet(f,data=train,hidden=10,err.fct="sse",linear.output=FALSE,algorithm="backprop",learningrate=0.35)
nn

我希望它可以帮到你。问候