R/trimLogit.R

In SuperLearner: Super Learner Prediction

Defines functions trimLogit

Documented in trimLogit

trimLogit <- function(x, trim=0.00001) {
	x[x < trim] <- trim
	x[x > (1-trim)] <- (1-trim)
	foo <- log(x/(1-x))
	return(foo)
}

Try the SuperLearner package in your browser