R help es - Jun 2018 - Transformar muchas variables factor en variables binarias de acuerdo a niveles

Puedes probar con la función dummy del paquete dummies.

Un saludo
Fernando Reche Lorite
Departamento de Matemáticas
Universidad de Almería

El 25 de junio de 2018, 15:55, Carlos J. Gil Bellosta <cgb en
datanalytics.com>
escribió:
> ¿No te vale model.matrix?
>
> El lun., 25 jun. 2018 a las 15:49, Juan Abasolo (<juan.abasolo en
ehu.eus>)
> escribió:
>
> > Buenas, compañeros.
> >
> > Tengo una base de datos con bastantes variables todas medidas como
> factor,
> > quiero que todos los factores pasen a ser variables binarias en
función
> de
> > sus valores.
> >
> > En este ejemplo de Stackoverflow muestran como hacerlo con una
variable:
> >
> > https://stackoverflow.com/questions/33990760/converting-
> factors-to-binary-in-r
> >
> > df  <-data.frame(a = c(1,2,3), b = c(1,1,2), c > >
c("Rose","Pink","Red"), d = c(2,3,4))
> >
> > cbind(df[1:2], sapply(levels(df$c), function(x) as.integer(x ==
df$c)),
> > df[4])
> >
> > o así
> >
> > library(data.table)
> > setDT(df)[, c(levels(df$c), "c") :> >    
c(lapply(levels(c), function(x) as.integer(x == c)), .(NULL))]
> >
> >
> > Pero no me resuelve el tener que hacerlo algunos cientos de veces, que
es
> > lo que querría evitar. Sé que es evidente cómo se tiene que hacer,
pero
> soy
> > ciego a esa evidencia :-(
> >
> > Muchas gracias por la ayuda
> >
> >
> > --
> > Juan Abasolo
> >
> > Hizkuntzaren eta Literaturaren Didaktika Saila
> > Bilboko Hezkuntza Fakultatea
> > Euskal Herriko Unibertsitatea
> > UPV/EHU
> >
> > Sarriena auzoa z/g
> > 48940 Leioa
> > Bizkaia
> >
> >         [[alternative HTML version deleted]]
> >
> > _______________________________________________
> > R-help-es mailing list
> > R-help-es en r-project.org
> > https://stat.ethz.ch/mailman/listinfo/r-help-es
> >
>
>         [[alternative HTML version deleted]]
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
	[[alternative HTML version deleted]]

En esta respuesta: https://stackoverflow.com/a/35663834/2301674

tienes como hacerlo (mucho más sencillo que en la que enlazas tú) con
reshape2 o si prefieres la versión "tidy" con dplyr y tidyr (la que yo
recomiendo, pero solo porque me gusta más).

Espero que te sirva

On Mon, 25 Jun 2018 at 16:08 Fernando Reche Lorite via R-help-es <
r-help-es en r-project.org> wrote:
> Puedes probar con la función dummy del paquete dummies.
>
> Un saludo
> Fernando Reche Lorite
> Departamento de Matemáticas
> Universidad de Almería
>
> El 25 de junio de 2018, 15:55, Carlos J. Gil Bellosta <
> cgb en datanalytics.com>
> escribió:
>
> > ¿No te vale model.matrix?
> >
> > El lun., 25 jun. 2018 a las 15:49, Juan Abasolo (<juan.abasolo en
ehu.eus>)
> > escribió:
> >
> > > Buenas, compañeros.
> > >
> > > Tengo una base de datos con bastantes variables todas medidas
como
> > factor,
> > > quiero que todos los factores pasen a ser variables binarias en
función
> > de
> > > sus valores.
> > >
> > > En este ejemplo de Stackoverflow muestran como hacerlo con una
> variable:
> > >
> > > https://stackoverflow.com/questions/33990760/converting-
> > factors-to-binary-in-r
> > >
> > > df  <-data.frame(a = c(1,2,3), b = c(1,1,2), c > > >
c("Rose","Pink","Red"), d = c(2,3,4))
> > >
> > > cbind(df[1:2], sapply(levels(df$c), function(x) as.integer(x ==
df$c)),
> > > df[4])
> > >
> > > o así
> > >
> > > library(data.table)
> > > setDT(df)[, c(levels(df$c), "c") :> > >    
c(lapply(levels(c), function(x) as.integer(x == c)), .(NULL))]
> > >
> > >
> > > Pero no me resuelve el tener que hacerlo algunos cientos de
veces, que
> es
> > > lo que querría evitar. Sé que es evidente cómo se tiene que
hacer, pero
> > soy
> > > ciego a esa evidencia :-(
> > >
> > > Muchas gracias por la ayuda
> > >
> > >
> > > --
> > > Juan Abasolo
> > >
> > > Hizkuntzaren eta Literaturaren Didaktika Saila
> > > Bilboko Hezkuntza Fakultatea
> > > Euskal Herriko Unibertsitatea
> > > UPV/EHU
> > >
> > > Sarriena auzoa z/g
> > > 48940 Leioa
> > > Bizkaia
> > >
> > >         [[alternative HTML version deleted]]
> > >
> > > _______________________________________________
> > > R-help-es mailing list
> > > R-help-es en r-project.org
> > > https://stat.ethz.ch/mailman/listinfo/r-help-es
> > >
> >
> >         [[alternative HTML version deleted]]
> >
> > _______________________________________________
> > R-help-es mailing list
> > R-help-es en r-project.org
> > https://stat.ethz.ch/mailman/listinfo/r-help-es
> >
>
>         [[alternative HTML version deleted]]
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
-- 
*Víctor Granda García*
Data Technician


v.granda en creaf.uab.cat
Tel. +34 93 581 33 53


Campus UAB. Edifici C. 08193 Bellaterra (Barcelona) | *www.creaf.cat*
<http://www.creaf.uab.es/cat/index.htm>

Abans d'imprimir aquest missatge electrònic penseu en el medi ambient.

	[[alternative HTML version deleted]]

Por cierto data.table tiene implementadas las funciones de reshape2 melt y dcast
pero mucho m?s r?pidasen ejecuci?n

Obtener Outlook para Android<https://aka.ms/ghei36>

________________________________
From: R-help-es <r-help-es-bounces en r-project.org> on behalf of V?ctor
Granda Garc?a <victorgrandagarcia en gmail.com>
Sent: Monday, June 25, 2018 4:23:52 PM
To: Fernando Reche Lorite
Cc: r-help-es
Subject: Re: [R-es] Transformar muchas variables factor en variables binarias de
acuerdo a niveles

En esta respuesta: https://stackoverflow.com/a/35663834/2301674

tienes como hacerlo (mucho m?s sencillo que en la que enlazas t?) con
reshape2 o si prefieres la versi?n "tidy" con dplyr y tidyr (la que yo
recomiendo, pero solo porque me gusta m?s).

Espero que te sirva

On Mon, 25 Jun 2018 at 16:08 Fernando Reche Lorite via R-help-es <
r-help-es en r-project.org> wrote:
> Puedes probar con la funci?n dummy del paquete dummies.
>
> Un saludo
> Fernando Reche Lorite
> Departamento de Matem?ticas
> Universidad de Almer?a
>
> El 25 de junio de 2018, 15:55, Carlos J. Gil Bellosta <
> cgb en datanalytics.com>
> escribi?:
>
> > ?No te vale model.matrix?
> >
> > El lun., 25 jun. 2018 a las 15:49, Juan Abasolo (<juan.abasolo en
ehu.eus>)
> > escribi?:
> >
> > > Buenas, compa?eros.
> > >
> > > Tengo una base de datos con bastantes variables todas medidas
como
> > factor,
> > > quiero que todos los factores pasen a ser variables binarias en
funci?n
> > de
> > > sus valores.
> > >
> > > En este ejemplo de Stackoverflow muestran como hacerlo con una
> variable:
> > >
> > > https://stackoverflow.com/questions/33990760/converting-
> > factors-to-binary-in-r
> > >
> > > df  <-data.frame(a = c(1,2,3), b = c(1,1,2), c > > >
c("Rose","Pink","Red"), d = c(2,3,4))
> > >
> > > cbind(df[1:2], sapply(levels(df$c), function(x) as.integer(x ==
df$c)),
> > > df[4])
> > >
> > > o as?
> > >
> > > library(data.table)
> > > setDT(df)[, c(levels(df$c), "c") :> > >    
c(lapply(levels(c), function(x) as.integer(x == c)), .(NULL))]
> > >
> > >
> > > Pero no me resuelve el tener que hacerlo algunos cientos de
veces, que
> es
> > > lo que querr?a evitar. S? que es evidente c?mo se tiene que
hacer, pero
> > soy
> > > ciego a esa evidencia :-(
> > >
> > > Muchas gracias por la ayuda
> > >
> > >
> > > --
> > > Juan Abasolo
> > >
> > > Hizkuntzaren eta Literaturaren Didaktika Saila
> > > Bilboko Hezkuntza Fakultatea
> > > Euskal Herriko Unibertsitatea
> > > UPV/EHU
> > >
> > > Sarriena auzoa z/g
> > > 48940 Leioa
> > > Bizkaia
> > >
> > >         [[alternative HTML version deleted]]
> > >
> > > _______________________________________________
> > > R-help-es mailing list
> > > R-help-es en r-project.org
> > > https://stat.ethz.ch/mailman/listinfo/r-help-es
> > >
> >
> >         [[alternative HTML version deleted]]
> >
> > _______________________________________________
> > R-help-es mailing list
> > R-help-es en r-project.org
> > https://stat.ethz.ch/mailman/listinfo/r-help-es
> >
>
>         [[alternative HTML version deleted]]
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
--
*V?ctor Granda Garc?a*
Data Technician


v.granda en creaf.uab.cat
Tel. +34 93 581 33 53


Campus UAB. Edifici C. 08193 Bellaterra (Barcelona) | *www.creaf.cat*
<http://www.creaf.uab.es/cat/index.htm>

Abans d'imprimir aquest missatge electr?nic penseu en el medi ambient.

        [[alternative HTML version deleted]]

_______________________________________________
R-help-es mailing list
R-help-es en r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

	[[alternative HTML version deleted]]