❝今天来主要介绍如何在不引入外部几何对象的前提下在图形的原有的基础上「自定义修改轴文本颜色」,也许恰好您正好有此特殊需求,希望对各位观众老爷有所帮助;下面来看具体案例;
❞
加载R包
library(tidyverse...arrow = arrow(length = unit(0, "npc"),type="closed"))
❝可以看到此处我们使用的「geom_text」在图形内部添加文本并定义颜色...,那如果我们要在图形外部修改轴文本颜色该如何操作,当然有更加简单的方法请往下看
❞
构建数据
df % arrange(id) %>%
mutate(id=as.character...,'cm'),
legend.key.height=unit(0.3,'cm'),
legend.position="top")
一个基础的条形图而已,下面我们就在此基础上修改Y轴文本颜色...,如果我们想自定义任意文本颜色那,继续往下看
自定义个数
x_cols <- rep(c("#EDB749","#4A452A","#3CB2EC","#9C8D58"),time=c(6,5,11,8