Можете ли вы дать мне подсказку, как мне справиться с проблемой: у меня есть набор данных, и я хочу применить длинный код, который у меня есть (с циклами и прочим) ... Как я могу написать цикл for для запускачерез код отдельно по подмножеству (например, по переменной города, которая у меня есть в наборе данных), а затем сохраните результаты по городам.Спасибо! 100
Я пробовал следующий подход, но он не работает
library(dplyr)
library(purr)
cities <- unique(df$city)
my_function <- function(df){
## wrap your entire code here
}
map_df(cities, function(df, cityname){
df %>%
filter(city == cityname) %>%
my_function()%>%
write.csv(paste0(cityname, ".csv"))
}
)
Ошибка в filter_impl (.data, quo): результат должен иметь длину 9059907, а не 49
Мой df содержит 9059907 наблюдений, а мой персонаж 'city' содержит 49