library(tidyverse)
Suponha o seguinte dataset:
funcionarios <- data.frame(
stringsAsFactors = FALSE,
nome = c("Claudio Roberto",
"Regina Marinho","Weronica Souza","Rogerio Lemos","Claudio Araujo"),
setor = c("RH", "Recepção", "Almoxarifado", "RH", "RH"))
funcionarios
nome setor
1 Claudio Roberto RH
2 Regina Marinho Recepção
3 Weronica Souza Almoxarifado
4 Rogerio Lemos RH
5 Claudio Araujo RH
Os nomes "Cláudio", "Werônica" e "Rogério" não estão devidamente acentuados.
Além disso, o sobrenome "Araújo" (de Cláudio) também carece de acento.
Tentei resolver com str_replace()
:
Primeiro para Cláudio:
> funcionarios %>%
+ mutate(nome_acentuado = str_replace(nome,
+ pattern = "Claudio",
+ replacement = "Cláudio"))
Observe que os dois Cláudio foram devidamente acentuados.
nome setor nome_acentuado
1 Claudio Roberto RH Cláudio Roberto
2 Regina Marinho Recepção Regina Marinho
3 Weronica Souza Almoxarifado Weronica Souza
4 Rogerio Lemos RH Rogerio Lemos
5 Claudio Araujo RH Cláudio Araujo
Ocorre que ao tentar replicar essa lógica para os demais nomes, apenas a última alteração é considerada.
Por exemplo, ao tentar com Cláudio e Werônica:
> funcionarios %>%
+ mutate(nome_acentuado = str_replace(nome,
+ pattern = "Claudio",
+ replacement = "Cláudio"),
+ nome_acentuado = str_replace(nome,
+ pattern = "Weronica",
+ replacement = "Werônica"))
Observe que os Cláudios perderam os acentos e apenas Werônica está acentuado:
nome setor nome_acentuado
1 Claudio Roberto RH Claudio Roberto
2 Regina Marinho Recepção Regina Marinho
3 Weronica Souza Almoxarifado Werônica Souza
4 Rogerio Lemos RH Rogerio Lemos
5 Claudio Araujo RH Claudio Araujo
A mesma coisa, quando tento acentuar Rogério:
> funcionarios %>%
+ mutate(nome_acentuado = str_replace(nome,
+ pattern = "Claudio",
+ replacement = "Cláudio"),
+ nome_acentuado = str_replace(nome,
+ pattern = "Weronica",
+ replacement = "Werônica"),
+ nome_acentuado = str_replace(nome,
+ pattern = "Rogerio",
+ replacement = "Rogério"))
Rogério agora está acentuado e os Cláudios e Werônica não estão mais.
nome setor nome_acentuado
1 Claudio Roberto RH Claudio Roberto
2 Regina Marinho Recepção Regina Marinho
3 Weronica Souza Almoxarifado Weronica Souza
4 Rogerio Lemos RH Rogério Lemos
5 Claudio Araujo RH Claudio Araujo
E o que dizer então de Cláudio Araújo? Como acentuar ambas as palavras que estão na mesma string?