为什么我在eval_tidy中找不到错误对象

Question

这是我的数据https://drive.google.com/open?id=1jLH8Oe4iGYtPjtKoe_H5QZwhFJjSA2PW

我做到了

library(readxl)
library(tidyverse)
library(dplyr)

sheets<- excel_sheets('output.xlsx')

locsheets<-lapply(excel_sheets('output.xlsx'), 
                  read_excel, path = 'output.xlsx', 
                   na="")



   names(locsheets)<- sheets

datadwr<- locsheets

meanmonth<-lapply(datadwr, function (x) x %>%
                    group_by(Engelse_naam, monthyr = format(datum, format = '%Y-%m-01')) %>%
                    summarise(mean = mean(waarde))%>%
                    spread(Engelse_naam, mean))

我使用相同的脚本已有一段时间，并且运行良好，但是现在我总是会收到此错误。

Error in eval_tidy(enquo(var), var_env) : object 'Engelse_naam' not found

我没有做任何更改，所以我现在真的不知道出什么问题了，为什么不显示变量。

您能帮我发现问题吗？