R/utils.R
PPV.Rd
Calculate the PPV index between two sets
PPV(a, b)
an vector or list, predicted value
an vector or list, true value
scalar, PPV index
set.seed(926) a <- sample(1:100, 50) b <- sample(1:100, 50) PPV(a,b) #> [1] 0.52