我完全懂你遇到的麻烦——默认情况下Plotly的X轴标题是基于X轴的实际数据范围来居中的，当Y轴有超长标签、再遇上小屏幕时，X轴的显示空间被挤得很窄，标题很容易被截断。手动加非断空格的方法不仅笨拙，还达不到真正的全局居中效果。这里有个更靠谱的解决方案：

核心思路：用Annotations替代X轴自带Title #

Plotly的annotations功能可以让我们直接在绘图区域的任意位置添加文本，并且支持基于整个绘图区域（而非单个轴）的坐标定位，完美解决标题居中的问题。

修改后的完整代码 #

data <- data.frame(
  x = c(0.5, 0.3, 0.1),
  y = c("Long axis label 1", "Long axis label 2", "Long axis label 3")
)

plot_ly(
  data, y = ~ y, x = ~ x, type = "bar"
) %>% layout(
  margin = list(l = 160, r = 20, b = 80, t = 20), # 稍微调大底部边距给标题留足空间
  xaxis = list(tickformat = "%"), # 移除原来的xaxis自带title
  yaxis = list(title = "Y axis label", tickprefix = " ", tickwidth = 1, tickcolor = toRGB("white")),
  # 添加自定义注释作为全局居中的X轴标题
  annotations = list(
    list(
      x = 0.5, y = -0.2, # x=0.5对应绘图区域水平中点，y=-0.2控制垂直位置（可按需调整）
      xref = "paper", yref = "paper", # 基于整个绘图区域的坐标系统定位
      text = "Preeeeeeeeeeeeeety long X axis label",
      showarrow = FALSE,
      xanchor = "center", # 确保文本自身也是居中对齐的
      font = list(size = 12) # 可自定义字体大小、颜色等样式
    )
  )
)

关键参数解释 #

• xref='paper' & yref='paper'：把注释的坐标系统切换为整个绘图区域（0代表最左/最下，1代表最右/最上），而非X/Y轴的数据范围
• x=0.5：保证标题在水平方向完全居中于整个绘图区域
• y=-0.2：控制标题在垂直方向的位置，负数表示在绘图区域的下方，你可以根据实际边距调整这个值（比如改成-0.15让标题更靠近X轴）
• showarrow=FALSE：取消注释默认的箭头，只保留干净的标题文本
• xanchor='center'：避免文本自身出现偏移，确保标题完全居中对齐

额外提示 #

如果需要调整标题的样式（比如颜色、字体），直接在font参数里添加对应属性即可，例如：

font = list(size = 12, color = "#333333", family = "Arial")

这样设置后，无论Y轴标签多长、屏幕尺寸如何变化，X轴标题都会始终相对于整个绘图区域居中，再也不会出现截断的问题啦！

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