如何重复数据框的一列，并按行将其与R中的另一个数据框连接起来？
假设我们有一个包含5列的数据帧df1，另一个包含仅列的数据帧df2，但两个数据帧中列的数据类型相同。现在，我们可能想通过创建与第一个数据帧中相同的列数，从第一个数据帧的行的末尾开始添加第二个数据帧的列。研究人员可能需要这样做，以了解外部变量对分析结果的影响，并且可以借助智能函数来完成。
请看以下数据帧-
示例
set.seed(259) x1<-sample(0:9,20,replace=TRUE) x2<-sample(1:10,20,replace=TRUE) x3<-sample(11:20,20,replace=TRUE) x4<-sample(16:20,20,replace=TRUE) x5<-sample(41:50,20,replace=TRUE) df1<-data.frame(x1,x2,x3,x4,x5) df1
输出结果
x1 x2 x3 x4 x5 1 3 2 19 16 41 2 8 3 14 17 47 3 6 10 13 17 50 4 1 10 18 20 50 5 5 5 13 18 49 6 3 10 13 19 48 7 3 8 13 16 48 8 8 1 15 17 49 9 9 6 13 16 50 10 7 5 19 19 43 11 3 10 12 17 42 12 4 5 17 18 47 13 7 9 13 19 48 14 8 5 11 19 41 15 3 1 19 18 50 16 9 2 16 17 41 17 0 5 17 19 42 18 2 7 11 17 42 19 3 1 14 18 41 20 1 2 19 18 47
示例
x1<-sample(0:50,20) df2<-data.frame(x1) df2
输出结果
x1 1 45 2 25 3 24 4 46 5 32 6 3 7 30 8 6 9 14 10 36 11 1 12 34 13 47 14 9 15 22 16 21 17 16 18 44 19 31 20 26
通过将df2的列重复到df1中的列数来将df2列与df1连接-
示例
data.frame(sapply(df1,c,unlist(df2)),row.names=NULL)
输出结果
x1 x2 x3 x4 x5 1 9 4 12 16 48 2 2 9 16 19 47 3 6 7 17 17 46 4 1 8 17 16 44 5 3 8 12 18 44 6 4 8 16 20 42 7 6 3 13 17 41 8 0 3 18 18 43 9 8 9 11 17 46 10 4 9 14 16 44 11 2 3 20 18 44 12 9 3 11 20 45 13 4 1 12 17 42 14 6 8 11 17 47 15 3 8 20 18 47 16 8 8 12 20 43 17 5 4 18 18 48 18 4 4 15 16 43 19 9 7 11 17 50 20 2 7 11 20 44 21 34 34 34 34 34 22 8 8 8 8 8 23 30 30 30 30 30 24 6 6 6 6 6 25 12 12 12 12 12 26 7 7 7 7 7 27 36 36 36 36 36 28 31 31 31 31 31 29 44 44 44 44 44 30 24 24 24 24 24 31 26 26 26 26 26 32 22 22 22 22 22 33 14 14 14 14 14 34 2 2 2 2 2 35 33 33 33 33 33 36 9 9 9 9 9 37 15 15 15 15 15 38 11 11 11 11 11 39 19 19 19 19 19 40 32 32 32 32 32