从R中的指数AFT模型生成生存数据

如何解决从R中的指数AFT模型生成生存数据

我希望使用在指数AFT模型（survreg对象）中找到的参数来生成数据集

例如说我们有以下模型

library(survival)
survregExp <- survreg(Surv(futime,fustat) ~ ecog.ps + rx,ovarian,dist = "exponential")
coef(survregExp)

(Intercept)     ecog.ps          rx 
  6.9618376  -0.4331347   0.5815027 

然后，我希望生成一个具有上述beta参数值（-0.433，0.582）的数据集。

我在surv_param_sim包中遇到了survParamSim函数，但这会生成新的时间/状态变量，而不是一个全新的数据集。

data包中的imputeYn函数可从对数正态AFT模型生成生存数据，但是，我找不到为指数AFT模型执行此操作的函数。

谢谢。