R语言 ggplot按x轴的值重新排序y轴

30byixjq  于 2023-03-20  发布在  其他
关注(0)|答案(1)|浏览(185)

我有这个数据集:

bizdev        company                   date       category  
  <chr>         <chr>                     <date>     <chr>     
1 Jerry Harding Jones, Figueroa and Moon  2020-04-06 Mid-tier  
2 Steve Vargas  Stanley, Porter and Mccoy 2020-04-24 Indie     
3 Steve Vargas  Gardner and Sons          2020-04-19 Indie     
4 Jerry Harding Parks-Chen                2020-04-11 Indie     
5 Jerry Harding Bond Group                2020-04-06 Indie     
6 David Burton  Lopez-Johnson             2020-05-07 Enterprise

我试着在转换后生成一个条形图。
x一个一个一个一个x一个一个二个x
条形图的y轴按x轴的值重新排列,代码如下:

consol %>% ggplot(aes(x = total_meeting, y = reorder(bizdev, -total_meeting), fill = category)) 
+ geom_bar(stat = 'identity') 
+ theme_classic()

Y轴上的值不是从最低到最高的完全顺序。请注意,“Steve Vargas”记录的total_meeting高于“Joel English”。位置不正确。
任何人请指示。

q8l4jmvw

q8l4jmvw1#

试试这个。如果这个不起作用,请提供一个可复制的例子,因为我还没有在我的机器上测试。

consol <- df %>%
  mutate(meeting_month = as_factor(month(date, abbr = TRUE, label = TRUE)), .keep = "unused") %>%
  group_by(bizdev, category, meeting_month) %>%
  summarise(total_meeting = n()) %>%
  ungroup() %>%
  group_by(bizdev) %>%
  mutate(real_total = sum(total_meeting))

consol %>% ggplot(aes(x = total_meeting, y = reorder(bizdev, -real_total), fill = category))+
geom_bar(stat = "identity")+
theme_classic()

相关问题