Existe uma maneira fácil de gerar um gráfico de nadador em R? Mesmos dados que em uma curva KM, mas com cada sobrevivência individual representada como uma linha. Exemplo:

Pesquisei stackoverflow, a lista de discussão R-help e consultei o Dr. Google sem uma resposta óbvia, embora minha técnica de pesquisa possa ser abaixo do ideal. Obrigado!

**** ADDENDED **** Desculpas por não fazer uma pergunta adequadamente - esta é a minha primeira vez! Brincando, eu pude fazer o seguinte:

          OS DeathYN TreatmentGroup
4   444 days       1              0
5   553 days       1              0
8   812 days       0              0
1   844 days       0              0
10 1071 days       0              0
9  1147 days       0              0
6  1349 days       0              0
3  1375 days       0              0
2  1384 days       0              1
7  1687 days       0              0

orderedData$GroupColor[orderedData$TreatmentGroup==0] <- "yellow"
orderedData$GroupColor[orderedData$TreatmentGroup==1] <- "red"
orderedData$YCoord <- barplot(as.numeric(orderedData$OS), horiz=TRUE,  col=orderedData$GroupColor, xlim=c(0,max(orderedData$OS) + 50), xlab="Overall Survival")
points(x=20+as.numeric(orderedData$OS), y=orderedData$YCoord,pch=62, col="green")
legend(1000,2, c("Control", "Treatment", "still living"), col=c("yellow","red", "green"), lty=1, lwd=c(10,10,0),pch=62)

Isso me deixa perto o suficiente por enquanto, mas a estética não é perfeita. Se houver um pacote ou uma solução melhor, alguém pode sugerir que eu adoraria vê-lo!