【发布时间】:2021-01-27 23:32:49
【问题描述】:
我有下面的代码,我将数据集作为Stata文件导入
library(haven)
> LMI_MENA <- read_dta("Impact on Employment/LMI_MENA.dta")
然后进行下面的数据整理:
LMI_MENA %>%
pivot_longer(fem_unemployment:male_emp, names_to = "names", values_to = "values") %>%
mutate(Gender = case_when(
str_detect(names, "fem") ~ "Female",
str_detect(names, "male") ~ "Male",
TRUE ~ "Total"
)) %>%
mutate(names = case_when(
names %in% c("fem_unemployment", "male_unemployment", "urate") ~ "Unemployment",
names %in% c("lfprate", "female_lfp", "male_lfp") ~ "LaborForceParticipation",
names %in% c("fem_emp", "male_emp") ~ "Employment"
)) %>%
pivot_wider(names_from = "names", values_from = "values")
我尝试保存编辑后的数据集并将其直接导出到Stata
DF <- data.frame
write.dta(LMI_MENA, file="LMI_MENA_long.dta")
但是,虽然它正确导出,但它不会显示从上面的数据争吵中新创建的变量。保存然后导出到 Stata、csv 等的最佳方法是什么?
【问题讨论】:
标签: r tidyverse data-manipulation