|
@@ -53,6 +53,9 @@ set.from.list<-function(var,default,...){
|
|
#' * my.labels labels for cases
|
|
#' * my.labels labels for cases
|
|
#' * draw.axis draw title and axis (FALSE)
|
|
#' * draw.axis draw title and axis (FALSE)
|
|
#' * my.n number of classes (2)
|
|
#' * my.n number of classes (2)
|
|
|
|
+#'@return graphical object
|
|
|
|
+#'
|
|
|
|
+#'@export
|
|
|
|
|
|
kaplan.meier.plot.gg<-function(x,var,...){
|
|
kaplan.meier.plot.gg<-function(x,var,...){
|
|
if (!requireNamespace('ggsurvfit',quiet=TRUE)){
|
|
if (!requireNamespace('ggsurvfit',quiet=TRUE)){
|