fonction sigmoïde dans le package neuralnet dans R

Question

Je ne peux pas sembler trouver toute la documentation de la façon d'appliquer une fonction sigmoïde dans le package neuralnet, j'ai essayé:

neuralnet(...,act.fct="sigmoid") 

Toutefois, ce retour;

Error: ''act.fct' is not known 

Answer 1

Vous recherchez la "logistique" pour ce package.

neuralnet(..., act.fct = "logistic") 

Cela dit cependant, si vous avez une fonction qui est pas là (et il n'y a pas beaucoup dans ce package) vous pouvez passer la fonction vous-même.

library(neuralnet) 

data(infert) 

set.seed(123) 
net.infert <- neuralnet(case~parity+induced+spontaneous, infert, 
         err.fct="ce", linear.output=FALSE, likelihood=TRUE) 

sigmoid = function(x) { 
    1/(1 + exp(-x)) 
} 

set.seed(123) 
net.infert2 <- neuralnet(case~parity+induced+spontaneous, infert, 
         err.fct="ce", linear.output=FALSE, likelihood=TRUE, 
         act.fct = sigmoid) 

all.equal(net.infert$weights, net.infert2$weights) 
[1] TRUE