R/helper_functions.R
In Larsvanderlaan/npOddsRatio: Semiparametric Targeted Maximum-Likelihood estimation of the conditional odds ratio in a partially-linear logistic-link regression model with post-treatment informative missingness.
Defines functions
bound
colMeans_safe
colMeans_safe <- function(X) {
X <- as.matrix(X)
if(ncol(X)==1){
return(mean(as.vector(X)))
}
return(colMeans(X))
}
bound <- function(x, b){
pmax(pmin(x,1-b),b)
}
Larsvanderlaan/npOddsRatio documentation built on May 3, 2022, 12:05 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Defines functions bound colMeans_safe
colMeans_safe <- function(X) {
X <- as.matrix(X)
if(ncol(X)==1){
return(mean(as.vector(X)))
}
return(colMeans(X))
}
bound <- function(x, b){
pmax(pmin(x,1-b),b)
}
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.