如何在R的ggplot标题中同时使用换行(\n)与斜体格式

方法1：使用expression()结合atop()（原生ggplot支持） #

你之前的错误在于将atop()嵌套在paste()里，atop()本身就是用于创建多行表达式的工具，直接拆分两行内容即可：

library(tidyverse)

# 用atop直接拆分两行，*连接普通文本与斜体元素
mytesttitle <- expression(atop("Summary of Days with "*italic("Weather"), 
                               "Suited with extra words to make this longer, 2012-2021"))

ggplot(data=samp1) + 
  geom_boxplot(aes(y=value))+
  labs(y="Number of Days", title=mytesttitle) +
  theme(
    axis.text.x = element_blank(), 
    axis.ticks.x=element_blank(),
    plot.title = element_text(hjust = 0.5, size=12) # 调整大小避免溢出，同时居中
  )

方法2：使用ggtext包（更直观的markdown语法） #

如果觉得表达式语法繁琐，ggtext支持直接用markdown格式控制标题，更灵活：

library(tidyverse)
library(ggtext)

# 用markdown语法标记斜体，<br>实现换行
mytesttitle <- "Summary of Days with *Weather*<br>Suited with extra words to make this longer, 2012-2021"

ggplot(data=samp1) + 
  geom_boxplot(aes(y=value))+
  labs(y="Number of Days", title=mytesttitle) +
  theme(
    axis.text.x = element_blank(), 
    axis.ticks.x=element_blank(),
    plot.title = element_markdown(hjust = 0.5, size=12) # 必须用element_markdown替代element_text
  )

关键注意点 #

• 原生expression()方案中，不要用\n换行，atop()会自动拆分两行；用*连接普通文本和italic()元素，无需嵌套paste()。
• ggtext方案更易读，支持所有markdown格式，适合复杂排版需求。
• 调整plot.title的size参数可以避免标题溢出可视区域。

内容的提问来源于stack exchange，提问作者John Polo