Ben ilgili bir soru sormak istiyorum bu bir .
Burada xgboost için özel kayıp fonksiyonu yazma bir örnek buldum :
loglossobj <- function(preds, dtrain) {
# dtrain is the internal format of the training data
# We extract the labels from the training data
labels <- getinfo(dtrain, "label")
# We compute the 1st and 2nd gradient, as grad and hess
preds <- 1/(1 + exp(-preds))
grad <- preds - labels
hess <- preds * (1 - preds)
# Return the result as a list
return(list(grad = grad, hess = hess))
}
Lojistik kayıp fonksiyonu
burada log-olasılıktır ve etiketlerdir (0 veya 1).y
Benim sorum: nasıl degrade (birinci türev) sadece gerçek değerler ve tahmin edilen olasılıklar arasındaki farka (log-odds olarak hesaplanır) nasıl eşit olabiliriz preds <- 1/(1 + exp(-preds))
?