Question

我正在为数据聚合开发一个闪亮的应用程序，其中从数据库中获取值，并使用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)

  }

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

Answer 1

只需添加这样的函数....

@NSApplicationMain
class AppDelegate: NSObject, NSApplicationDelegate {

    func applicationDidFinishLaunching(_ aNotification: Notification) {
        print("OK")
    }

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

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

请注意。请小心缩进...

当它在没有信息的情况下启动时，这对我来说很有用。

没有适用于＆＃39; group_by _＆＃39;的方法应用于类的对象＆＃34; NULL＆＃34;在dplyr

1 个答案: