把矢量作为子矢量到另一个向量R

Question

我有两个向量(1,2,3,4,5,6,7,8)和(543,544,545) 我想将放第二个到第一个从第三位置开始的，所以结果(1,2,543,544,545,6,7,8)

x <- c(1:8) 
r <- c(543:545) 

# I tried 
replace(x,3,r) 

# or like 
replace(3:length(r),1,r) 

但它不起作用。

Answer 1

最简单的方法是用c()做平凡：

x <- 1:8 
r <- c(543,544,545) 
c(x[1:2], r ,x[3:length(x)]) 

另一种选择是append()：

append(x, values=r, after=2) 

这不正是我与c()之前。

如果你想替换值，而不是追加新的，你应该弗兰克的解决方案去

replace(x, list=2+1:length(r), r) 

或手动

x[2+1:length(r)] <- r 

它修改x而不是创建新载体。

Answer 2

这是另一种方式。你会得到你想要使用的矢量的长度，在我的方法中是y。然后，您可以指示向量中的特定位置（即，x），以替换该向量的一部分。在这种情况下，您需要告知x（即x[c(3:(3+z))]）中第3个位置需要多少个头寸。您在x的指定位置分配y。

x <- 1:8 
y <- 543:545 

z <- length(y)-1 

x[c(3:(3+z))] <- y 

#x 
#[1] 1 2 543 544 545 6 7 8