R ggplot-如何在条形图上方旋转计数

凯南

我的数据框df看起来像这样

  Year Frequency
1 1975        86
2 1976        52
3 1977        53
4 1978        54
5 1979       301
6 1980       161

您可以使用它来自己复制data.frame:

ydf <- structure(list(Year = c(1975, 1976, 1977, 1978, 1979, 1980), 
                      Frequency = c(86, 52, 53, 54, 301, 161)),
                 row.names = c(NA, -6L), class = "data.frame")

我用这个图

ggplot(ydf, aes(x = Year, y = Frequency, fill=Frequency)) + geom_bar(stat = "identity") + geom_text(aes(label = Frequency), nudge_y=1, check_overlap=TRUE)+ scale_x_discrete(guide = guide_axis(angle = 90))

在此处输入图片说明

但是,您可以看到条形上方的频率重叠。我试图将x轴分开或像xlabel一样旋转Frequency 90。我做了很多谷歌搜索,但是没有运气。我是R的新手,所以我的绘图代码可能不正确或可以做得更好。请注意,我喜欢将图例显示为一个条,并且不想更改它。

赫尔曼

使用@ markus,nudge_y和angle为标签建议的geom_col:

library(ggplot2)

set.seed(42)
# Making up data
my_df <- tibble::tibble(year = 1:25, freq = sample(50:400, replace = T, size = 25))

# a variable to change nudge_y based on data's range
range = max(my_df$freq) -min(my_df$freq)

#Plotting
ggplot(my_df, aes(x = year, y = freq)) + 
  geom_col(aes(fill = freq)) + 
  geom_text(aes(label = freq), 
            angle = 90,
            nudge_y = range / 20) # the 20 may need adjusting for data with significantly different range

reprex软件包(v0.3.0)创建于2020-12-27

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

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

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章

R ggplot2 如何在条形图上绘制标准偏差

堆叠条形图上的R ggplot标签

在ggplot中,如何在条形图中仅在特定条上方打印计数?

如何在R中的计数ggplot条形图中添加一个变量的百分比

如何在ggplot堆栈条形图上添加总线

ggplot2中条形图的计数和百分比如何?[R

R ggplot2条形图,条形图上有圆角

如何使用ggplot在条形图上方添加水平线?

如何在R中使用ggplot2在条形图中的条形图中添加标签?

如何使用ggplot2在R中的每个条形图上在geom_bar上放置标签

R:如何在ggplot中翻转堆叠的并排条形图

如何在R中的ggplot中更改堆叠条形图的位置?

如何在 R 中的 ggplot2 的条形图中绘制多个变量(即类别)

如何在R中从最高到最低对条形图进行排序?(ggplot2)

ggplot中条形图上的分类值计数?

每年R ggplot条形图分别

ggplot 使用 R 分组的条形图

特殊堆积条形图R ggplot

每行的ggplot条形图(R)

R ggplot中的多元条形图

R,将条形图作为刻度叠加在ggplot图上

将条形图上的箭头(或箭头的图像)添加到R中的plotly或ggplot中?

条形图上方小节上方的ggplot上的摘要统计信息的批注

如何在 ggplot r 中绘制每个 x-lab 条形图都包含正负 y 值的条形图?

如何在ggplot2地图上绘制条形图

如何在ggplot2中的群集条形图上对齐文本?

如何在ggplot2的条形图上使geom_errorbar正确“躲避”?

如何在我的ggplot2 2因子条形图上放置标准误差条?

R中的躲避条形图基于使用ggplot2计数年份的列