функция сигмовидной в пакете neuralnet в R

Question

Я не могу найти какую-либо документацию о том, как применить функцию сигмовидной в пакете neuralnet, я попробовал:

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

Однако это возвращается;

Error: ''act.fct' is not known 

Answer 1

Вы ищете «логистику» для этого пакета.

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

что, хотя сказал, что если у вас есть функция, которая не существует (и их не так много в этом пакете) вы можете передать функцию самостоятельно.

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