ggrcs包2.8版本发布—处理了画面细节，增加了修改标签功能

目前本人写的ggrcs包新的2.8版本已经在CRAN上线，目前支持逻辑回归（logistic回归）、cox回归和多元线性回归。2.8版本对双组做图细节做了进一步处理，增加了修改标签功能。并且介绍一下怎么在ggrcs包上修改字体。
在这里插入图片描述
需要的可以使用代码安装

install.packages("ggrcs")

如果原来安装了旧版本，可以通过Rstudio进行升级
在这里插入图片描述

这样就可以升级到最新版本了，新版本，既往的功能我就不介绍了
，新功能修正了一些双组变量绘图的细节，增加了修改变量名称的标签。我一一道来。
先导入R包和数据，这里使用R包自带的吸烟数据

library(rms)
library(ggplot2)
library(scales)
library(ggrcs)
dt<-smoke
dd<-datadist(dt)
options(datadist='dd')
fit<- cph(Surv(time,status==1) ~ rcs(age,4)+gender, x=TRUE, y=TRUE,data=dt)

绘制双组变量曲线图，既往我们绘制双组变量生成的图片为
在这里插入图片描述
改版以后我再来绘制一下，画面更加细腻

ggrcs(data=dt,fit=fit,x="age",group="gender")

在这里插入图片描述
图片的质量明显明显高于原来，有网友问左边的group的标签可以修改吗？改版后增加了修改标签功能。

ggrcs(data=dt,fit=fit,x="age",group="gender",twotag.name=(c("female","male")))

在这里插入图片描述
除此之外，也增加了修改边框颜色功能，让你的图形更加有个性，这里我们改成黄色边框

ggrcs(data=dt,fit=fit,x="age",group="gender",twotag.name=(c("female","male")),bordercol="yellow")

在这里插入图片描述
最后有网友问可以改字体大小吗？可以把字体改成新罗马吗？ggrcs包完全对接ggplot2，改字体太简单了。
先把它设置为一个图片

p<-ggrcs(data=dt,fit=fit,x="age",group="gender",twotag.name=(c("female","male")),bordercol="yellow")

完全是ggplot的改法，想要多大字体，什么部分修改都自己控制

P+theme(axis.text.x = element_text(size = 15),
           axis.text.y = element_text(size = 15),
           axis.title.x = element_text(size = 18),
           axis.title.y = element_text(size = 18),
           text = element_text(family = windowsFont("serif")))

在这里插入图片描述
新罗马就是把windowsFont这里改一下就可以了

p+theme(axis.text.x = element_text(size = 15),
        axis.text.y = element_text(size = 15),
        axis.title.x = element_text(size = 15),
        axis.title.y = element_text(size = 15),
        text = element_text(family = windowsFont("TT Times New Roman")))

在这里插入图片描述

ggrcs包2.8版本发布—处理了画面细节，增加了修改标签功能

猜你喜欢