radar icon indicating copy to clipboard operation
radar copied to clipboard

Remoção de acentos em radar.R

Open leonardofl opened this issue 11 years ago • 0 comments

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...

leonardofl avatar Jul 16 '13 00:07 leonardofl