|
@@ -30,6 +30,7 @@ sumWithNA<-function(df,var1='lesionmtv41',var2='metastasesmtv41',outVar='totalmt
|
|
|
#' @param targetVar name of target variable holding status at cutoff (0-dead, 1-alive, 2-censored)
|
|
|
#'
|
|
|
#' @return updated data frame with targetVar
|
|
|
+#' @export
|
|
|
|
|
|
selectValid<-function(df,cutoff=2,timeVar='years_to_event',osVar='st_osMAP',targetVar='osAtCutoff'){
|
|
|
#if alive and ytoevent>c -> alive
|