survfit.ypbp {YPBP} | R Documentation |
survfit method for ypbp models
Description
Computes the predicted survivor function for a ypbp model.
Usage
## S3 method for class 'ypbp'
survfit(formula, newdata, ...)
Arguments
formula |
an object of the class ypbp |
newdata |
a data frame containing the set of explanatory variables. |
... |
further arguments passed to or from other methods. |
Value
a list containing the estimated survival probabilities.
Examples
# ML approach:
library(YPBP)
mle <- ypbp(Surv(time, status)~arm, data=ipass, approach="mle")
summary(mle)
ekm <- survival::survfit(Surv(time, status)~arm, data=ipass)
newdata <- data.frame(arm=0:1)
St <- survfit(mle, newdata)
plot(ekm, col=1:2)
with(St, lines(time, surv[[1]]))
with(St, lines(time, surv[[2]], col=2))
# Bayesian approach:
bayes <- ypbp(Surv(time, status) ~ arm, data = ipass,
approach = "bayes", chains = 2, iter = 100)
summary(bayes)
ekm <- survival::survfit(Surv(time, status)~arm, data=ipass)
newdata <- data.frame(arm=0:1)
St <- survfit(bayes, newdata)
plot(ekm, col=1:2)
with(St, lines(time, surv[[1]]))
with(St, lines(time, surv[[2]], col=2))
[Package YPBP version 0.0.1 Index]