Calculate a likelihood ratio test statistic from the output of scan_pvl()

calc_lrt_tib(tib)

Arguments

tib

outputted tibble from scan_pvl

Value

a number, the (log) likelihood ratio test statistic

Examples

rep(paste0('Marker', 1:3), times = 3) -> marker1 rep(paste0('Marker', 1:3), each = 3) -> marker2 runif(9, -1, 0) -> ll tibble::tibble(marker1, marker2, ll) -> scan_out calc_lrt_tib(scan_out)
#> [1] 0.02258411