R help es - Jun 2021 - problemas para agrupar cadenas en una sola con str_replace_all

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>

Podr?a servirle:
> categorias <- c("CAMA UCI","CENTRO DE CUIDADOS
CRONICOS","CLINICA PRIVADA:
UTI","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","CONTROL TELEFONICO
POSTALTA","CONVENTO","DISPOSITIVO TELEFONICO","EN
CASA/COMUNIDAD","EN HOSPITAL: CONSULTORIOS EXTERNOS","EN UN
HOGAR DE CUIDADO/HOGAR DE ANCIANOS","EN UN HOGAR DE CUIDADO/HOGAR DE
ANCIANOS: OTRA SALA","EN UN HOGAR DE CUIDADO/HOGAR DE ANCIANOS: SALA
PTES. COVID","EN UN HOSPICE O CASA DE CUIDADOS PALIATIVOS (NO
ESPECIFICAMENTE PARA PACIENTES DE CORONAVIRUS)","EN UN HOSPITAL: OTRA
SALA","EN UN HOSPITAL: SALA PTES. COVID","EN UN HOSPITAL:
UTI","GUARDIA SHOCKROOM","HOSPITAL","HOSPITAL -
CONSULTORIO
EXTERNO","HOSPITAL-CONS.EXTERNO","HOSPITAL-CONS.EXTERNOS","MEDIANTE
VIDEO LLAMADAS","NO PROPORCIONE ATENCION AL PACIENTE","SALA
DE REANIMACION Y SHOCK","SEGUIMIENTO
TELEFONICO","TELECONSULTA","TELEFONICAMENTE","VIA
TELEFONICA","VIEDOLLAMADA-MAILS")
> CONSULTORIOs_EXTERNOS <-
c(categorias[(grepl(toupper("consultorio"),categorias))])
> CONSULTORIOs_EXTERNOS
[1] "CONSULTORIO"
 [2] "CONSULTORIO EXTERNO"
 [3] "CONSULTORIO EXTERNOS DE CP"
 [4] "CONSULTORIOS CUIDADOS PALIATIVOS"
 [5] "CONSULTORIOS EXTERNOS CUIDADOS PALIATIVOS"
 [6] "CONSULTORIOS EXTERNOS DE CP"
 [7] "CONSULTORIOS EXTERNOS DE CP-"
 [8] "CONSULTORIOS EXTERNOS DE CUIDADOS PALIATIVOS"
[9] "EN HOSPITAL: CONSULTORIOS EXTERNOS"
[10] "HOSPITAL - CONSULTORIO EXTERNO"


Nota: grepl busca la subcadena deseada


Cordial saludo


Enviado desde Correo<https://go.microsoft.com/fwlink/?LinkId=550986> para
Windows 10

De: juan manuel dias<mailto:juamadias en gmail.com>
Enviado: mi?rcoles, 16 de junio de 2021 15:27
Para: Lista R<mailto:r-help-es en r-project.org>
Asunto: [R-es] problemas para agrupar cadenas en una sola con str_replace_all

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



	[[alternative HTML version deleted]]