首页 文章

没有适用于'group_by_'的方法适用于dplyr中类“NULL”的对象

提问于
浏览 次
1

我正在开发一个闪亮的数据聚合应用程序，其中从数据库中获取值，并使用dplyr包进行聚合 . 最初，当没有数据时，我需要以更好的方式处理此错误，方法是在屏幕上显示 zero 值或 NA 值而不是红色的错误 no applicable method for 'group_by_' applied to an object of class "NULL"

output$Regbycity <- renderValueBox({
valueBox(

  value = reg_city()$Total[1],
  subtitle = reg_city()$registrant_city[1],
  icon = icon("globe"),
  color = "light-blue"
)
})

 reg_city <- function(){
   final_data %>% 
     group_by(registrant_city) %>%
     summarise(Total= n()) %>% 
     arrange(desc(Total)) %>% 
     top_n(n=15)

  }

在上面的代码值对象没有任何东西，因为数据库中没有任何东西，这是它在闪亮的仪表板上显示错误的行，我想摆脱它 . 请帮忙..

r shiny dplyr

1 回答

  • 0

    只需添加这样的功能....

    if.is.empty <- function(x){
    is.null(need(x, message = FALSE))}

    你的代码看起来像这样....

    reg_city <- function(){
    if (if.is.empty(final_data)) {
        final_data %>% 
        group_by(registrant_city) %>%
        summarise(Total= n()) %>% 
        arrange(desc(Total)) %>% 
        top_n(n=15)}
}

    注意 . 请小心缩进...

    当它没有信息启动时，这对我来说是一个闪亮的应用程序 .

    回复于

相关问题