在ggsurvplot中将绘图标题居中
可以通过修改ggplot2中的主题参数来实现。具体操作如下：
- 首先，确保已安装并加载了ggplot2和survminer包。
install.packages("ggplot2")
install.packages("survminer")
library(ggplot2)
library(survminer)- 创建一个生存曲线对象，并使用theme()函数来修改绘图主题参数。
# 创建生存曲线对象
surv_object <- ggsurvplot(survfit_object)
# 修改主题参数
surv_object + theme(plot.title = element_text(hjust = 0.5))在上述代码中，hjust = 0.5表示将标题水平居中。可以根据需要调整该值以达到期望的效果。
- 运行以上代码后，将得到一个居中显示标题的生存曲线图。
在该答案中，推荐的腾讯云相关产品是「云服务器 CVM」，该产品提供了可弹性伸缩的云服务器实例，适用于各种计算场景，包括但不限于 Web 应用、企业应用、批处理、游戏服务器等。详细的产品介绍和文档可以在腾讯云官网找到。
请注意，以上答案仅供参考，具体的推荐产品和产品介绍链接地址可能需要根据实际情况进行调整。
相关·内容
2回答
我想在ggsurvplot中添加标题。这是我的代码：
library(survival)
library(survminer)
fit <- survfit(Surv(time, status) ~ sex, data = lung)
ggsurvplot(fit, data =lung, main = "This is title")
它生成情节，但没有标题。如果添加risk.table = TRUE，那么我将标题放在risk表的顶部，而不是主图。
library(survival)
library(survminer)
fit <- survfit(Surv
浏览 4提问于2017-05-02得票数 1
回答已采纳
1回答
在调用ggsurvplot(...)之后，我想叠加另一个数据框df中的一些点，该数据框包含两列time和survival。我正在寻找实现这一点的技巧。 编辑:一些代码作为示例 require("survival")
require("survminer")
fit<- survfit(Surv(time, status) ~ sex, data = lung)
# Basic survival curves
ggsurvplot(fit, data = lung)
# Example points
x <- fit$time
y <- f
浏览 22提问于2020-10-15得票数 1
回答已采纳
我想在整个图下面添加一行文本。然而，ggsurvplot似乎将plot和risk-table作为两个实体来处理。我希望是这样的：enter image description here 然而，这是在MS Word中添加的，杂志要求将其嵌入到图片本身中，而我无法做到这一点。 谢谢:-) ggsurvplot(fit = fit, data = dat, pval = TRUE,
color = "black",
risk.table = T,
break.time.by = 12,
surv.scale = "
浏览 204提问于2021-04-05得票数 0
我有以下代码，其中我正在构建一条带有百分比而不是比例的生存曲线。我也将生存时间缩短了十倍。我想从下面的图中删除百分比符号，因为我想将它添加到该图的ylab标题中。 library(survival)
library(survminer)
data(lung)
fit <- survfit(Surv(time, status) ~sex, data = lung)
ggsurvplot(fit, risk.table = TRUE, axes.offset = FALSE,
break.y = 0.10,
surv.scale = c("
浏览 32提问于2020-05-01得票数 3
回答已采纳
如何将输出保存为高2.2英寸、宽3.3英寸、分辨率为1000的jpeg格式？
这是我当前的代码
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
浏览 7提问于2018-02-06得票数 1
回答已采纳
1回答
定制标题(添加斜体)
、、、、
我期待着定制我的ggsurvplot标题，使其在其中的一个词是斜体。我已经尝试过更“经典”的代码，即ggplots中的单词，但它们在这方面似乎不起作用。
下面是我正在做的事情的一个例子：
library(survival)
library(survminer)
fit <- survfit(Surv(time, status) ~ sex, data = lung)
plt1 <- ggsurvplot(fit, data =lung, title = "Adding *italics* to the Title")
plt1
[plt1 ][1]
plt2 &l
浏览 4提问于2022-03-30得票数 0
回答已采纳
我需要在生成的2个Kaplan Meier曲线图中添加字母，例如A和B 代码 library(survminer)
# Fit survival curves
require("survival")
fit<- survfit(Surv(time, status) ~ sex, data = lung)
# List of ggsurvplots
require("survminer")
splots <- list()
splots[[1]] <- ggsurvplot(fit, data = lung, risk.table = TRUE
浏览 37提问于2021-08-22得票数 2
回答已采纳
我想创建一条具有95%-CI的KM曲线，并放大x轴以显示0-60个月之间的值。在我使用xlim之前，ggsurvplot都能很好地工作。 ggsurvplot(fitLC, data = KMSCC,
risk.table = TRUE,
conf.int=TRUE,
pval = TRUE,
break.x.by = 12,
xlab ="Time in Months",
ylab="Relative Survival",
ggtheme = theme_
浏览 46提问于2021-10-26得票数 2
回答已采纳
我有以下图：
ggplot(cars, aes(x = speed)) +
geom_bar()+
labs(title="speed",
subtitle="other info")+
theme(plot.title = element_text(hjust = 0.5),
plot.subtitle = element_text(hjust = 0.5))
主题层将打印标题和副标题居中。
但是，当我添加theme_minimal()时，居中不再适用。我猜theme_minimal覆盖了主题规范。
ggplot(c
浏览 18提问于2019-07-10得票数 2
回答已采纳
2回答
R生存曲线图图
、、、
我有张桌子看起来像这样：
ID Survival Event Allele
2 5 1 WildType
2 0 1 WildType
3 3 1 WildType
4 38 0 Variant
我想做一个kaplan meier图，告诉我野生型或变体是否会存活更长的时间。
我有这样的代码：
library(survival)
Table <-read.table("Table1",header=T)
fit=survfit(Surv(Table$Survival,Table$Event)~Table$Allele)
plot
浏览 3提问于2014-08-07得票数 1
回答已采纳
2回答
我使用的是冲浪者软件包，我想更改风险表的“风险中的数字”标题的字体大小。尺寸太大了。
library(survminer)
p<- ggsurvplot(fit, data = final,
size = 0.8,
censor= FALSE,
font.main = 10,
#font.x = 10,
#font.y =10,
legend = c (0.25,0.2
浏览 7提问于2017-09-21得票数 2
回答已采纳
我正在使用带有Gutenberg编辑器的Wordpress 5.2.2。添加图像时，无论图像本身是左对齐、右对齐还是居中对齐，标题总是左对齐的。我只是想让我的标题文本居中的图像。
这在纯html/css中很容易解决，但在Gutenberg中似乎不是。我的解决方法是在Gutenberg中插入一个"Classic“块，并在那里插入媒体按钮中的图像。
有没有更好的方法，或者我遗漏了什么，或者这是Gutenberg的缺点？
浏览 17提问于2019-07-21得票数 1
回答已采纳
1回答
我试图为我的生存分析图反转x和y(使用survival/survminer包)，但是当我将coord_flip()添加到这行代码中时： ggsurvplot(poop_fit, data = egg.data, pval = TRUE, conf.int = TRUE, coord_flip()) 我得到了这个错误： Error in .apply_surv_func(df, fun = fun) : Invalid 'fun' argument 有没有人知道在生存分析中有没有另一种方法来反转坐标？
浏览 53提问于2021-01-21得票数 1
回答已采纳
1回答
我试图在R中创建一个漂亮的生存图，是否可以在用ggsurvplot()函数创建的生存图中添加一条垂直线？我想用这种方式来显示时间阈值。
我已经尝试过使用abline()函数，如下所示。
surv_object <- Surv(time = data1$survive_time)
fit1 <- survfit(surv_object~sex,data = data1)
ggsurvplot(fit1, data = data1, pval = TRUE, xlab="Time [days]", risk.table="percentage",surv
浏览 0提问于2018-06-28得票数 2
回答已采纳
我只希望每秒钟有标签，但在我的图表中的每一个数字都有小的标记。正如你在我添加的图中所看到的，标签是X轴上每2次勾选一次。
但我想要在Y轴上得到这样的结果：
ggh4x和if_elfse可以使用ggplot实现这一点。但我找不到办法在ggsurvplot上做这件事。这是我的第一张照片的代码。第二张图片的代码可以在这里找到：
ggsurvplot(fit, data = d,
conf.int = F,
censor = F,
palette = c("green", "purple&
浏览 10提问于2022-06-25得票数 -2
回答已采纳
1回答
我参与了一个项目，在这个项目中，我们正在为一个发病率很低的事件绘制生存曲线，而Kaplan曲线(用survminer绘制)是相当平坦的。我不想简单地放大Y轴，因为我认为发病率可能会被读者误解。一种既显示“真实”比率又放大最终微小差异的方法之一是像NEJM那样：
。
但是，我还没有找到在survminer中直接这样做的方法。为了可重现性起见，我想避免涉及任何Adobe软件。
有没有人知道如何获得一个小的，放大的版本，包括在原来的图表之上？我想用survminer来完成这个任务，但是对于任何其他好的基于ggplot包的提示都是非常感谢的。
小例子：
library(survival)
librar
浏览 0提问于2018-11-13得票数 0
回答已采纳
1回答
我希望这个例子能起作用。我想知道是否有一种方法可以提取生存曲线上每个点的坐标。我从?plot.survfit了解到，它将生成一个带有每个类末端坐标的值，但我想知道这条线发生变化的所有点
library(survival)
status <- c(1,0,0,0,0,0,0,1,1,0,0,0,0,0,0,0,0,1,0,0,0,0,1,0,1,1,1,1,1,1,1,1,0,0,0,0,0,0,1,0,1,1,0,0,1,1,0,0,0,0)
classification <- c(1,1,1,2,2,2,2,2,2,2,3,3,3,3,4,4,4,4,4,4,5,5,5,5,5,
浏览 45提问于2018-06-01得票数 -1
我正在使用Google，我在一个标题中放了一些文本，它显示在页面顶部非常近的地方。我想定位文本，使之垂直居中，介于页面顶部和顶部边缘底部之间。例如，如果页面的顶部页边距为1"，我希望文本显示在页面最上面的0.5“左右。在默认情况下，这类似于OS上的页面。我该怎么做？
浏览 0提问于2015-08-25得票数 9
回答已采纳
2回答
我对堆栈溢出很陌生，这里是我的第一个问题:)我想知道是否有类似于"geom_smooth“的函数，但是对于使用"ggsurvplot”生成的图。下面是我想要做的一个例子，使用R“卵巢”数据集：
创建一个“生存对象”：
library(survival)
surv_object <- Surv(time = ovarian$futime, event = ovarian$fustat)
根据以前拟合的模型创建一条“生存曲线”：
fit1 <- survfit(surv_object ~ rx, data = ovarian)
绘制“冲浪”对象：
library(sur
浏览 4提问于2019-03-19得票数 2
1回答
我用朱莉娅的PGFPlots.jl包制作数字。我希望图形的标题是对齐的，而不是默认的居中。这是我在朱莉娅语言中的MWE：
using PGFPlots
p = Plots.Linear3(rand(10), rand(10), rand(10), mark = "none")
Axis(p, title = "(a)")
默认情况下，所获得图形的标题是对齐中心的。我如何修改上面的Julia代码，使标题"(a)“保持对齐？
提前谢谢你。
浏览 4提问于2020-11-06得票数 2
回答已采纳
我试图为两种不同人群的三种不同癌症做一个生存规划。我希望每种癌症类型都有一种颜色，不同人群之间的差异是直线型(虚线与实心)。所以癌症A是红色的，PopA有虚线，PopB有实线，等等。
我似乎不能得到每一个癌症组的一种颜色，然后改变人群之间的线型。
我不能在这里发布所有的数据，因为它是受保护的，但是这里是df、surv函数和ggsurv图：
library(tidyverse)
library(survminer)
library(survival)
library(KMsurv)
library(ggfortify)
library(ggthemes)
> srv_time_mon &
浏览 1提问于2018-07-17得票数 2
回答已采纳
1回答
我正在尝试运行ggsurvplot_facet()，但无法通过Error in model.frame.default(formula = surv_object2 ~ id, data = list( :variable lengths differ (found for 'id')。任何帮助都将不胜感激。 我认为错误出现在survfit()/surv_fit()组件中，而不是ggsurvplot_facet()组件中。 数据可以在here上找到。 我的代码如下： library(survival); library(survminer)
read.csv(file =
浏览 46提问于2020-01-30得票数 1
回答已采纳
假设我将这个图分割成一个2x2的网格par(mfrow=c(2,2))，我想为每个图都加上一个标题(所以有4个图，4个不同的标题)。然而，我的标题真的很长；例如，ABCDEFGCDEFGPOLINTDEEGHABCDEFGPOLINTDEEGHGSBJWDNLEBDLJHWEBDYB (真正的标题是名称的组合，但由于隐私问题，我不能将其放在这里，但它与示例基本相同)。标题的长度从4到120个字母不等。我怎样才能完美地填入标题？它们是可读的，并且不会耗尽情节。*我正在使用基本函数plot，而不是ggplot，继续使用这个函数将是很棒的。 我尝试在plot中将标题绘制为text text而不是t
浏览 8提问于2020-09-13得票数 1
回答已采纳
我需要用居中的ImageView和TextView制作一个标题，如下图所示。
--------------------------------
| |
| ----------- ---------- |
| -ImageView- -TextView- |
| ----------- ---------- |
| |
| -Other Content- |
|
浏览 0提问于2011-09-13得票数 0
回答已采纳
1回答
在R中，我使用ggsurvplot_facet生成sex组的生存曲线，作为一个由可变ecog分层的方面。不过，我也希望在同一方面有一个整体小组。这个是可能的吗？
ggsurvplot_add_all没有帮忙。
以下是一些示例数据：
library(survminer)
lung$ecog <- ifelse(lung$ph.ecog == 0, 0, 1)
fit <- surv_fit(Surv(time, status) ~ sex, data = lung)
fig_os <- ggsurvplot_facet(fit, data = lung, facet.by =
浏览 10提问于2022-10-01得票数 0
我试图在数据可用时显示一个图表和标题为"Graph Not available“的临时图表，但无法正常工作。我在这里读到了一个帖子，上面有关于居中标题的空图的有用信息，但在闪亮的应用中解决不了这个问题。有什么想法吗？提前感谢！ 以下是我试图在shiny服务器中使用的代码。 observeEvent(input$selected_city, {
if(input$selected_city %in% scenario$place)
{
output$Scenario <-
renderPlotly({
legendtitle <-
浏览 16提问于2020-07-14得票数 2
回答已采纳
我有一个Picturebox，我在其中绘制了一个视图(在本例中为Gantt view )，它工作正常-即，视图已绘制，并且AutoScroll属性允许平滑地滚动PictureBox中的图像。
我的问题是，当我向下滚动图像时，图像的标题(例如，本例中的日期标题)会滚动到显示屏的顶部。
我不能解决的是如何将头部固定在顶部。我想过简单地在另一个图片框中绘制一个标题，但随后我不确定如何将标题与主Picturebox的左右滚动同步
有没有人可以建议最好的方法来处理这个问题，或者我是否需要恢复到直接绘制并自己处理滚动？
我正在使用VS 2015的VB。
非常感谢
菲尔
更新-我现在使用的是屏幕外的位图，但
浏览 0提问于2015-12-22得票数 0
我正在尝试运行一个简单的循环，包括1)运行模型和2)保存图。我最终会运行成吨的这些东西！
我遇到的问题是这样的。为了用我正在使用的方法保存绘图，我必须“调用”绘图，如下所示：
png(file=paste(ImageDirectory,"\\","i0.png",sep=""), width = 1000, height = 500)
i0
dev.off()
这是成功的。但是，在循环中，不会渲染绘图。相反，R只是将打印名称打印为字符串。
# Attempted and Failed Loop
images <- c("i1"
浏览 21提问于2020-05-15得票数 0
回答已采纳
2回答
有没有一种在VI中轻松创建文本标题的方法？我想创建一个像下面这样的标题，而不必为了居中而计算字符。
# ********** a centered title **********
有什么伏都教的吗？一种更好的方法？
浏览 0提问于2009-07-22得票数 3
回答已采纳
1回答
从ggsurvplot文档中，我可以对ggplot对象进行刻面，如下所示。
#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# Facet ggsurvplot() output by
# a combination of factors
#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# Fit (complexe) survival curves
#++++++++++++++++++++++++++++++++++++
require("survival")
fit3 <- survfit( Surv(t
浏览 29提问于2021-02-17得票数 2
当使用ggsurvplot()绘图时，希望通过分类变量对生存曲线进行着色，该分类变量是用于定义曲线(地层)的分类变量的超集。我已经阅读了所有的文档，并搜索了答案，但没有成功。下面提供了可重现的代码，尽管实际的ggsurvplot()函数调用是伪代码。
library(survival)
library(survminer)
veteran <- veteran
veteran$group <- with(veteran,
ifelse(
celltype == "squamous&
浏览 9提问于2017-06-16得票数 1
回答已采纳
为什么ggsurvplot_facet()会忽略pval.size 我试图使用ggsurvplot_facet()更改生存图中p值文本的大小，但对pval.size的调用似乎被忽略了。如果有人能帮我改变生存图中的p值大小，我将不胜感激。 可重现的例子： library(survival); library(survminer)
fit <- survfit( Surv(time, status) ~ sex, data = colon)
ggsurvplot_facet(fit, colon, facet.by = "rx", palette = "jco&
浏览 40提问于2020-01-30得票数 0
回答已采纳
如何将xlabel的位置居中，使其位于图形的中间？在使用LaTeX时，我希望xlabel的中心与标题的中心对齐。
浏览 215提问于2012-06-25得票数 1
我在rmarkdown文档的开头使用knitr::opts_chunk$set(fig.align = "center")来设置图形的对齐方式。当我输出HTML文件时，静态图形是居中对齐的，但是HTML，比如来自leaflet()和ggplotly()的输出具有缺省对齐方式(左对齐)。是否有强制HTML小部件居中的选项？
编辑:示例如下。
---
title: "test"
output: html_document
---
```{r setup, include=FALSE}
中心(echo= TRUE，fig.align =“knitr：：opts_ch
浏览 1提问于2017-06-09得票数 2
我希望将这两个地块集中在一个地块上。这将使我能够在视觉上评估分布的拟合优度的同时，检查长期存活率如何演变。
你能帮帮我吗?
library(survminer)
require(flexsurv)
data(bc)
su_obj <- Surv(bc$rectime, bc$censrec)
fit_0 <- do.call(flexsurvreg, list(formula =su_obj~group, data = bc, dist = "exponential"))
ggsurvplot(fit_0)
time_0 = 5000
s
浏览 1提问于2019-12-21得票数 0
2回答
有人知道如何在R的ggsurvplot中改变线条粗细吗？我尝试了几种方法，包括使用size (如下所示)，但都不起作用。在我的输出和导出的图表中，线条仍然很粗。 到目前为止，我所拥有的代码非常基础： library(survminer)
fit <- survfit(Surv(Time, Outcome) ~ Predictor, Confounder, data = Mydata)
ggsurvplot(fit, size = 0.2, data = Mydata) 感谢大家的帮助！
浏览 488提问于2019-05-10得票数 1
回答已采纳
我对我的标题栏使用了一个基于ConstraintLayout的自定义布局。我需要居中的标题文本，而不是重叠的按钮在任何一边。目前我已经让标题在侧边按钮之间居中，但由于它们的宽度不同，所以标题不在父视图中居中。
这是它当前的样子(在两个按钮之间居中，而不是在父按钮中居中)：
有没有办法使标题在父级中居中，同时确保它不会与两侧的按钮文本重叠(因为这是可以改变的)？
更复杂的是，如果没有足够的空间让标题和按钮文本都完整显示，我还希望它是标题而不是按钮文本。
如果我将标题的两个边都限制在父级，并将其设置为换行宽度，那么它几乎可以正常工作，直到按钮文本变得有点长。
浏览 23提问于2019-06-12得票数 4
1回答
我正在努力让我的剧情标题到中心使用ggsurvplot... 我看到一些帖子提到了像xxxx$plot + theme(....)这样的东西，但这个解决方案似乎对我不起作用。 这是我的代码，也许你可以看到我遗漏了什么： surv_object_CA19.9 <- Surv(time = data_OS$OS_Days / 30, event = data_OS$Status.Death)
CA19.9_surv_fit <- survfit(surv_object_CA19.9 ~ CA19.9.initial_status, data = data_OS)
CA19.9_OS
浏览 959提问于2020-07-20得票数 1
回答已采纳
我有一个Highcharts 3.0图表，它同时显示柱状图和饼状图(甜甜圈)。这个组合图在之前的Highcharts版本中呈现得很好。
因为升级圆环图只会渲染到最高的y轴线，而不会渲染到该线之上。饼图(圆环图)用于完全呈现，饼图(圆环图)的上半部分位于图表标题的右侧。
有什么想法吗？
我已经添加了一个jsfiddle，对Highcharts提供的组合图()进行了小小的修改，以显示该问题。
我更改的唯一一行是将饼图居中。
center: [300, 1],
浏览 1提问于2013-03-26得票数 0
回答已采纳
在Windows8或2012机器中，有没有办法(本质上)左对齐窗口标题？
窗口8或2012中的窗口标题水平居中对齐。
我们有一个移植到Windows 8/ 2012计算机上的WPF应用程序。我们正在和我们的几个客户一起测试它，客户需要窗口的标题左对齐，就像在Windows7或XP中一样。
我知道我们可以在WPF中使用ControlTemplate来做到这一点，但是对于这个小东西来说那太多了。
我确信，随着更多的应用程序被移植到Windows 8/ 2012，这个问题将会出现。
有什么快速的解决方案吗？或者你知道微软是否会在Windows8或2012的最终版本中提供这种灵活性？
浏览 0提问于2012-08-06得票数 11
回答已采纳
0回答
在R中使用ggsurvplot函数做生存曲线报错，我的代码如下：
> s<-survfit(Surv(FFSt,FFSs==1)~time,data=f)
> p1<-ggsurvplot(s, size=1.3,data=f,palette=c('#00c000','#0000c0', '#ff0000'),legend="none",ylab="Failure free survival",xlab = "Months",censor = FALSE,break.x.by
浏览 173提问于2022-10-15
5回答
我有一个与par(mfrow=c(2,2))一起绘制的4个图的汇编。我想为上面的2个图画一个共同的标题，并为下面的2个面板画一个共同的标题，在2个左右的图之间居中。
这个是可能的吗？
浏览 0提问于2013-02-02得票数 67
回答已采纳
1回答
在图上绘制矩形
、、
我在用ggsurvplot图绘制生存曲线比较图。我想通过在x轴的两个值之间画一个阴影矩形来定制我的图形。我该怎么做？
假设我正在运行以下代码：
require("survival")
fit<- survfit(Surv(time, status) ~ sex, data = lung)
# Basic survival curves
ggsurvplot(fit, data = lung)
假设我想在时间0到时间250之间添加一个阴影矩形。
提前谢谢
卢卡
浏览 6提问于2022-10-25得票数 0
我可以使用ggsurvplot绘制一个Kaplan-Meier图，如下所示：
library(survminer)
library(survival)
fit1 = survfit(Surv(time, status) ~ sex, data = lung)
ggsurvplot(fit1, data = lung)
然而，我需要以编程方式绘制许多公里图。我需要将不同的变量作为字符串进行传递。我在下面试过了。
fml = as.formula(paste('Surv(time, status)~', 'sex'))
fit2 = survfit(fml, dat
浏览 2提问于2019-01-15得票数 2
1回答
在R图的图例中插入数学符号
、、、、
我正在使用survminer制作一个带有两条生存曲线的生存曲线图，一条针对在手术中接受了4个红细胞( PRBC )单位的患者，另一个针对接受了4个以上PRBC单位的患者。不幸的是，我无法使用“表达式”或“引号”函数将正确的"<=“符号插入到图例中。
我读过以前关于这个主题的帖子，但是我能够找到的使用expression()和bquote()的指导似乎不能正确地工作。
library(survival)
library(coxed)
library(survminer)
simdata <- sim.survdata(N=300, T=100, num.data.frame
浏览 19提问于2020-03-06得票数 2
回答已采纳
h1标签中的标题在视口中居中。然后，有一个文本区域，它与标题对齐，并在视口中居中。如何在不改变文本区居中的情况下，在文本区的左侧定位一个带数字(例如12)的跨度？
enter code here
此标题在视口中居中
12 This textarea should be centered and aligned with the title
浏览 3提问于2016-02-10得票数 0
我想将使用geom_dl的标签附加到ggsurvplot制作的Kaplan (KM)地块上。如果我使用ggsurvplot的绘图部分，它可以正常工作。
library(survival)
library(survminer)
library(directlabels)
fit <- survfit(Surv(time, status) ~ disease, data = kidney)
surv_km <- ggsurvplot(fit, risk.table = TRUE)
surv_km$plot + geom_dl(aes(label = gsub('disease
浏览 2提问于2020-01-07得票数 0
回答已采纳
我使用survminer R包运行生存概率(Kaplan-Meier)曲线。我是在risk表上设置的，但是，我想更改默认标题"Number at risk“。我怎么能做到呢？ 我使用了以下代码： survAL <- survfit(Surv(time, death) ~ AL.Factor, data = wave1)
ggsurvplot(survAL, legend.title = "Allostatic Load", legend.labs = c("Low",
"Mid", "High"), yli
浏览 335提问于2019-01-07得票数 0
1回答
我正在尝试向ggsurvplot添加工具提示。我正在使用ggiraph来显示这个情节。我在下面添加了一个很小的例子来说明我想做的事情。如果我不在ggsurvplot中添加任何xlim，那么我的代码就会正常工作。以下是工作的代码：
library(survminer)
library(survival)
library(ggiraph)
fit<- survfit(Surv(time, status) ~ sex, data = lung )
g <- ggsurvplot(fit, data = lung)
tooltip <- paste0("Time:&#
浏览 3提问于2017-04-28得票数 1
回答已采纳
2回答
系统偏好设置应用程序具有一个组合的标题栏和工具栏，其中包含垂直居中的按钮和标题。我正试图在我的应用程序中完全模仿这一点。我已经能够使用界面生成器(在NSWindow check标题栏和统一标题和工具栏上)组合标题栏和工具栏，但这不会使内容垂直居中。我通过发现，你可以简单地将窗口的titleVisibility设置为NSWindowTitleHidden，这将使红绿灯按钮垂直居中。不幸的是，这当然隐藏了标题。如何在统一的标题栏/工具栏中垂直居中内容，并像系统首选项一样显示窗口的标题-无论是在IB中还是以编程方式？
浏览 1提问于2015-03-21得票数 5
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
即时通信 IM
对象存储活动推荐
腾讯云开发者
