r - 在 R 中绘制按年折叠的唯一值

Question

我有一个表单的数据集

x<- c("London","Newyork","Miami","London","London","London")
y<- c(2008,2009,2008,2010,2009,2008)
df<- data.frame(x,y)
plot(length(unique(df$x)),y)

现在我想根据年份绘制 x(长度)和 y 的唯一值。我期待像 2008-2 这样的图表； 2009-2； 2010-1.我需要根据城市计数的唯一值进行崩溃。有什么建议吗？

Answer 1

n_distinct 是 dplyr 中一个方便的函数，用于查找 unique 元素的计数。在这里，我们按“y”列分组并获得“y”的 n_distinct。这可用于使用 ggplot

绘图

library(dplyr)
library(ggplot2)
df %>% 
     group_by(y) %>% 
     summarise(n=n_distinct(x)) %>%
     ggplot(., aes(x=y, y=n)) +
            geom_bar(stat='identity')