R/pi0_estimators.R
In nignatiadis/IHW: Independent Hypothesis Weighting
Defines functions
weighted_storey_pi0
weighted_storey_pi0 <- function(pvalues, weights, tau=0.5, m = length(pvalues)){
w_inf <- max(weights)
num <- w_inf + sum( weights * (pvalues > tau))
num/m/(1-tau)
}
nignatiadis/IHW documentation built on Aug. 22, 2023, 2:11 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 weighted_storey_pi0
weighted_storey_pi0 <- function(pvalues, weights, tau=0.5, m = length(pvalues)){
w_inf <- max(weights)
num <- w_inf + sum( weights * (pvalues > tau))
num/m/(1-tau)
}
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.