Ø sort
sort(x, decreasing = FALSE, ...)
## Default S3 method:
sort(x, decreasing = FALSE, na.last = NA, ...)
sort.int(x, partial = NULL, na.last = NA, decreasing = FALSE,
method = c("shell", "quick"), index.return = FALSE)
is.unsorted(x, na.rm = FALSE, strictly = FALSE)
> x<-c(12,9,5,7,15,NA,7,8,NA,13)
> sort(x,na.last = TRUE)
[1] 5 7 7 8 9 12 13 15 NA NA
> sort(x,na.last = FALSE)
[1] NA NA 5 7 7 8 9 12 13 15
> sort(x,na.last = NA)
[1] 5 7 7 8 9 12 13 15
Ø order
order(..., na.last = TRUE, decreasing = FALSE) 位置索引
> d<-data.frame(x=c(13,45,13,45,13),y=c(3,1,2,2,3),t=c(56,7,68,3,1))
> d[ order( d$x,d$y ), ] x升序,y升序
x y t
3 13 2 68
1 13 3 56
5 13 3 1
2 45 1 7
4 45 2 3
> d[ order( -d$x,d$y ), ] x降序,y升序
x y t
2 45 1 7
4 45 2 3
3 13 2 68
1 13 3 56
5 13 3 1
Ø rank
rank(x, na.last = TRUE,
ties.method = c("average", "first", "random", "max", "min"))
> x<-c(12, 5, 7, 15, NA, 7, 12)
> sort(x,na.last = TRUE)
[1] 5 7 7 12 12 15 NA
> rank(x,na.last = TRUE) 位置索引
[1] 4.5 1 2.5 6 7 2.5 4.5
Ø arrange
> head(arrange(mtcars, cyl, disp)) 多個關鍵字排序
mpg cyl disp hp drat wt qsec vs am gear carb
1 33.9 4 71.1 65 4.22 1.835 19.90 1 1 4 1
2 30.4 4 75.7 52 4.93 1.615 18.52 1 1 4 2
3 32.4 4 78.7 66 4.08 2.200 19.47 1 1 4 1
4 27.3 4 79.0 66 4.08 1.935 18.90 1 1 4 1
5 30.4 4 95.1 113 3.77 1.513 16.90 1 1 5 2
6 22.8 4 108.0 93 3.85 2.320 18.61 1 1 4 1
> head(arrange(mtcars, cyl, desc(disp)))
mpg cyl disp hp drat wt qsec vs am gear carb
1 24.4 4 146.7 62 3.69 3.190 20.00 1 0 4 2
2 22.8 4 140.8 95 3.92 3.150 22.90 1 0 4 2
3 21.4 4 121.0 109 4.11 2.780 18.60 1 1 4 2
4 26.0 4 120.3 91 4.43 2.140 16.70 0 1 5 2
5 21.5 4 120.1 97 3.70 2.465 20.01 1 0 3 1
6 22.8 4 108.0 93 3.85 2.320 18.61 1 1 4 1