Olá, bom dia!
Tenho um data frame trimestral que está divido por 1º, 2º e 3º mês de cada trimestre, veja:
Trimestre Variável Referência temporal
1º trimestre 2007 Animais abatidos No 1º mês
1º trimestre 2007 Animais abatidos No 1º mês
1º trimestre 2007 Animais abatidos No 1º mês
1º trimestre 2007 Animais abatidos No 1º mês
1º trimestre 2007 Animais abatidos No 1º mês
1º trimestre 2007 Animais abatidos No 1º mês
1º trimestre 2007 Animais abatidos No 2º mês
1º trimestre 2007 Animais abatidos No 2º mês
2º trimestre 2007 Animais abatidos No 1º mês
2º trimestre 2007 Animais abatidos No 1º mês
2º trimestre 2007 Animais abatidos No 1º mês
2º trimestre 2007 Animais abatidos No 1º mês
2º trimestre 2007 Animais abatidos No 2º mês
2º trimestre 2007 Animais abatidos No 2º mês
Quero renomear na coluna Referência temporal por meses do ano de acordo com o trimestre, então quero que meu data frame fique assim:
Trimestre Variável Referência temporal
1º trimestre 2007 Animais abatidos Janeiro
1º trimestre 2007 Animais abatidos Janeiro
1º trimestre 2007 Animais abatidos Janeiro
1º trimestre 2007 Animais abatidos Janeiro
1º trimestre 2007 Animais abatidos Janeiro
1º trimestre 2007 Animais abatidos Janeiro
1º trimestre 2007 Animais abatidos Fevereiro
1º trimestre 2007 Animais abatidos Fevereiro
2º trimestre 2007 Animais abatidos Abril
2º trimestre 2007 Animais abatidos Abril
2º trimestre 2007 Animais abatidos Abril
2º trimestre 2007 Animais abatidos Abril
2º trimestre 2007 Animais abatidos Maio
2º trimestre 2007 Animais abatidos Maio
Veja que o 1º mês do 1º trimestre é Janeiro, 2º mês do 1º trimestre é Fevereiro, e assim por diante...
Existe alguma forma de renomear essas strings diretamente? Pois, meu data frame é bem grande e seria impossível renomear linha por linha.
Resultado de dput(head(tabela1092):
> dput(head(tabela1092))
structure(list(Trimestre = c("1º trimestre 2007", "1º trimestre 2007",
"1º trimestre 2007", "1º trimestre 2007", "1º trimestre 2007",
"1º trimestre 2007"), Variável = c("Animais abatidos", "Animais abatidos",
"Animais abatidos", "Animais abatidos", "Animais abatidos", "Animais abatidos"
), `Referência temporal (Código)` = c("115233", "115233", "115233",
"115233", "115233", "115233"), `Referência temporal` = c("No 1º mês",
"No 1º mês", "No 1º mês", "No 1º mês", "No 1º mês", "No 1º mês"
), `Tipo de rebanho bovino` = c("Bois", "Bois", "Bois", "Bois",
"Bois", "Bois"), `Tipo de inspeção` = c("Total", "Total", "Total",
"Total", "Total", "Total"), `Unidade da Federação` = c("Rondônia",
"Acre", "Amazonas", "Roraima", "Pará", "Amapá"), `Unidade de Medida` = c("Cabeças",
"Cabeças", "Cabeças", "Cabeças", "Cabeças", "Cabeças"), Valor = c(83979,
17709, 5982, NA, 111030, NA)), row.names = 2:7, class = "data.frame")