[R-es] Agrupar dummy's en otra variable.

[juan manuel dias]

Hola Estimados/as,



Hace unos días consulté cómo generar variables dummy cuándo las opciones de
respuesta están cargadas en una misma columna/variable y separadas por una
coma “,”.



Tenía esto:

[image: image.png]



Y debía generar como primer paso esto:



ab<-base %>%

  separate_rows(enfermedad, sep = ",") %>%

  mutate(enfermedad = str_squish(enfermedad))



[image: image.png]


Y finalmente obtener como resultado las dummy:



ab<-base %>%

  separate_rows(enfermedad, sep = ",") %>%

  mutate(enfermedad = str_squish(enfermedad), # Para quitar los espacios en
blanco indeseados

         id = 1) %>%

  spread(key = enfermedad, value = id)



ab[is.na(ab)] <- 0


write.csv(ab,file='base_enfermedades_dummy.csv')


[image: image.png]




Actualmente estoy necesitando lo siguiente: conservar las variables
*Demencia*, *Cáncer*, *Enfermedad Cardíaca*, *Enfermedad pulmonar* y
*Diabetes* y al resto de las variables/enfermedades agruparlas en una nueva
variable “otros”, que sea 1 ó 0 si el caso/paciente tiene 1 en cualquiera
de las enfermedades que no son las que menciono arriba.


Asimismo, necesito generar una nueva variable "*Enfermedades_otras*"
donde figuren cuáles son las enfermedades que mencionó el paciente en
otros, y que estén separadas por una coma.



Adjunto la base en csv (*base_enfermedades_dummy)  *y en el excel (
*Ejemplo_agrupar_en_otros*) dejo un ejemplo de lo que intento hacer.


Muchas gracias! Juan.

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

------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: image.png
Type: image/png
Size: 22240 bytes
Desc: no disponible
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20210311/1a55f732/attachment-0003.png>

------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: image.png
Type: image/png
Size: 26712 bytes
Desc: no disponible
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20210311/1a55f732/attachment-0004.png>

------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: image.png
Type: image/png
Size: 23144 bytes
Desc: no disponible
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20210311/1a55f732/attachment-0005.png>

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

------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: base_enfermedades_dummy.csv
Type: application/vnd.ms-excel
Size: 9470 bytes
Desc: no disponible
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20210311/1a55f732/attachment-0001.xlb>