Hi i am using the code below to find some partial dependence plots
However, all of these output shows empty plot like this
May I ask if someone can help me on that please?
link for the predictors in the training set: 39.7 KB file on MEGA
link for the target variable in the training set: 9.7 KB file on MEGA
library(ANN2)
set.seed(1)
NN28 <- neuralnetwork(
X=x_train, y=y_train,
hidden.layers=c(11,15),regression=TRUE,
standardize=TRUE,loss.type="squared",
activ.functions="relu",n.epochs=200,
learn.rates=1e-04,val.prop=0.1/0.9,
random.seed=1
)
library(pdp)
NN <- NN28
partial(NN, train = x_train, pred.var = "TMAX",type="regression", plot = TRUE, rug = TRUE)
partial(NN, train = x_train, pred.var = "TMIN",type="regression", plot = TRUE, rug = TRUE)
partial(NN, train = x_train, pred.var = "TOBS",type="regression", plot = TRUE, rug = TRUE)
partial(NN, train = x_train, pred.var = "PRCP",type="regression", plot = TRUE, rug = TRUE)
partial(NN, train = x_train, pred.var = "SNOW",type="regression", plot = TRUE, rug = TRUE)
partial(NN, train = x_train, pred.var = "moon_radian",type="regression", plot = TRUE, rug = TRUE)
partial(NN, train = x_train, pred.var = "Full",type="regression", plot = TRUE, rug = TRUE)
partial(NN, train = x_train, pred.var = "New",type="regression", plot = TRUE, rug = TRUE)
partial(NN, train = x_train, pred.var = "Waning",type="regression", plot = TRUE, rug = TRUE)
partial(NN, train = x_train, pred.var = "Waxing",type="regression", plot = TRUE, rug = TRUE)