代码之家 › 专栏 › 技术社区 › elliot

将数据映射到数据帧中的列的更好方法?

dplyr r

elliot · 技术社区 · 6 年前

我有几个需要合并的大型数据帧,有时添加一个唯一的可识别列来合并它们。我使用这种方法,这是可行的,但似乎需要很长时间。基本上,使用 dplyr 我抓住了 distinct 返回变量,然后 mutate 每个变量都有一个新的变量,然后 merge 该变量返回到原始数据帧。有更好的方法来完成这一点吗?

df <- tibble(
  x = rep(LETTERS, 10)
)


df %>% 
  distinct(x) %>% 
  mutate(y = 1:nrow(.)) %>% 
  right_join(df)

2 回复 | 直到 6 年前

akrun 6 年前

我们可以使用 match

library(dplyr)
df %>% 
    mutate(y = match(x, unique(x)))

或与 factor

df %>% 
    mutate(y = as.integer(factor(x, levels = unique(x))))

或与 group_indices

df %>%
   mutate(y = group_indices(., x))

dww Jarretinha 6 年前

正如您没有指定是否需要dplyr,这里有一个data.table方法:

setDT(df)[, y := .GRP, by=x]

或者在R基,简单地说

df$y = as.integer(factor(df$x))

推荐文章

monotonic · 如何将格式为“col1+col3+col4”的数据帧的行名转换为一列数字向量“c(1,3,4)”?

2 年前

buzz · 在dplyr包中,可以根据不同列中的值对列进行变异吗

2 年前

Artur Vidaurre de Almeida · 用R列中的下一个值替换NA值

2 年前

Rich · 如何通过比较R中的两列来计算不同的值?

2 年前

J.Sabree · case\u when在使用group by时忽略一些参数

2 年前

cigarettes_after_text · 有没有一种方法可以更高效地将其写入单个Dplyr语句?

2 年前

Melderon · 将dplyr转换命令转换为基R函数

2 年前

Rafael Peixoto · 熊猫有什么类似于dplyr的“列表列”的吗

2 年前

awoj · 使用pivot\u wider()时修改列名顺序

2 年前

John Thomas · 使用tidyverse/dplyr[duplicate]创建虚拟变量作为计数

2 年前