Obtain optimal cut point based on Youden index for binary phenotype and log rank test for right censored phenotype.
getcut(pre, act, fam = "Logistic")
predicted value
actual values (class for binary phenotype and Surv object for right censored phenotype)
the family of the outcome, can be "Gaussian", "Logistic" or "Cox"
optimal cut point
# NOT RUN {
x <- rnorm(100)
y <- as.numeric(x + rlogis(100) > 0)
getcut(x, y)
# }
Run the code above in your browser using DataLab