R/youden_index.R

Defines functions youden_index

Documented in youden_index

#' @export
youden_index<-function(Cell1, Cell2, Cell3, Cell4){
  Prev<-(Cell1+Cell3)
  Prev0<-(Cell2+Cell4)
  Sens<-(Cell1/Prev)
  Spec<-(Cell3/Prev0)
  Youden<-(Sens+Spec)-1
  message(paste('Youden Index =',(Youden)))}

Try the ClinSigMeasures package in your browser

Any scripts or data that you put into this service are public.

ClinSigMeasures documentation built on Feb. 25, 2021, 5:08 p.m.