# \donttest{
# generate data
set.seed(1234)
x <- rnorm(400)
y <- rnorm(400)
z <- rnorm(400) + atan2(x, y)
X <- matrix(cbind(x, y), ncol = 2)
Y <- as.double(z)
# Training
mdl <- ssrnd2NN(X, Y, 10)
# }
Run the code above in your browser using DataLab