使在长度

Question

等于两个不同长度的向量I具有两种不同长度的两个向量。我怎样才能开始这两个系列，以便他们的结尾安静。

x<-c(1,2,3,4,5,6,7,8,9,10,11,12,1,2,3,4,5,6) 
y<-c(1,2,3,4,5,6,7,8,9,10,11,12,1,2,3,4) 

我这样做是与下面的代码，但我想必须有一个更优雅的方式

x<-x[((length(x)-length(y))+1):length(x)] 

x 
[1] 3 4 5 6 7 8 9 10 11 12 1 2 3 4 5 6 
y 
[1] 1 2 3 4 5 6 7 8 9 10 11 12 1 2 3 4 

Answer 1

使用tail，并min确定最短向量：

shortest <- min(length(x), length(y)) 
y <- tail(y, shortest) 
x <- tail(x, shortest)