radar
radar copied to clipboard
Remoção de acentos em radar.R
Atualmente temos o seguinte trecho pra remover acentos de nomes de parlamentares:
# Corrigir nome da deputada Luciana Costa:
dados$name[dados$name=="LUCIANA COSTA\r\n\r\nLUCIANA COSTA\r\n\r\n\r\nLUCIANA COSTA"] <- "LUCIANA COSTA"
# Tirar os acentos, porque o wnominate não aceita:
dados$name[dados$name=="EMILIANO JOS\xc9"] <- "EMILIANO JOSE"
dados$name[dados$name=="JO\xc3O HERRMANN"] <- "JOAO HERRMANN"
dados$name[dados$name=="JOS\xc9 EDMAR"] <- "JOSE EDMAR"
dados$name[dados$name=="MAJOR F\xc1BIO"] <- "MAJOR FABIO"
dados$name[dados$name=="JOS\xc9 MAIA FILHO"] <- "JOSE MAIA FILHO"
Seria bom algo mais geral. Me parece q isso pode ser resolvido com a função iconv.
Exemplo:
> iconv('ação', to = "ASCII//TRANSLIT")
[1] "acao"
Mas eu ainda não consegui aplicar isso de uma vez pra todos os nomes. Eu tentei:
dados$name <- iconv(dados$name, to = "ASCII//TRANSLIT")
mas parece q não funfou...