reshape R 中的数据(将具有多个值的单列拆分为具有二进制值的多列)-6ren

reshape R 中的数据(将具有多个值的单列拆分为具有二进制值的多列)

转载作者：行者123 更新时间：2023-12-02 04:03:01

<分区>

我有这样的数据集:

id value1 value2
1    A     True
2    B     False
3    A     True
4    C     True

我想识别一个具有多个值的列，并将其转换为 R 中具有 True 或 False 值的多个列。结果将是:

id value1.A value1.B value1.C value2
1     True     False  False    True
2     False    True   False    False
3     True     False  False    True
4     False    True   False    True

我不确定如何为此使用 dcast。我自己写了一个函数，但它太慢了。它的代码在这里:

to_multiple_columns <- function(col,attr_name){
elements <- names(table(col))
drops <- c("","True","False")
elements <- elements[ !elements %in% drops]
new_df <- data.frame(col) # to define data frame with nrows,ncols
if(length(elements) > 0){
new_attr_names <- paste(attr_name,elements,sep = ".")
    for(j in 1:length(new_attr_names)){
       new_df <- data.frame(new_df,grepl(elements[j],col))
    }
    drops <- c("col") #drop original col
    new_df <- new_df[,!(names(new_df) %in% drops)]
    names(new_df) <- new_attr_names
  }
  return(new_df)
}