R/message_parallel.R

In serachoi1230/EpiCompare: Comparison, Benchmarking & QC of Epigenomic Datasets

Defines functions message_parallel

Documented in message_parallel

#' Message parallel
#'
#' Send messages to console even from within parallel processes
#' @return A message
#' @keywords internal
message_parallel <- function(...) {
  system(sprintf('echo "%s"', paste0(..., collapse = "")))
}