【发布时间】:2016-02-02 02:58:30
【问题描述】:
当我表演时:
a <- seq(1,1.5,0.1)
b <- c(1,1.1,1.4,1.5)
x <- rep(c(a,b),times=c(2,1))
rep(c(a, b), c(2, 1)) 中的错误:'times' 参数无效
为什么?
【问题讨论】:
-
当你连接它是一个向量。
当我表演时:
a <- seq(1,1.5,0.1)
b <- c(1,1.1,1.4,1.5)
x <- rep(c(a,b),times=c(2,1))
rep(c(a, b), c(2, 1)) 中的错误:'times' 参数无效
为什么?
【问题讨论】:
当我们连接 (c) 两个向量时,它变成了一个向量。如果这个想法是将“a”复制 2 并将“b”复制 1,我们将它们放在 list 中,并使用 rep。输出将是list,可以通过unlisted 得到vector。
unlist(rep(list(a,b), c(2,1)))
【讨论】:
rep(c(0,7),times=c(4,2)) 时它正在工作。所以我很困惑。
标记的答案已经很完美了:这里是使用mapply的替代方法
unlist(mapply(function(x,n)rep(x,n),list(a,b),c(2,1)))
【讨论】: