# NOT RUN {
library(keras)
model = keras_model_sequential()
model %>% layer_dense(20, input_shape = 10, activation = "relu")
model %>% layer_dense(4, activation = "softmax")
keras::compile(model, loss = "mae", optimizer = keras::optimizer_sgd(lr = 0.4))
val = makeValueFunction("neural.network", model = model)
# }
Run the code above in your browser using DataLab