Re: [R-es] PCA
Gracias por su ayuda El 30/11/23, Marcelino de la Cruz Rot escribió: > Hola, José: > > Ahí va un ejemplo: > > library(vegan) > library(FD) > > # datos categóricos de ejemplo > dataf <- data.frame(FA = factor(sample(letters[1:3], 10, rep=T)), FB = > factor(sample(letters[1:3], 10, rep=T))) > dataf > > # Obtén una matriz de distancia para tus datos (esta es una posibilidad) > dataf.dist <- FD::gowdis(dataf) > > # Haz una ordenación > dataf.PCA <- vegan::capscale(dataf.dist~1) > dataf.PCA > plot(dataf.PCA) > > > > > Un saludo. > El 30/11/2023 a las 14:34, Jose Betancourt Bethencourt escribió: >> -Estimados >> >> apreciaría recibir un script para el análisis de componentes principales >> de >> datos categóricos >> >> saludos >> >> José >> >> [[alternative HTML version deleted]] >> >> ___ >> R-help-es mailing list >> R-help-es@r-project.org >> https://stat.ethz.ch/mailman/listinfo/r-help-es > > > -- > Marcelino de la Cruz Rot > Depto. de Biología y Geología > Física y Química Inorgánica > Universidad Rey Juan Carlos > Móstoles España > > ___ > R-help-es mailing list > R-help-es@r-project.org > https://stat.ethz.ch/mailman/listinfo/r-help-es > -- Dr. Jose A. Betancourt Bethencourt Universidad de Ciencias Medicas Carlos j. Finlay ___ R-help-es mailing list R-help-es@r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es
Re: [R-es] PCA
Hola, José: Ahí va un ejemplo: library(vegan) library(FD) # datos categóricos de ejemplo dataf <- data.frame(FA = factor(sample(letters[1:3], 10, rep=T)), FB = factor(sample(letters[1:3], 10, rep=T))) dataf # Obtén una matriz de distancia para tus datos (esta es una posibilidad) dataf.dist <- FD::gowdis(dataf) # Haz una ordenación dataf.PCA <- vegan::capscale(dataf.dist~1) dataf.PCA plot(dataf.PCA) Un saludo. El 30/11/2023 a las 14:34, Jose Betancourt Bethencourt escribió: -Estimados apreciaría recibir un script para el análisis de componentes principales de datos categóricos saludos José [[alternative HTML version deleted]] ___ R-help-es mailing list R-help-es@r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es -- Marcelino de la Cruz Rot Depto. de Biología y Geología Física y Química Inorgánica Universidad Rey Juan Carlos Móstoles España ___ R-help-es mailing list R-help-es@r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es
[R-es] PCA
-Estimados apreciaría recibir un script para el análisis de componentes principales de datos categóricos saludos José [[alternative HTML version deleted]] ___ R-help-es mailing list R-help-es@r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es
[R-es] PCA output
Estimados �C�mo se puede exportar los resultados de summary(res.pca) a un archivo que deseemos sea en pdf o htlm? Como hemos visto en otros an�lisis saludos library(FactoMineR) res.pca<-PCA(X, scale.unit = TRUE, dimensiones , graph = TRUE, axes = c(1,2)) summary(res.pca) X Max,TemperatureF Mean,TemperatureF Min,TemperatureF Max,Dew,PointF MeanDew,PointF Min,DewpointF Max,Humidity Mean,Humidity Min,Humidity 1 82 75 68 62 58 54 72 56 2 82 74 67 61 58 56 74 58 3 84 75 66 62 58 52 77 58 4 82 73 65 61 57 54 76 59 5 83 75 66 60 58 54 73 57 6 84 73 62 64 59 56 83 64 7 85 75 65 61 58 54 76 58 8 85 76 66 60 56 49 73 53 9 84 74 64 60 55 49 72 53 10 84 75 65 60 57 52 72 54 11 84 75 65 61 56 49 74 53 12 87 76 64 63 55 50 72 52 13 86 76 64 61 57 50 75 54 14 86 77 67 59 56 51 70 51 15 85 76 68 62 60 57 76 58 16 87 77 67 66 61 56 81 59 17 89 77 66 68 62 56 84 63 18 88 77 67 68 61 55 85 62 19 88 79 70 65 63 60 78 61 20 85 76 68 66 62 58 85 66 21 84 76 68 67 64 60 88 69 22 85 76 66 68 63 57 92 70 23 81 73 66 70 66 64 98 83 24 85 76 67 68 64 61 88 70 25 85 77 70 67 64 62 82 65 26 84 77 70 68 64 62 85 66 27 84 76 68 67 64 62 84 68 28 82 74 66 68 64 60 90 73 29 83 74 65 69 63 57 96 73 30 83 76 68 66 63 60 82 67 31 85 77 69 65 62 58 82 62 32 85 76 68 67 65 61 90 72 33 84 75 67 68 63 59 90 67 34 84 75 66 68 63 57 91 69 35 85 76 66 69 64 59 95 71 36 84 75 66 68 63 58 88 68 37 82 74 66 71 65 62 100 78 38 84 75 66 70 66 62 99 81 39 85 75 64 70 66 61 93 79 40 84 75 66 70 65 60 93 76 41 84 74 65 69 65 61 93 77 42 82 74 67 70 67 64 95 82 43 81 74 66 70 66 62 94 81 44 83 73 64 70 65 60 94 78 45 83 74 65 70 65 61 93 80 46 82 75 66 71 66 63 94 80 47 81 73 65 67 64 60 88 75 48 84 74 64 64 60 56 79 62 49 84 76 67 66 62 59 83 65 50 84 75 65 69 64 61 89 72 51 85 76 67 65 62 58 80 63 -- Este mensaje le ha llegado mediante el servicio de correo electronico que ofrece Infomed para respaldar el cumplimiento de las misiones del Sistema Nacional de Salud. La persona que envia este correo asume el compromiso de usar el servicio a tales fines y cumplir con las regulaciones establecidas Infomed: http://www.sld.cu/ [[alternative HTML version deleted]] ___ R-help-es mailing list R-help-es@r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es