R/wpd_current_node.R

In petermeissner/wikipediadumbs: Handling Wikipedia Page View Dumps

Defines functions wpd_current_node

Documented in wpd_current_node

#' wpd_current_node
#'
#' @export
#'
wpd_current_node <- function(){
  names(wpd_nodes)[wpd_nodes == system("hostname", intern = TRUE)]
}