Appending Surv objects

rbind method for Surv objects

# S3 method for Surv
rbind(...)

Arguments

...

Surv objects

Value

Surv object

Author

Klaus K. Holst

Examples

y <- yl <- yr <- rnorm(10)
yl[1:5] <- NA; yr[6:10] <- NA
S1 <- survival::Surv(yl,yr,type="interval2")
S2 <- survival::Surv(y,y>0,type="right")
S3 <- survival::Surv(y,y<0,type="left")

rbind(S1,S1)
#>  [1]  2.1175555- -0.5101262-  1.7218264- -0.1387765-  2.4807802- -1.5452457+
#>  [7] -0.2731313+  1.0216431+ -0.6463658+  1.0897070+  2.1175555- -0.5101262-
#> [13]  1.7218264- -0.1387765-  2.4807802- -1.5452457+ -0.2731313+  1.0216431+
#> [19] -0.6463658+  1.0897070+
rbind(S2,S2)
#>  [1]  2.1175555  -0.5101262+  1.7218264  -0.1387765+  2.4807802  -1.5452457+
#>  [7] -0.2731313+  1.0216431  -0.6463658+  1.0897070   2.1175555  -0.5101262+
#> [13]  1.7218264  -0.1387765+  2.4807802  -1.5452457+ -0.2731313+  1.0216431 
#> [19] -0.6463658+  1.0897070 
rbind(S3,S3)
#>  [1]  2.1175555- -0.5101262   1.7218264- -0.1387765   2.4807802- -1.5452457 
#>  [7] -0.2731313   1.0216431- -0.6463658   1.0897070-  2.1175555- -0.5101262 
#> [13]  1.7218264- -0.1387765   2.4807802- -1.5452457  -0.2731313   1.0216431-
#> [19] -0.6463658   1.0897070-