¿Alguien podría identificar tirios y troyanos?

Con los datos

pcts <- cbind(
  c(35.7, 19.6, 6.6, 16.6, 9.6),
  c(0.3, 0.2, 0.2, 0.3, 0.8),
  c(25.0, 14.9, 10.7, 32.7, 12.9),    
  c(1.6, 8.0, 8.5, 6.5, 7.9), 
  c(11.0, 18.7, 7.9, 12.7, 8.0),
  c(3.2, 21.5, 52.9, 16.7, 47.9)
)
 
totales <- c(1102, 975, 596, 638,	174)	
 
tabla <- round(t(pcts * totales / 100))

y el concurso de

library(MASS)
biplot(corresp(tabla, nf = 2))

genero

partidos_cadenas

que a lo mejor no resulta demasiado interesante si no añado que las columnas se refieren a partidos políticos y las filas a cadenas en las que, según el CIS, sus votantes prefieren para seguir la actualidad política. Eso sabido, ¿cuál es cuál?

2 comentarios sobre “¿Alguien podría identificar tirios y troyanos?

  1. Luis Cajachahua 2 junio, 2016 6:13

    Hola Carlos, soy Luis , de DMC. Estamos tratando de contactarte por todos los medios infructuosamente. Por favor, escríbeme lo más pronto que puedas. Un cordial saludo.

  2. José Luis 2 junio, 2016 19:36

    jejeje. Mucho mejor que una tabla.


    rownames(tabla) <- c("TVE1", "TVE2","A3","LaCuatro","T5","LaSexta")
    colnames(tabla) <- c("PP","PSOE","Podemos","Ciudadanos","IU")

Los comentarios están desabilitados.