Hola,

El problema está con el nombre de las columnas y las filas del fichero que
importas.
Mira este detalle tras hacer la importación:

> names(mort)
 [1] "X"                 "X15.24..79."       "X25.34..79."
 [4] "X35.44..79."       "X45.54..79."       "X55.64..79."
 [7] "X65.74..79."       "X75.84..79."       "X85.94..79."
[10] "X95.and.more..79." "X15.24..06."       "X25.34..06."
[13] "X35.44..06."       "X45.54..06."       "X55.64..06."
[16] "X65.74..06."       "X75.84..06."       "X85.94..06."
[19] "X95.and.more..06."
> head(mort$X)
[1] Accidental poisoning
[2] Addiction to prescription medication
[3] Alcohol abuse and alcohol-related psychosis
[4] Asthma
[5] Blood and hematopoietic disorders
[6] Cerebrovascular disease
65 Levels: 1109 1869 36 ... Viral hepatitis

En cambio mira el dataset "mortality":
> names(mortality)
 [1] "15-24 (79)"       "25-34 (79)"       "35-44 (79)"
 [4] "45-54 (79)"       "55-64 (79)"       "65-74 (79)"
 [7] "75-84 (79)"       "85-94 (79)"       "95 and more (79)"
[10] "15-24 (06)"       "25-34 (06)"       "35-44 (06)"
[13] "45-54 (06)"       "55-64 (06)"       "65-74 (06)"
[16] "75-84 (06)"       "85-94 (06)"       "95 and more (06)"
> head(rownames(mortality))
[1] "Accidental poisoning"
[2] "Addiction to prescription medication"
[3] "Alcohol abuse and alcohol-related psychosis"
[4] "Asthma"
[5] "Blood and hematopoietic disorders"
[6] "Cerebrovascular disease"

Entonces tienes que:

   - Hacer que los rownames de "mort" sean mort$X. Esto se hace así:
   rownames(mort) <- mort$X
   - Y los names de "mort" tengan la misma forma que en mortality. Si no
   cuando haces el análisis el que digas name.group=c("1979","2006"), no
   funciona...


Saludos,
Carlos Ortega
www.qualityexcellence.es


El 17 de noviembre de 2013 12:19, Dr. José A Betancourt Bethencourt <
jbetancourt@iscmc.cmw.sld.cu> escribió:

>
>
> Estimados
>
> Queremos con el paquete FactoMineR  hacer este tipo de tabla de mortalidad
> que lea los datos desde de una tabla csv
>
> Realizamos lo que viene en la ayuda y es muy interesante, sin embargo
> cuando mandamos a leer desde la tabla csv original de los autores
>
> no hace el análisis porque algo falta y no nos percatamos de que es.
> Adjunto tabla original
>
> Saludos cordiales
>
>
>
> #ESTO ES LO QUE VIENE EN LA AYUDA Y TRABAJA BIEN
>
> rm(list = ls())
>
> library(FactoMineR)
>
> data(mortality)
>
> library(epicalc)
>
> des(mortality) #Agregue esto para comparar las dos datas
>
> res<-MFA(mortality,group=c(9,9),type=c("f","f"),  # REALIZA EL ANÁLISIS
> BIEN
>
>          name.group=c("1979","2006"))
>
> plot(res,choix="freq",invisible="ind",habillage="group")
>
>
>
> #CON LA TABLA ORGINAL en csv NO NOS FUNCIONA, ?algo nos falta?
>
>
>
> rm(list = ls())
>
> setwd("D:/Public/Documents/R/FactoMineR/")
>
> mortality<-read.csv("mortality.csv",header=TRUE,sep=",", dec=".")
>
> library(epicalc)
>
> des(mortality) #Agregue esto para comparar las dos datas y difieren los
> resultados
>
> library(FactoMineR)
>
> res<-MFA(mortality,group=c(9,9),type=c("f","f"),   #NO REALIZA EL ANÁLISIS
>
>          name.group=c("1979","2006"))
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>


-- 
Saludos,
Carlos Ortega
www.qualityexcellence.es

	[[alternative HTML version deleted]]

