I have the following code
** testset1 <- data4[1,]
test <- neuralnet :: compute (net, testset1[,1:10]) test $ net.result
predicted = test $ net.result * abs (diff (range (data4[,11]))) + min (data4)[,11])
print (predicted) **
The result gives me 0.42.
How would I have to do to normalize and get the compound data
Greetings and thanks