请教一下各位,我现在有一个长数据集,我想在第五行之后,每五行截一下,截下来的部分拼接到数据集的右边,请看下面代码. before 是现在的数据集,我想让它变成 after 的样子. 请问有办法吗? 感谢! 我在网上找到了一些 long to wide 的function,但好像不是用来干这个的.
num1 <- 1:5
num2 <- 6:10
num3 <- 11:15
char1 <- letters[1:5]
char2 <- letters[6:10]
char3 <- letters[11:15]
before <- rbind(cbind(num1, char1), cbind(num2, char2), cbind(num3, char3))
after <- cbind(num1, char1, num2, char2, num3, char3)