# NOT RUN {
n = 2000; p = 3
X = matrix(rnorm(n*p), n, p)
W = rbinom(n, 1, 0.4 + 0.2 * (X[,1] > 0))
Y = rbinom(n, 1, 0.2 + 0.2 * (X[,2] > 0) + W * 0.1)
# note that this neural network can fail to converge
nn_helper( X,
Y,
W,
neural.net.W = list( act.fct = "logistic" ),
neural.net.Y = list( act.fc = "logistic" ))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab