R/tabIPAddress.R

In diegojedwards/functions_app:

tabIPAddress <- function(datos) {
  
  datos %>%
    group_by(ipaddr) %>%
    summarise(count = n()) %>%
    filter(count >= 2) %>%
    ungroup() %>%
    arrange(desc(count))
}