R语言学习记录：分组并给同一组的人进行相同编码

experiment1_rename<-experiment1 %>%
group_by(filename,actor) %>%                ##把变量filename和actor一样的人分为同一组
mutate(participant= cur_group_id())         ##对每组人进行相同编码，并在新数据框experiment1_rename加上一列participant变量
 arrange(experiment1_rename,experiment1_rename$participant)##可以对编码进行排序