This uses equation 10 in Lee et al. A Better Coefficient of Determination for Genetic Profile Analysis. Genetic Epidemiology 36: 214–224 (2012) https://doi.org/10.1002/gepi.21614.

get_r_from_lor(
lor,
af,
ncase,
ncontrol,
prevalence,
model = "logit",
correction = FALSE
)

## Arguments

lor Vector of Log odds ratio. Vector of allele frequencies. Vector of Number of cases. Vector of Number of controls. Vector of Disease prevalence in the population. Is the effect size estimated from the "logit" (default) or "probit" model. Scale the estimated r by correction value. The default is FALSE.

## Value

Vector of signed r values