Question

如何以jpeg格式保存输出，高度为2.2英寸，宽度为3.3英寸，分辨率为1000？

这是我目前的代码

tar <- survfit(Surv(Y1$survialNew,Y1$p_censor) ~ 1 + 
Y1$Previous_Sternotomy + Y1$PGD_Grade1)
ggsurvplot(tar, data = Y1, xlab="Months Post Transplant", 
  ylab="Overall Survival", pval = TRUE)

有人可以建议我下一行代码吗？或者，如果我们可以将所有内容放入ggsurvplot？

谢谢，塔里克

Answer 1

将ggsurvplot的输出存储到变量中，然后将其传递给ggsave：

gg <- ggsurvplot( ... )
ggsave( "myplot.jpg", gg, width = 3.3, height = 2.2, dpi = 1000 )

Answer 2

我遇到了使用ggsurvplot创建高分辨率图的相同问题。我不确定Artem的代码是否有效，因为我尝试过。我认为ggsave应该有所改变

ggsave("myplot.jpg", plot = print(gg), width = 3.3, height = 2.2, dpi = 1000)

添加plot=print()

很重要

ggsurvplot以正确的尺寸保存输出

2 个答案: