如何在R Markdown中为多个组生成生存图

Question

我想在许多群体中绘制一系列生存图。当我在for循环R中使用自动绘图时，Markdown不会产生绘图：

```{r}
library(data.table)
library(survival)
library(ggplot2)
library(ggfortify)
data(veteran)
veteran<-data.table(veteran)
veteran[, under63:=age<62]
for(value in c(TRUE, FALSE)){
  temp.data<-veteran[under63==value]
  km_fit <- survfit(Surv(time, status) ~ trt, data=temp.data)
  autoplot(km_fit)
}
```

但是，当我不使用for循环时，图可以很好地显示：

```{r}
temp.data<-veteran[under63==TRUE]
km_fit <- survfit(Surv(time, status) ~ trt, data=temp.data)
autoplot(km_fit)

temp.data<-veteran[under63==FALSE]
km_fit <- survfit(Surv(time, status) ~ trt, data=temp.data)
autoplot(km_fit)
```

在循环内未生成图的原因是什么？