[R프로그래밍] ggplot2:: 여러개의 ggsurvplot 합치기 / arrange multiple ggsurvplots

ggsurvplot 정말 좋은 graphic tool 입니다.

논문 투고를 준비하다보면...
ggsurvplot 을 이용해서 그린 figure 를 하나의 figure 로 합치고 싶을 때가 있습니다. 

이럴때 쓰는 코드를 알려드리겠습니다. 

 

splots <- list()
splots[[1]] <- ggsurvplot object1 
splots[[2]] <- ggsurvplot object2
splots[[3]] <- ggsurvplot object3

sfig1<-arrange_ggsurvplots(splots, ncol=3, nrow=1)

R 코드를 좀 다루어보셨다면 위의 코드를 보고 바로 아시겠지만...
gridExtra::grid.arrange 와는 다르게 survminer::arrange_ggsurvplots 는 객체를 list 로 받아야 합니다.

 

그래서 미리 그린 plot 들을 splots 라는 새로운 list에 묶어주는 과정이 필요합니다.
위의 예시로 만든 figure 는 다음과 같습니다. 

 

내용은 공개할 수가 없는 내용이라 모두 가렸습니다. 양해부탁드립니다.

 

어때요 참 쉽죠?