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

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

calc_lrt_tib(scan_pvl_out)

Arguments

scan_pvl_out	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