如何将标题文本与条形图中的左条对齐?

艾曼

我正在尝试使条形图中的标题文本对齐,以使其从与左条相同的垂直边距开始。

library(ggplot2)
library(tibble)

my_df <- 
  tibble::tribble(~response, ~estimate,
                  "little_bit", 0.353477,
                  "no", 0.307639,
                  "very", 0.338883)

ggplot(my_df, aes(x = reorder(response, -estimate), y = estimate)) +
  geom_bar(stat = "identity", width = 0.9, fill = "royalblue") +
  ggtitle("do you like swimming with fish?") +
  ylab("") +
  labs(caption = "this is my caption") +
  theme_minimal() +
  theme(
    axis.line.x = element_blank(),
    axis.line.y = element_blank(),
    axis.text.y = element_blank(),
    panel.grid  = element_blank(),
    panel.grid.major=element_blank(),
    plot.title = element_text(hjust = 0.5, size = 26),
    axis.text.x = element_text(angle = 0, size = 14, margin = margin(t = 0, r = 20, b = 0, l = 0)),
    axis.title.x = element_blank(),
    legend.title = element_blank(),
    plot.caption = element_text(hjust = 0, size = 8),
    plot.caption.position = "plot") ## <-- I thought this would help, but no...

条形图


有没有办法对齐标题,如下所示?


对齐的

斯蒂芬

要获得所需的结果,请将标题位置设置为,"panel"并删除x比例尺的展开:

library(ggplot2)
library(tibble)

my_df <- 
  tibble::tribble(~response, ~estimate,
                  "little_bit", 0.353477,
                  "no", 0.307639,
                  "very", 0.338883)

ggplot(my_df, aes(x = reorder(response, -estimate), y = estimate)) +
  geom_bar(stat = "identity", width = 0.9, fill = "royalblue") +
  ggtitle("do you like swimming with fish?") +
  scale_x_discrete(expand = c(0, 0)) +
  labs(caption = "this is my caption", y = NULL) +
  theme_minimal() +
  theme(
    axis.line.x = element_blank(),
    axis.line.y = element_blank(),
    axis.text.y = element_blank(),
    panel.grid  = element_blank(),
    panel.grid.major=element_blank(),
    plot.title = element_text(hjust = 0.5, size = 26),
    axis.text.x = element_text(angle = 0, size = 14, margin = margin(t = 0, r = 20, b = 0, l = 0)),
    axis.title.x = element_blank(),
    legend.title = element_blank(),
    plot.caption = element_text(hjust = 0, size = 8),
    plot.caption.position = "panel") 

本文收集自互联网,转载请注明来源。

如有侵权,请联系 [email protected] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章

如何将跟踪文本对齐到堆积的水平条形图中的中心

在 ggplot 堆叠条形图中对齐文本

如何将ActionBar中的标题文本右对齐而不是默认左对齐?

如何将多组数据放入单个条形图中?

如何将图标左对齐并在文本右对齐

如何将文本字段列表与左对齐对齐

如何使条形图上的文本左对齐(包含示例图像)[Plotly-Dash]

如何将标题与换行符左对齐?

如何将UIButton的标题设置为左对齐?

如何修改条形图中的文本

如何在条形图中显示每个条的条值?

如何在堆叠的条形图中的两个水平条之间插入文本

如何在R条形图中沿y轴垂直对齐文本数据标签?

条形图中的排序条

如何按升序对条形图中的条进行排序?

如何在条形图中定义附加条的间距?

如何将ExpandableListview的标题文本对齐到最左端?

如何将数据插入nvd3条形图

如何将NVD3条形图转换为面积线图?

如何将值放在 R 中条形图的每个条中

如何在D3的条形图中的条形图中添加文本图例?

如何将数据标签放在 VizFrame 图表中的条形图中

如何将非对称错误栏添加到Pandas分组条形图中?

密谋:如何将跟踪添加到多类条形图中?

Matplotlib —如何将堆叠的条形图放入子图中

高图:在条形图中的同一条线上对齐数据标签

Python:如何使用 Matplotlib 在条形图中垂直放置文本

如何从Google条形图中删除右侧文本?

如何更改ggplot的条形图中x轴文本的位置?