Learning rating is not affecting my artificial neural network in R

Question

everyone!

I have the following model to predict the price of houses in a particular neighborhood :

set.seed(100)
index_1<-sample(1:nrow(data),round(