R 警告消息：列'；标签'；是不支持的类型函数

我有一个名为“labels”的列表列，为了得到一个可读的数据帧，我没有列出它。在本地，一切都运行得很好，但当我在AWS闪亮服务器上运行时，它会在下面抛出这个错误。我可以分享更多的代码片段，但我想先得到关于这个错误的指针，这可能是什么

警告：mutate_impl:Column

labels

中的错误属于不支持的类型函数

Stack trace (innermost first):
    110: <Anonymous>
    109: stop
    108: filtered
    107: as.data.frame
    106: eval
    105: eval
    104: %>%
    103: <reactive:filtered_closed> [/srv/shiny-server/support-dashboard/server.R#74]
     92: filtered_closed
     91: tagList
     90: tag
     89: tags$h3
     88: h3
     87: tag
     86: tags$div
     85: div
     84: tag
     83: tags$div
     82: div
     81: valueBox
     80: vbox_fun [/srv/shiny-server/support-dashboard/server.R#179]
     79: shiny::renderUI
     78: func
     77: origRenderFunc
     76: output$vb_ratio
      1: runApp

更新：其他信息： 从全局.R文件加载数据集

issues <- readRDS("/srv/shiny-server/support-dashboard/issues.rds")

---

嗨，ngamita，你们能分享一下导致这个错误的代码吗？那真的很有帮助。我怀疑您有一个名为“label”的对象或列名，它会导致@Florian出现问题。我添加了addional server.R代码段。希望这能更好地指导您。您的AWS工作区与本地工作区相同吗？相同的R和软件包版本？@zx8754我不确定手动执行此操作的最佳方式，我知道这会让我们在部署时采用docker方式。撇开这一点不谈，手动运行这两个环境脚本，并在下面的细节中进行监控，这些细节在版本上非常相似，是的，R版本也是相同的。加载所需包：方法── 附加包

issues <- readRDS("/srv/shiny-server/support-dashboard/issues.rds")

shinyServer(function(input, output) {

    filtered <- reactive({
        unnest(issues, labels) %>% # remove lists from labels. 
            rename(pr_key = pull_request.url, 
                   reported_by = user.login, 
                   associate = assignee.login, 
                   release = milestone.title) %>%
            select(-ends_with("url"), -starts_with("user"), 
                   -starts_with("assignee"), -starts_with("milestone"), 
                   -title) %>%
            filter(str_detect(name, "help wanted")) %>%
            mutate(created_at = ymd(as.Date(created_at)), 
                   closed_at = ymd(as.Date(closed_at))) 
    })

    filtered_by_date <- reactive({
        filtered() %>%
            group_by(created_at) %>%
            filter(
                # created_at in df replacement in reactive. 
                created_at >= input$dateRange[1],
                created_at <= input$dateRange[2]
            ) %>%
            summarise(n = n()) %>%
            rename(created_date = created_at) %>%
            rename(issues_count = n)
    })

Attaching package: ‘shinydashboard’

The following object is masked from ‘package:graphics’:

    box

Loading required package: methods
── Attaching packages ─────────────────────────────────────── tidyverse 1.2.1 ──
✔ ggplot2 2.2.1     ✔ purrr   0.2.4
✔ tibble  1.4.2     ✔ dplyr   0.7.4
✔ tidyr   0.8.0     ✔ stringr 1.2.0
✔ readr   1.1.1     ✔ forcats 0.2.0
── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
✖ dplyr::filter() masks stats::filter()
✖ dplyr::lag()    masks stats::lag()
Highcharts (www.highcharts.com) is a Highsoft software product which is
not free for commercial and Governmental use

Attaching package: ‘lubridate’

The following object is masked from ‘package:base’:

    date

[1] "/srv/shiny-server/support-dashboard"
# A tibble: 3,387 x 89