我想交织两个相同模式和相同长度的向量.说:
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完成同样的事情？
我有一个矢量:
> dput(rn, 20)
c(128L, 241L, 354L, 467L, 580L, 693L, 806L, 919L, 1032L, 1145L,
1258L, 1371L, 1484L, 1597L, 1710L, 1823L, 1936L, 2049L, 2162L,
2275L)
如何从此向量中获取每个第三条记录？