将文字转换为数字？

Question

因此，我尝试将性别编码为虚拟变量。但是，数据的性别编码为“ 1.Male”和“ 2.Female”（而不是1 = Male和2 = Female），我只是想对其进行重新编码，所以它显示为1和2。

df$men <- car::recode(df$gender_respondent_x, "1=1; 2=0; else=NA")
table(df$men, df$gender_respondent_x, useNA = "ifany")

#       1. Male 2. Female
#  <NA>    2845      3069

Answer 1

我认为extract_numeric()包中的tidyr非常有用。

library(tidyr)
table(extract_numeric(df$gender_respondent_x))

此函数从字面上仅提取数字。我希望你觉得这有帮助。查看this official document了解详情。