Description Usage Arguments Author(s) Examples

A program that plot the time to deterioration curves according to the Kaplan-Meier estimation method for all patients or according to treatment arm. Additional information can be added such as the number of patients at risk and the number of the cumulative events

1 2 |

`time` |
vector equals to the time to deterioration or the time to censure |

`event` |
a dummy vector equals to 1 if the patient is deteriorated and 0 if not |

`group` |
the name of the variable corresponding to the treatment arm, only if you want survival curves according to treatment arm. Only two groups are allowed |

`nrisk` |
Boolean equals to |

`nevent` |
Boolean equals to |

`group.names` |
if you want survival curves according to treatment arm, you must give the name of the treatment arms in the |

`t` |
if |

`info` |
Boolean equals to |

`pos.info` |
the position of the Log-rank test and the Hazard ratio on the graph |

`xlab` |
a title for x axis |

`ylab` |
a title for y axis |

Amelie Anota

Maintainer: Amelie Anota <aanota@chu-besancon.fr>

1 2 3 4 5 6 7 8 9 10 11 | ```
# Kaplan-Meier survival curve of the Time until definitive deterioration
# of the score "QoL" with a minimal clinically important difference of 5 points
# as compared to the baseline score
#tudd1=TUDD(dataqol2, score="QoL", MCID=5,ref.init="baseline",ref.def="def1")
#ttd_1=merge(tudd1,unique(dataqol2[,c("id","arm")]))
## In the next graph, we added the number of patients at risk at time t
## and the result of the Log Rank Test and the Univariate Hazard Ratio
## of arm 2 vs. arm 1
#plotTTD(ttd_1$time.5.QoL,ttd_1$event.5.QoL,ttd_1$arm,nrisk=T,nevent=F,
#group.names=c("arm 1","arm 2"),t=seq(0,8,2),info=T,pos.info=c(6,0.8),
#xlab="time (months)",ylab="probability (%)")
``` |

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.