I should have actually created some test code for you. Here is an example:
library(neuralnet)
data(infert)
# create your formula
fm <- as.formula(paste("case ~ ", paste(colnames(infert)[c(3,4,6)],
collapse="+")))
# call neuralnet
net.infert <- neuralnet(fm, infert,
err.f
Hi Soheila,
You are using the formula argument incorrectly. The neuralnet function has
a separate argument for data aptly names 'data'. You can review the
arguments by looking at the documentation with ?neuralnet.
As I cannot reproduce your data the following is not tested but I think
should w
Dear All,
I want to run "neural network" on my dataset.
##
resp<-c(1,1,1,0,1,0,1,0,1,0,1,0,1,0,1,1,0,1,0,1)
dim(data)
#20*3110
out <- neuralnet(y ~ data, hidden = 4, lifesign = "minimal", linear.output
= FALSE, threshold = 0.1,na.rm = TRUE)
3 matches
Mail list logo