r - .f(.x[[i]], ...) 中的错误：尝试创建数据框时找不到对象“X”

Question

我在创建数据框时遇到问题。dat1 是完美的，但是当我尝试创建 dat2 时，我收到以下错误消息：

Error in .f(.x[[i]], ...) : object 'Dia' not found

这是我的代码：

install.packages("magrittr") 
library(magrittr)

install.packages("ggplot2")
library(ggplot2)

library(cowplot)

install.packages("usethis")
library(usethis)

install.packages("devtools")
library(devtools)

install.packages("tidyverse")
library(tidyverse)

library(dplyr)

devtools::install_github("larmarange/JLutils" , force= TRUE)
library(JLutils)


install.packages("rio")
library(rio)

dat <- rio::import("https://github.com/jincio/COVID_19_PERU/blob/master/docs/reportes_minsa.xlsx?raw=true")

dat1 <- dat %>%
  mutate(pos_new = Positivos-lag(Positivos,default = 0),
         des_new = Descartados-lag(Descartados,default = 0)) %>%
  group_by(Dia) %>%
  summarise(pos_new = sum(pos_new), des_new = sum(des_new)) %>%
  mutate(cum_pos = cumsum(pos_new),
         tot_pruebas = pos_new+des_new)

问题来了：

dat2 <- dat1 %>%
  mutate(neg_new = tot_pruebas-pos_new) %>%
  dplyr::select(Dia, pos_new, neg_new) %>%
  rename(Positivo = pos_new, Negativo = neg_new) %>%
  gather(res, count, -Dia) %>%
  uncount(count)

我收到此错误：.f(.x[[i]], ...) 中的错误：找不到对象'Dia'

标签： r