[R-es] problemas para agrupar cadenas en una sola con str_replace_all

[juan manuel dias]

Hola, como andan!

Tengo una base de datos de pacientes y una de las variables es contexto de
atención en el que fue atendido. El problema es que hay respuestas que
tiene que ser agrupadas en una misma categoría.

Por ejemplo, todas estas categorías

(CONSULTORIO, CONSULTORIO EXTERNO, CONSULTORIO EXTERNOS DE CP, CONSULTORIOS
CUIDADOS PALIATIVOS,
CONSULTORIOS EXTERNOS CUIDADOS PALIATIVOS, CONSULTORIOS EXTERNOS DE CP,
CONSULTORIOS EXTERNOS DE CP-,
CONSULTORIOS EXTERNOS DE CUIDADOS PALIATIVOS,CONSULTORIOS EXTERNOS DE
CUIDADOS PALIATIVOS,
CONSULTORIOS EXTERNOS DE CUIDADOS PALIATIVOS)

Las  debería agrupar en una única "CONSULTORIO EXTERNOS".

Intenté de esta forma antes habiendo pasado la variable "contexto_atencion"
toda a mayúsculas y sin acentos.

pats_consext <- c("CONSULTORIO EXTERNO|CONSULTORIO EXTERNOS DE
CP|CONSULTORIOS CUIDADOS PALIATIVOS|
CONSULTORIOS EXTERNOS CUIDADOS PALIATIVOS|CONSULTORIOS EXTERNOS DE
CP|CONSULTORIOS EXTERNOS DE CP-|
CONSULTORIOS EXTERNOS DE CUIDADOS PALIATIVOS|CONSULTORIO")

solucion_mult_p8<-solucion_mult_p8 %>%
  mutate(contexto_atencion = str_replace_all(contexto_atencion,
pats_consext,'CONSULTORIOS EXTERNOS'))

Pero no me resuelve el problema.

Para la categoría

CONSULTORIOS EXTERNOS CUIDADOS PALIATIVOS

me trae

CONSULTORIOS EXTERNOS EXTERNOS CUIDADOS PALIATIVOS

Alguien sabe cuál puede ser el problema?

Adjunto la base por las dudas!

Muchas gracias!

m

------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20210616/fffa14a0/attachment.html>

------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: contexto_atencion_distintos.xlsx
Type: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
Size: 9946 bytes
Desc: no disponible
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20210616/fffa14a0/attachment.xlsx>