请问：      如何用survminer包画生存曲线时调整risk table title 的位置？（我用的是survival包里面自带的数据库lung）

以下是代码：
library(survminer)
> fit<- survfit(Surv(time, status) ~ sex, data = lung)
> ggsurvplot(fit, data = lung, risk.table = TRUE, pval = TRUE, conf.int = TRUE,
+ tables.theme = theme_cleantable()
+ )

就是把图1（左边）中的 number at risk 移动到 图1（右边）的位置
谢谢！