T
-----
2016m1
2016m10
2016m11
2016m12
2016m2
2016m3
2016m4
2016m5
2016m6
2016m7
2016m8
2016m9

Quiero organizar esta tabla, como la tabla de abajo.

T
-----
2016m1
2016m2
2016m3
2016m4
2016m5
2016m6
2016m7
2016m8
2016m9
2016m10
2016m11
2016m12

Entonces, ¿alguien puede ayudarme?

1
j235 7 sep. 2018 a las 22:35

3 respuestas

La mejor respuesta

O usando base-R donde su vector de datos es T :

T[order(sapply(T, function(l) as.integer(substr(l, 6, nchar(l)+1))))]
1
Martin Seehafer 7 sep. 2018 a las 19:58

Usar regex con gsub es algo como esto:

Suponiendo que T es un data.frame

last_digits <- as.numeric(gsub("[0-9]{4}m","",T[,1]))
T[order(last_digits),] #Ordered dataframe

Explicación de expresiones regulares

[0-9]{4}m Busca exactamente 4 dígitos, si desea usar un rango de números puede usar {num_1-num_2}, después de encontrar la "regla", buscará la letra m.

1
Víctor Cortés 7 sep. 2018 a las 23:41

Con mixedsort de gtools:

library(gtools)
df$T <- mixedsort(df$T)

O mixedorder:

df$T <- df$T[mixedorder(df$T)]

Salida:

         T
1   2016m1
2   2016m2
3   2016m3
4   2016m4
5   2016m5
6   2016m6
7   2016m7
8   2016m8
9   2016m9
10 2016m10
11 2016m11
12 2016m12

Datos:

df <- structure(list(T = c("2016m1", "2016m10", "2016m11", "2016m12", 
"2016m2", "2016m3", "2016m4", "2016m5", "2016m6", "2016m7", "2016m8", 
"2016m9")), .Names = "T", class = "data.frame", row.names = c(NA, 
-12L))
3
avid_useR 7 sep. 2018 a las 19:44