Leave Pair Out Cross Validation

This function returns an optimism-adjusted c-stat. Read more by Gordon Am J Epi 2014.

Usage

get_LPOCV(x)

Arguments

x

data.frame

Value

a numeric value of LPOCV

Examples

input=read.csv(system.file("extdata","demo_input.csv",package="TSM")) # read the example input 
get_LPOCV(x=input[,c("F1","y")]) # get LPOCV of "F1" as a sole predictor
#>      TRUE 
#> 0.8446276 

get_LPOCV(x=input[,c("F1","F2","y")]) # get LPOCV of "F1" and "F2" as two predictors
#>      TRUE 
#> 0.8501221