将列中的数字因子转换为因子字符串

【问题标题】：Convert numeric factors in column to String of factors将列中的数字因子转换为因子字符串
【发布时间】：2019-03-16 20:23:13
【问题描述】：

我有一个数据框：df

Person    Mood     Age
1         1        16//
2         2        32//
3         3        25//
4         4        22//
5         5        28//
6         1        37//
7         2        40//
8         3        26//
9         4        19//
10        5        37//

我有一个向量：

Emotions <- c(Happy, Sad, Angry, Upset, Neutral)

我想将情绪列中的值转换为向量情绪

Person    Mood     Age
1         happy    16//
2         sad      32//
3         angry    25//
4         upset    22//
5         neutral  28//
6         happy    37//
7         sad      40//
8         angry    26//
9         upset    19//
10        neutral  37//

【问题讨论】：

将Mood 转换为因子并使用Emotions 作为标签：df$Mood <- factor(df$Mood, labels = Emotions)

标签： r dataframe vector factors

【解决方案1】：

有一种方法可以使用tidyverse。这有点冗长，但有效，可以扩展并且易于理解：

library(tidyverse)
df %>% 
  select(Mood) %>% # Subset columns to just Mood
  distinct() %>%   # Get unique instances
  bind_cols(tibble(Emotions)) %>% # Convert your vector to a tbl and add as a new column
  merge(df, by = "Mood", all.y = TRUE) %>% # Merge the original df back in
  arrange(Person) %>% # Arrange by Person ID
  select(Person, Mood, Age) # Subset to the desired columns

输出：

   Person Mood  Age
1       1    1 16//
2       2    2 32//
3       3    3 25//
4       4    4 22//
5       5    5 28//
6       6    1 37//
7       7    2 40//
8       8    3 26//
9       9    4 19//
10     10    5 37//

【讨论】：