我正处于 R 机器学习的初级阶段,我很难相信没有解决不同类型回归算法成本函数的软件包。例如,如果我想解决逻辑回归的成本函数,手动方法如下:
https://www.r-bloggers.com/logistic-regression-with-r-step-by-step-implementation-part-2/
# Implement Sigmoid function
sigmoid <- function(z)
{
g <- 1/(1+exp(-z))
return(g)
}
#Cost Function
cost <- function(theta)
{
m <- nrow(X)
g <- sigmoid(X%*%theta)
J <- (1/m)*sum((-Y*log(g)) - ((1-Y)*log(1-g)))
return(J)
}
##Intial theta
initial_theta <- rep(0,ncol(X))
#Cost at inital theta
cost(initial_theta)
在 glm 函数中有没有办法自动做到这一点?或者对于我应用的每个算法,我是否需要像这样手动执行它?