R中neuralnet包中的Sigmoid函数

R中neuralnet包中的Sigmoid函数,r,neural-network,sigmoid,R,Neural Network,Sigmoid,我似乎找不到任何关于如何在neuralnet软件包中应用sigmoid函数的文档,我尝试了: neuralnet(...,act.fct="sigmoid") 然而,这又回来了 Error: ''act.fct' is not known 您正在寻找该包裹的物流服务 neuralnet(..., act.fct = "logistic") 也就是说,如果您有一个不在其中的函数,而该包中的函数不多,那么您可以自己传递该函数 library(neuralnet) data(infert)

我似乎找不到任何关于如何在neuralnet软件包中应用sigmoid函数的文档,我尝试了:

neuralnet(...,act.fct="sigmoid")
然而,这又回来了

Error: ''act.fct' is not known

您正在寻找该包裹的物流服务

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

您正在寻找该包裹的物流服务

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