Com R base
df$Mes <- format(as.Date(df$data), "%B") # ou %m para mês como número
table(df$Mes)
#>
#> agosto outubro setembro
#> 1 2 2
Pode usar as.data.frame(table(...))
se precisa como data.frame.
Com dplyr
library(dplyr)
df %>% mutate(Mes = format(as.Date(df$data), "%B")) %>%
group_by(Mes) %>%
summarise(Quantidade = n())
#> # A tibble: 3 x 2
#> Mes Quantidade
#> <chr> <int>
#> 1 agosto 1
#> 2 outubro 2
#> 3 setembro 2
Com data.table
library(data.table)
setDT(df)
df[, Mes := month(data)][, .(Quantidade = .N), Mes]
#> Mes Quantidade
#> 1: 10 2
#> 2: 9 2
#> 3: 8 1
month
faz parte do data.table. É equivalente à lubridate::month, mas não possui opção de exibir mês como nome.