Hola,
¿Quieres ordenar de forma descendente cada una de las columnas de la
matriz?.
Lo puedes hacer de esta forma:
#---------------------------------------------------> my_mat <- matrix( sample(1:100,100), byrow=TRUE, ncol = 10, nrow=10)
> my_mat
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,] 52 51 68 89 86 12 1 70 7 14
[2,] 95 17 67 66 85 36 80 96 24 33
[3,] 32 13 100 91 90 8 27 29 35 53
[4,] 10 81 45 16 79 94 47 50 20 42
[5,] 5 69 4 40 3 93 59 6 2 57
[6,] 39 77 31 11 34 23 83 92 84 15
[7,] 44 88 26 48 64 49 54 99 55 82
[8,] 21 22 28 25 19 37 72 74 71 30
[9,] 75 18 65 97 78 73 43 61 41 63
[10,] 46 60 62 87 98 76 9 38 56 58> my_mat_ord <- apply(my_mat, 2, sort, decreasing = TRUE)
> my_mat_ord
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,] 95 88 100 97 98 94 83 99 84 82
[2,] 75 81 68 91 90 93 80 96 71 63
[3,] 52 77 67 89 86 76 72 92 56 58
[4,] 46 69 65 87 85 73 59 74 55 57
[5,] 44 60 62 66 79 49 54 70 41 53
[6,] 39 51 45 48 78 37 47 61 35 42
[7,] 32 22 31 40 64 36 43 50 24 33
[8,] 21 18 28 25 34 23 27 38 20 30
[9,] 10 17 26 16 19 12 9 29 7 15
[10,] 5 13 4 11 3 8 1 6 2 14
#---------------------------------------------------
Gracias,
Carlos Ortega
www.qualityexcellence.es
El 15 de mayo de 2017, 9:56, Manuel Máquez <manuelmx11 en gmail.com>
escribió:
> Estimados Colegas:
> Tengo 2 preguntas, la primera es como lo dice el asunto, ordenar una matriz
> parecida a:
> 0 16 10 20 16 9 14
> 16 0 8 4 2 13 14
> 10 8 0 2 13 4 6
> 20 4 2 0 19 3 25
> 16 2 13 19 0 17 31
> 9 13 4 3 17 0 7
> 14 14 6 25 31 7 0
> Pretendo que queden ordenados de manera descendente, pero siendo datos
> atómicos, el sistema no me deja . ¿Existe algún método para hacerlo?
> La otra es que pensando, podría extender la cantidad de líneas mostradas
> por RStudio cuando uso sink, cambie getOption("max.print) y ahora cada
vez
> que uso 'Source' me marca que R graphics 12, no lo soporta Rstudio.
¿Se
> puede corregir este error que hice?
> Esperando que alguien me pueda ayudar, les anticipo las gracias.
> Atentamente,
> *MANOLO MÁRQUEZ P.*
>
> [[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
>
--
Saludos,
Carlos Ortega
www.qualityexcellence.es
[[alternative HTML version deleted]]