Displaying 1 result from an estimated 1 matches for "xtiempo_2".
Did you mean:
xtiempo_0
2019 Jul 18
4
Gráfico tiempos de supervivencia
Hola,
Sí, lo puedes hacer de esta forma...
#-----------------
set.seed(20)
DATOS <- data.frame (
ID = c (1:10)
, TIEMPO = sample(1:40, 10, replace=F)
, DEF = as.factor(sample(c(0,1), 10, replace=T))
)
library(ggplot2)
ggplot( data = DATOS ) +
geom_point( aes(x = TIEMPO, y = ID , shape = DEF, color = DEF), size = 5
) +
geom_segment( aes( x = 0, y = ID, xend =