如何在ggplot中显示显示所有条形图

学习者

根据得分显示10条。

我想显示基于personal_score的10条。由于CH Gayle和AB de Villiers被重复两次,所以我只得到8个小节。但是我想根据得分以降序显示10个小节。

batsman        individual_score   
CH Gayle    175
BB McCullum 158
AB de Villiers  133
RR Pant 130
AB de Villiers  129
CH Gayle    128
M Vijay 127
DA Warner   126
V Sehwag    122
SR Watson   121

我尝试按降序重新排序,但不起作用。我也尝试过fill = scorebatsman获得10酒吧。

highest_individual_score <- innings %>%
group_by(match_id,batsman) %>%
summarize(individual_score = sum(batsman_runs)) %>%
arrange(desc(individual_score)) %>%
ungroup() %>%
top_n(10, individual_score) %>%
ggplot(aes(x= batsman, y = individual_score,fill = batsman)) +
geom_bar(stat= "identity", show.legend = FALSE) +
theme(axis.text.x = element_text(angle = 90)) +
labs(x = "Batsman", y = "Individual Score", title ="Top 10 highest 
individual scorer")

上面的代码按字母顺序仅给我8条。如何使其显示10条?

本杰明

如果您尝试过类似的操作怎么办?使用您的代码,ggplot2将它们分组在一起,因为x轴是batsman,这确实使您着迷。但是,如果您将x轴做成一些与batsman都不相关的独特事物individual_score呢?

我在下面通过为每一行赋予一个任意的唯一ID来完成此操作。我用过,row_number()所以他们只是顺理成章地走了。然后,我将它们变成一个因子(而不是将它们保留为数字),以便它与刻度很好地配合使用。

library(tidyverse)

highest_individual_score <- innings %>%
  group_by(match_id, batsman) %>%
  summarize(individual_score = sum(batsman_runs)) %>%
  arrange(desc(individual_score)) %>%
  ungroup() %>%
  top_n(10, individual_score) %>% 
  mutate(id = as.factor(row_number()))

然后,我对您的ggplot2代码本身做了一些小的更改

highest_individual_score %>%
  ggplot(aes(x = id, y = individual_score, fill = batsman))+
  geom_bar(stat = "identity", show.legend = FALSE)+
  scale_x_discrete(
    labels = highest_individual_score$batsman,
    name = "Batsman"
  ) +
  theme(axis.text.x = element_text(angle = 90))+
  labs(y = "Individual Score", title ="Top 10 highest 
       individual scorer")

本质上,x轴现在是唯一的ID,因此它会分别处理每个记录。但是然后您必须用击球手重新标记轴,我使用的labels参数来完成scale_x_discrete()说得通?

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

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

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章

如何在“条形图”上显示所有x标签?

使所有正值条形图与ggplot中带有负值的条形图具有相同的颜色主题

如何在TableView(javaFX 8)的TableColumn中显示“单个条形图”?

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

如何在所有条形图子图上显示x轴标签?

更改所有条形图(VBA)的所有条形图类别的颜色?

反转堆叠条形图的顺序-在ggplot中突出显示

在Laravel中显示条形图

如何在堆叠条形图显示中抑制零

如何在条形图范围轴上显示单位

如何在海洋条形图的每个条形图的顶部显示y值?

如何制作条形图显示R中的负值?

如何水平显示堆积的条形图?

如何在csv文件的熊猫的barplot中显示多个条形图

堆叠的条形图显示所有值均为0高图时悬挂的零

如何在列剑道条形图的顶部显示标签?

在ggplot中显示条形图的图例

在<div>中显示条形图

如何在Ruby on Rails中显示条形图的图例?

带有最新ioscharts的条形图显示中的问题

如何在R中的同一图中显示并排条形图以及堆叠条形图?

IOS 条形图 - 如何在条形图上显示值(1.0、2.0 等)标签并在条形图滚动上显示特定值(如 3 - 7)

Nativescript图表如何显示带有负值的条形图

条形图未显示在 SVG 中

如何在ggplot中绘制部分表格的条形图

当条形按 ggplotly 中的值排序时,如何在条形图工具提示上显示变量名称

如何在charjs中在y轴上显示条形图

如何在R中堆积条形图的顶部显示总值

MPAndroidChart 条形图(分组数据集)未显示所有条形