目标:我正在编写的函数的一部分要求复制每个变量/列的每个值。我有复制每一列的代码,但现在我需要将它们连接在一起。例如123到123123。
考虑到这一点,给定一个数据框:
df <- data.frame(a = c(rep(c(111,222,333),2)), b = c(rep(c(111,222,333),2)),
c = c(rep(c(444,555,666),2)), d = c(rep(c(444,555,666),2)))
Run Code Online (Sandbox Code Playgroud)
您如何将每两列粘贴在一起以实现此目的或类似目的:
"111111" "222222" "333333" "111111" "222222" "333333" "444444" "555555" "666666" "444444" "555555" "666666"
Run Code Online (Sandbox Code Playgroud)
换句话说,串连df[, 1]和df[, 2],df[, 3]和df[, 4]等
我从这里尝试过这段代码:
i <- seq.int(1L,length(df),by = 2L)
paste0(df[, i],df[ , i])
Run Code Online (Sandbox Code Playgroud)
但它返回这个:
[1] "c(111, 222, 333, 111, 222, 333)c(111, 222, 333, 111, 222, 333)"
[2] "c(444, 555, 666, 444, 555, 666)c(444, 555, 666, …Run Code Online (Sandbox Code Playgroud)