从一个数据帧读取行并将其写入另一个数据帧的列

Question

我想从一个数据帧中读取一行，并将该行数据附加到另一个数据帧的列中。尺寸兼容。如何做到这一点？

定义A＆amp; B为3X3帧：

A <- data.frame(c(1:3),c(4:6),c(7:9))

A是：

 c.1.3. c.4.6. c.7.9.
1      1      4      7
2      2      5      8
3      3      6      9

B <- data.frame(c(13:15),c(16:18),c(19:21))

B是：

 c.13.15. c.16.18. c.19.21.
1       13       16       19
2       14       17       20
3       15       18       21

我想将B的最后一行添加到A中的新列，以便我进入A：

1      1      4      7    15
2      2      5      8    18
3      3      6      9    21

这很有效。有更简单的方法吗？

A[, 4] <- unlist(B[3, ])
A[,5] <- NULL

Answer 1

为什么不：

i <- sample(nrow(NXM) , 1)  # pick a row, .... any row
NXM[ , i] <-  unlist( QXN[i, ] (

或者：

 A[,4] <- t( B[3,] )

＆＃34;最低的共同类型分母＆＃34;有潜在的缺点。对于各种列类型的QXN，将成为NXM中的列类型。数据框的情况与矩阵情况有点不同。