Функция начальной загрузки (BCA) в R - PullRequest
0 голосов
/ 26 октября 2019

Вот моя функция начальной загрузки с AUC:

boot.auc = function(formula, data, indices)
{
# Create a bootstrapped version of our data
d = data[indices,]
# Fit a logistic regression to the bootstrapped data
fit = glm(formula, d, family=binomial)
# Compute the AUC and return it
target = as.character(fit$terms[[2]])
rv = my.pred.stats(predict(fit, d, type="response"), d[,target], display=F)
return(rv$auc)
}

Я хочу преобразовать эту функцию в функцию начальной загрузки с помощью BCA. Как мне нужно изменить это ?? Ниже приведена моя модель логистической регрессии:

model_glm = glm(HD ~., family = binomial, data = heart.train)

model_bic = step(model_glm, k = log(length(heart.train$HD)))

...