# Specify a dnn nodel with user define activation function in layer 2.
softmax = function(x) {log(1+exp(x))} # y = log(1+exp(x))
dsoftmax = function(y) {sigmoid(y)} # x = exp(y)/(1+exp(y))
model = dNNmodel(units=c(8, 6, 1), activation= c('relu', 'softmax', 'sigmoid'),
input_shape = c(3))
print(model)
Run the code above in your browser using DataLab