向量的几个进阶小问题

1.如何将两个向量合到一起，组成一个长向量？

x=c(1,3,5)
y=c(2,3,4)
test=c(x,y)
test
## [1] 1 3 5 2 3 4

2.如何在向量首/尾增加一个元素？

x=c(3,x)
x=c(x,4)

3.如何在向量第n位增加一个元素？

n=3
x=c(1,3,5,8,6)
x
## [1] 1 3 5 8 6
y=c(x[1:n-1],7,x[n:length(x)])
y
## [1] 1 3 7 5 8 6

写成函数

join <- function(x,n,y){
  c(x[1:n-1],y,x[n:length(x)])
}
x=c(1,3,5,8,6)
join(x,3,7)
## [1] 1 3 7 5 8 6

前三个题的中心思想是c()的接收参数可以是单个元素，也可以是向量。其次是向量按照位置索引来取子集。

4.如果向量x和y内容一致但顺序不一致，如何按照x的顺序重排y

x=letters[1:5]
y=letters[c(3,1,2,5,4)]
match(x,y)
## [1] 2 3 1 5 4
y[match(x,y)]
## [1] "a" "b" "c" "d" "e"

5.如果列名顺序错乱，如何按照指定顺序重排

这是match的另一个应用：数据框列的顺序错乱，如何重排