net <- network( dims = c(5,10,2),
activ=list(ReLU(),softmax()))
net <- network( dims = c(100,50,50,20),
activ=list(ReLU(),ReLU(),softmax()),
regulariser=L1_regularisation())
Run the code above in your browser using DataLab