Discussion:
[R-es] Frecuencia Columnas
Nacho García
2018-09-18 05:51:25 UTC
Permalink
Buenos días:

Tengo una matriz con las siguientes columnas:


Colum1 Colum2 Colum3
---------- ----------- -----------
A A B
B B A
B B B

Estoy intentando realizar una cuarta columna con el resultado de la observación más frecuente.


Gracias
Un saludo

_____


[[alternative HTML version deleted]]
Isidro Hidalgo Arellano
2018-09-18 10:07:06 UTC
Permalink
Una forma podría ser ésta:
datos = rbind(c("A","A","B"),
c("A","B","B"),
c("B","B","B"))
tabla = apply(datos, 1, table)
maximos = lapply(tabla, which.max)
datos = cbind(datos, lapply(maximos, attr, "names"))

Un saludo.

Isidro Hidalgo Arellano
Observatorio del Mercado de Trabajo
Consejería de Economía, Empresas y Empleo
http://www.castillalamancha.es/



-----Mensaje original-----
De: R-help-es <r-help-es-***@r-project.org> En nombre de Nacho García
Enviado el: martes, 18 de septiembre de 2018 7:51
Para: r-help-***@r-project.org
Asunto: [R-es] Frecuencia Columnas


Buenos d�as:

Tengo una matriz con las siguientes columnas:


Colum1 Colum2 Colum3
---------- ----------- -----------
A A B
B B A
B B B

Estoy intentando realizar una cuarta columna con el resultado de la observaci�n m�s frecuente.


Gracias
Un saludo

_____


[[alternative HTML version deleted]]
Isidro Hidalgo Arellano
2018-09-18 10:12:13 UTC
Permalink
Perdona, Nacho, la dimensión del primer "apply" es 2, no 1. El código queda así:
datos = rbind(c("A","A","B"),
c("A","B","B"),
c("B","B","B"))
datos
tabla = apply(datos, 2, table)
maximos = lapply(tabla, which.max)
datos = cbind(datos, lapply(maximos, attr, "names"))
Un saludo.

Isidro Hidalgo Arellano
Observatorio del Mercado de Trabajo
Consejería de Economía, Empresas y Empleo http://www.castillalamancha.es/

-----Mensaje original-----
De: Isidro Hidalgo Arellano <***@jccm.es>
Enviado el: martes, 18 de septiembre de 2018 12:07
Para: 'Nacho García' <***@hotmail.com>; 'r-help-***@r-project.org' <r-help-***@r-project.org>
Asunto: RE: [R-es] Frecuencia Columnas

Una forma podría ser ésta:
datos = rbind(c("A","A","B"),
c("A","B","B"),
c("B","B","B"))
tabla = apply(datos, 1, table)
maximos = lapply(tabla, which.max)
datos = cbind(datos, lapply(maximos, attr, "names"))

Un saludo.

Isidro Hidalgo Arellano
Observatorio del Mercado de Trabajo
Consejería de Economía, Empresas y Empleo http://www.castillalamancha.es/



-----Mensaje original-----
De: R-help-es <r-help-es-***@r-project.org> En nombre de Nacho García Enviado el: martes, 18 de septiembre de 2018 7:51
Para: r-help-***@r-project.org
Asunto: [R-es] Frecuencia Columnas


Buenos d as:

Tengo una matriz con las siguientes columnas:


Colum1 Colum2 Colum3
---------- ----------- -----------
A A B
B B A
B B B

Estoy intentando realizar una cuarta columna con el resultado de la observaci n m s frecuente.


Gracias
Un saludo

_____


[[alternative HTML version deleted]]

Loading...