ggplot标题部分文字加粗

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

如题。theme函数中只能调整整个标题的格式，如果想要强调标题中的关键字（加粗、变色），应该怎么做呢

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：关键字 怎么做

plot.title

allain 发表于 2018-12-6 15:17
plot.title

不行呀，plot.title只能修改整个标题的属性，可我的需求是：例如标题为“交易金额头部用户”，只把“头部用户”加粗

因为加粗部分标题与统计分析关系不大，因此ggplot2不直接支持，你如果要实现，可以用多图并排的方式得到，但会比较麻烦。

麦田猫你好，请问你的问题解决了吗？ 我刚也碰到同样问题，不知怎么加粗标题中一部分文字

cottonhh 发表于 2019-12-19 16:28
麦田猫你好，请问你的问题解决了吗？ 我刚也碰到同样问题，不知怎么加粗标题中一部分文字

抱歉现在才看到回帖，我最后从StackOverflow找到了解决方案：

例一：（部分加粗）

1. library(ggplot2)
   
2. pre_legend_title = expression(paste(bold("bold part"),
   
3.                                    " plain part"))
   
4. ggplot(mtcars, aes(mpg, wt, fill=factor(cyl))) +
   
5.   geom_point(shape=21) +
   
6.   labs(fill = pre_legend_title)

复制代码

例二：（部分变色）

1. plot(mtcars$mpg, mtcars$wt)
   
2. title(expression("title (" * phantom("slope=1)") * ")"), col.main = "black")
   
3. title(expression(phantom("title (") * "slope=1"), col.main = "red")

复制代码

例三：（部分变色）

1. library(ggplot2)
   
2. #devtools::install_github("clauswilke/ggtext")
   
3. library(ggtext)
   
4. p <- ggplot(mtcars, aes(mpg, wt, colour = cyl)) +
   
5.   geom_point(size = 3)
   
6. p + labs(title = "New plot <b style='color:#009E73'>title</b>",
   
7.        subtitle = "A <b style='color:#D55E00'>subtitle</b>") +
   
8.   theme_classic(base_size = 24) +
   
9.   theme(plot.title = element_markdown(lineheight = 1.1),
   
10.         plot.subtitle = element_markdown(lineheight = 1.1))

复制代码