0

from で(survivalパッケージで作成した)生存曲線を描く方法を知っています。ここでもサバイバル パッケージのデータ フレームを使用します。autoplotggfortifyovarian

library(survival)
library(ggfortify)

autoplot(survfit(Surv(ovarian$futime, ovarian$fustat) ~ ovarian$resid.ds))

次のように、survfit 関数に列名のみを指定し、データ フレームを個別に指定することができます。

autoplot(survfit(Surv(futime, fustat) ~ resid.ds, data = ovarian))

これはうまく機能します。私がやりたいのはdata、最初に引数を付けて独自の関数にラップすることです。これにより、膨大な数の新しいデータフレームを作成することなく、パイプを使用してデータフレームを事前にフィルター処理できます。

これは機能です:

 myfun <- function(data, time, event, group){
      autoplot(survfit(Surv(time, event) ~ group, data))
 }

ただし、呼び出すとエラーが発生します。

myfun(ovarian, futime, fustat, resid.ds)

Error in Surv(time, event) : object 'futime' not found 

何か不足していますか?

4

1 に答える 1