我想交织两个相同模式和相同长度的向量.说:
a <- rpois(lambda=3,n=5e5)
b <- rpois(lambda=4,n=5e5)
我想交织或交织这两个向量,以创建一个等价的向量 c(a[1],b[1],a[2],b[2],...,a[length(a)],b[length(b)])
我的第一次尝试是这样的:
sapply(X=rep.int(c(3,4),times=5e5),FUN=rpois,n=1)
但它需要rpois被召唤的次数远远超过需要.
到目前为止,我最好的尝试是将其转换为矩阵并重新转换为向量:
d <- c(rbind(rpois(lambda=3,n=5e5),rpois(lambda=4,n=5e5)))
d <- c(rbind(a,b))
有没有更好的方法去做呢？或者在基地有一个功能R完成同样的事情？