如何创建列或汇总表，列出值具有的可用年份数据？

Question

所以我有以下数据看起来像这样（它是一个样本，在大约15年的时间内有数百行）。我想创建一个列（或汇总表），显示每个位置的可用数据年数。

Year, Place
2000, 'Adak'
2000, 'Kodiak'
2000, 'Saltsdale'
2001, 'Adak'
2001, 'Saltsdale'
2001, 'Tawney'
2002, 'Adak'
2002, 'Kodiak'
2002, 'Tawney'

如果可能，我真的希望它看起来像这样：

Place, Years_Available 
'Adak', 2000/2002
'Kodiak', 2000/2002
'Saltsdale', 2000/2001
'Tawney', 2001/2002

我使用了summarize_all但它给了我一个奇怪的输出，其中Years_Available列只是重复第一年15次。

b1 <- b %>% 
    group_by(Place) %>%
    mutate(years = toString(Year)) %>%
    group_by(Place,years) %>%
    summarize_all(funs(sum(!is.na(.))))

Answer 1

我们可以使用range

df1 %>%
   group_by(Place) %>% 
   summarise(Year = toString(range(Year)))