合并R中的非重复行

合并R中的非重复行,r,data-management,R,Data Management,我在谷歌上搜索了很多,在任何地方都能找到答案,但这可能是因为我无法用几句话很好地解释它 Coffee| |Steve Coffee| Cup | | Turkey| Fork| | |Fork |Mike 我想把这四行中的数据合并成两行以便显示 Coffee|Cup|Steve Turkey|Fork|Mike 我非常感谢你的帮助。我是全新的代码。从长远来看,我认为这是有益的,而且工作速度更快 谢谢我认为最好将表分解成一个列表,删除NA值,然后使用

我在谷歌上搜索了很多,在任何地方都能找到答案,但这可能是因为我无法用几句话很好地解释它

Coffee|     |Steve

Coffee| Cup |     |

Turkey| Fork|     |

      |Fork |Mike
我想把这四行中的数据合并成两行以便显示

Coffee|Cup|Steve

Turkey|Fork|Mike
我非常感谢你的帮助。我是全新的代码。从长远来看,我认为这是有益的,而且工作速度更快


谢谢

我认为最好将表分解成一个列表,删除NA值,然后使用unique。然后,您可以将其转换回数据帧。我正在使用
read\u r
在这里创建一个数据帧,但其余的是Base r

myTab <- readr::read_csv("h1,h2,h3
Coffee,,Steve
Coffee,Cup,
Turkey,Fork,
,Fork,Mike")

myTab

## # A tibble: 4 x 3
##   h1     h2    h3   
##   <chr>  <chr> <chr>
## 1 Coffee NA    Steve
## 2 Coffee Cup   NA   
## 3 Turkey Fork  NA   
## 4 NA     Fork  Mike 

myTab <- lapply(myTab, na.omit)
myTab <- lapply(myTab, as.character)
myTab <- lapply(myTab, unique)

myTab <- data.frame(myTab)

myTab

##      h1   h2    h3
## 1 Coffee  Cup Steve
## 2 Turkey Fork  Mike
myTab使用
library(tidyverse)
并对数据集做出大胆假设:

df <- data.frame(food = c("Coffee","Coffee","Turkey", NA), 
             utensil = c(NA, "Cup", "Fork", "Fork"), 
             name = c("Steve", NA, NA, "Mike"))
df <- df %>%
  group_by(food) %>%
  arrange(utensil) %>%
  fill(utensil) %>%
  group_by(utensil) %>%
  arrange(food) %>%
  fill(food) %>%
  drop_na()
df%
排列(器具)%>%
填充(器具)%>%
分组单位(器具)%>%
安排(食物)%>%
填充(食物)%>%
滴_na()

您可以发布样本数据吗?请使用
dput(df)
的输出编辑问题。或者,如果dput(头部(df,20))的输出太大
。(
df
是您的数据集的名称。)很遗憾,示例数据不可能看起来相似,可能会有所帮助。如果您不确定如何将示例数据添加到问题中,请提供针对R