R/flush-memory.R

In irworkshop/campfin: Wrangle Campaign Finance Data

#' Flush Garbage Memory
#'
#' Run a full [gc()] a number of times.
#'
#' @param n The number of times to run [gc()].
#' @export
flush_memory <- function(n = 1) {
  for (i in seq(n)) {
    suppressMessages(gc(reset = TRUE, full = TRUE))
  }
}