将列拆分并添加到数据帧-R

我有一个具有以下结构的数据帧（由连续对构建）：

Name    Var1    Var2    Comments
A       0.5     4       Zone1
A1      0.9     5       Zone2
B       0.3     55      Zone1
B1      0.1     7       Zone2
C       2       8       Zone1
C       3       9       Zone2
D       0.2     0.6     Zone1
D       3       4       Zone2

Name    Var1    Var2    Comments    Name.1  Var3    Var4    Comments.1
A       0.5     4       Zone1       A1      0.9     5       Zone2
B       0.3     55      Zone1       B1      0.1     7       Zone2
C       2       8       Zone1       C       3       9       Zone2
D       0.2     0.6     Zone1       D       3       4       Zone1

我希望将其拆分并保存在具有以下结构的新数据帧中：

Name    Var1    Var2    Comments
A       0.5     4       Zone1
A1      0.9     5       Zone2
B       0.3     55      Zone1
B1      0.1     7       Zone2
C       2       8       Zone1
C       3       9       Zone2
D       0.2     0.6     Zone1
D       3       4       Zone2

Name    Var1    Var2    Comments    Name.1  Var3    Var4    Comments.1
A       0.5     4       Zone1       A1      0.9     5       Zone2
B       0.3     55      Zone1       B1      0.1     7       Zone2
C       2       8       Zone1       C       3       9       Zone2
D       0.2     0.6     Zone1       D       3       4       Zone1

可能吗？谁能帮帮我吗

---

谢谢

您应该能够按区域分割数据（我假设Comments.1中的区域1是一个错误…），然后将它们重新绑定在一起：

wide<-cbind(df[df$Comments=="Zone1",],df[df$Comments=="Zone2",])

---

wide您应该能够按区域分割数据（我假设Comments.1中的区域1是一个错误…），然后将它们重新绑定在一起：

wide<-cbind(df[df$Comments=="Zone1",],df[df$Comments=="Zone2",])

wide谢谢，的确，Zone1是一个错误。当我得到重复的标题（Var1、Var2和Comments）时，它们是否可能被命名为Var1.1、Var2.1和Comments.1（运行sertnames会更容易）？这是有效的：colnames（wide）这种方式会导致数据排序错误的潜在问题。最好使用一个键变量链接匹配的区域，然后使用tidyr或REFORMATE从那里转到宽格式…根据Akrun到Arun的重复答案的链接，您可以使用：library（data.table）dfThanks，事实上，Zone1是一个错误。当我得到重复的标题（Var1、Var2和Comments）时，它们是否可能被命名为Var1.1、Var2.1和Comments.1（运行sertnames会更容易）？这是有效的：colnames（wide）这种方式会导致数据排序错误的潜在问题。最好使用一个关键变量链接匹配的区域，然后使用tidyr或REFORMATE从那里转到宽格式…根据Akrun到Arun的重复答案的链接，您可以使用：library（data.table）df