答案 0 :(得分:1)
这是一个可行的选项。 W遍历数据集的unique
names
,使用==
创建逻辑索引,提取列unlist
,创建data.frame
,然后{ {1}}它在一起或仅使用cbind
(假设每个集合的重复元素数相等)
data.frame
data.frame(lapply(unique(names(df1)), function(x)
setNames(data.frame(unlist(df1[names(df1)==x], use.names = FALSE)), x)))
# type model make
#1 a b c
#2 d e f