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

Question

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

将 A 和 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,] )

QXN 的各种列类型的“最低公用类型分母”可能会成为NXM 中的列类型。数据框的情况与矩阵的情况有些不同。