在使用“ mutate”时，如何引用与我要访问的数据框具有不同功能的数据框的列名？

Question

我正在尝试访问数据框中的名为“ Updated_on”的列，该列可以通过分配了变量名dhh的反应式函数进行访问。

我正在尝试从另一个mutate（）访问它。

  

错误：找不到对象“ UPDATED_on”。

   mk <- reactive({
    if (is.null(input$file)) return(NULL)
    inFile <- input$file
    datatable <- read.csv(input$file[[2, 'datapath']], check.names=FALSE)
    colnames(datatable)[5] <- "Updated_on"
    return(datatable) 
  })


  output$contents <- renderDataTable({
    if (is.null(mk)) return(NULL)
    datatable <- data.frame(mk())
    datatable
  })



 output$marvin <- renderDataTable({
    if(is.null(mk()) & is.null(dhh())){return()}
    jp <- data.frame(mk())
    mu <- data.frame(dhh())
    x1=jp[order(nrow(jp):1),]

    ppp <- as.character(jp$Client.Code) 

    vcv <- c(ppp)


    tttt <- as.vector(mu$CLIENTID)


    r <- mu[mu$CLIENTID %in% vcv, ]

#this is the mutate function   
    pipo <- r %>% 
      mutate(UPDATED_on = as.Date(UPDATED_on, format = "%m/%d/%Y"))%>% 
      group_by(CLIENTID) %>%  
      arrange(desc(UPDATED_on)) %>%
      slice(1)
    pipo