Проблема распространения R: После добавления новых обновленных данных, распространение () создает фрейм данных водопада

Question

Я пытаюсь создать годовой фрейм данных, в котором входные данные обновляются ежемесячно.Это исторический характер, и изменения обычно происходят только в самые последние годы.Я подумал, что было бы проще просто добавить обновленную информацию, а не повторять добавление дублирующейся информации снова и снова (данные обновляются ежемесячно для годовых оценок и возвращаются к 1960 году для спроса и предложения мировых культур для каждой страны).Исходные данные выглядят так:

Corn_US_World_Model <- FAS %>% 
                       group_by(Market_Year)%>%filter(Commodity == "Corn")%>%
                       select(Attribute, Country, Market_Year, Thousand_MT)

Corn_US_World_Model_test<- Corn_US_World_Model %>%
                           group_by(Market_Year)%>%  
                           mutate(grouped_id = row_number())%>%
                           spread(Market_Year, Thousand_MT)%>% 
                           select(-grouped_id)

После распространения я получаю такой водопад

ЧтоЯ хотел бы это

Когда я фильтрую () для конкретной страны, я не получаю версию водопада.Однако, когда я делаю это во всех странах в наборе данных, я делаю.