r - 在R中将一个数据帧添加到另一数据帧的末尾

Question

我很难将一个添加到另一个数据框的底部。

我有一个具有1行5列的数据帧（我们称之为DF1）。我有另一个数据框（叫它DF2），它有50行和5列。我将其设置为使两个数据帧之间的列都匹配-它们具有相同的列。实际上，DF1是基于DF2的计算。

这是DF1的样子：

   row.names     pt1     pt2     pt3     pt4
   calc          0.93    0.45    0.28    0.54

这是DF2的样子：

   row.names     pt1     pt2     pt3     pt4
   SNP1          AA      AG      AG      AA       
   SNP2          CT      CT      TC      CC
   SNP3          GG      CG      CG     <NA>
   SNP4          AA      GG      AG      AA
   SNP5         <NA>    <NA>    <NA>    <NA>

DF1应该是实际数据点的数量（不丢失的值数量）除以可能值的总数。

所以..我想将DF1添加到DF2的底部，如下所示：

   row.names     pt1     pt2     pt3     pt4
   SNP1          AA      AG      AG      AA       
   SNP2          CT      CT      TC      CC
   SNP3          GG      CG      CG     <NA>
   SNP4          AA      GG      AG      AA
   SNP5         <NA>    <NA>    <NA>    <NA>
   calc          0.93    0.45    0.28    0.54

当我尝试使用

 both.dfs <- rbind(DF1, DF2)  # DF1 is first here

DF1是DF2中的第一行。我需要成为最后一行。

当我尝试使用

both.dfs <- rbind(DF2, DF1)  # DF2 is first here

我收到一个错误：

Warning messages:
1: In `[<-.factor`(`*tmp*`, iseq, value = 0.84) :
  invalid factor level, NAs generated
2: In `[<-.factor`(`*tmp*`, iseq, value = 0.84) :
  invalid factor level, NAs generated
3: In `[<-.factor`(`*tmp*`, iseq, value = 0.84) :
  invalid factor level, NAs generated
4: In `[<-.factor`(`*tmp*`, iseq, value = 0.74) :
  invalid factor level, NAs generated

我尝试了合并，我尝试将新行添加到DF2，然后将DF2的值减为零。似乎没有任何作用！我迫切需要一些帮助！任何人？

Answer 1

这是您应该做的：

DFtranspose <- cbind(t(DF1[2, ]), t(DF2))
rownames(DFtranspose) <- DF1[1, ]