R dplyr left_join 出错答案

【问题标题】：Error with R dplyr left_joinR dplyr left_join 出错
【发布时间】：2016-11-10 21:03:12
【问题描述】：

所以我一直在尝试使用 left_join 将新数据集的列添加到我的主数据集（称为员工）

我已经仔细检查了矢量名称和我没有进行的清理，但似乎没有任何效果。这是我的代码。将不胜感激。

job_codes <- read_csv("Quest_UMMS_JobCodes.csv")
job_codes <- job_codes %>%
clean_names() %>%
select(job_code, pos_desc = pos_des_desc)

job_codes$is_nurse <- str_detect(tolower(job_codes$pos_desc), "nurse") 

employee <- employee %>%
left_join(job_codes, by = "job_code")

我不断收到的错误：eval(substitute(expr), envir, enclos) 中的错误： rhs 中未找到“job_code”列，无法加入

这里是结果

names(job_code)
> names(job_codes)
[1] "job_code" "pos_desc" "is_nurse"

names(employee)
> names(employee)
 [1] "REC_NUM"             "ZIP"                 "STATE"              
 [4] "SEX"                 "EEO_CLASS"           "BIRTH_YEAR"         
 [7] "EMP_STATUS"          "PROCESS_LEVEL"       "DEPARTMENT"         
 [10] "JOB_CODE"            "UNION_CODE"          "SUPERVISOR"         
 [13] "DATE_HIRED"          "R_SHIFT"             "SALARY_CLASS"       
 [16] "EXEMPT_EMP"          "PAY_RATE"            "ADJ_HIRE_DATE"      
 [19] "ANNIVERS_DATE"       "TERM_DATE"           "NBR_FTE"            
 [22] "PENSION_PLAN"        "PAY_GRADE"           "SCHEDULE"           
 [25] "OT_PLAN_CODE"        "DECEASED"            "POSITION"           
 [28] "WORK_SCHED"          "SUPERVISOR_IND"      "FTE_TOTAL"          
 [31] "PRO_RATE_TOTAL"      "PRO_RATE_A_SAL"      "NEW_HIRE_DATE"      
 [34] "COUNTY"              "FST_DAY_WORKED"      "date_hired"         
 [37] "date_hired_adj"      "term_date"           "employment_duration"
 [40] "current"             "age"                 "emp_duration_years" 
 [43] "DESCRIPTION.x"       "PAY_STATUS.x"        "DESCRIPTION.y"      
 [46] "PAY_STATUS.y"

【问题讨论】：

最后一行试试left_join(., job_codes, by = "job_code")？
代码 sn-p 的第二行是 ob_codes <- job_codes %>%。前面不是少了一个j吗？
请edit你的Q并添加names(job_codes)和names(employee)的结果。
哦等等。谢谢@UweBlock 我想通了
@RandaMelhem 如果 UweBlock 的回答回答了您的问题，那么感谢他们的正确方式就是接受他们的回答。

标签： r join left-join dplyr

【解决方案1】：

现在，在 OP 在 Q 中添加两个表的列名之后，很明显要加入的列以不同的方式编写（大写与小写）。

如果列名不同，help("left_join") 建议：

要通过 x 和 y 上的不同变量连接，请使用命名向量。例如，by = c("a" = "b") 将匹配 x.a 到 y.b。

所以，在这种情况下，它应该是

employee <- employee %>% left_join(job_codes, by = c("JOB_CODE" = "job_code"))

【讨论】：