ProgressBar: A simple percentage bar to keep track of a simulation status.

In alghul96/AdmSim: Simulation for Genetic Admixture

Usage

ProgressBar(current, total, msg = NULL)

Arguments

current
total
msg

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (current, total, msg = NULL)
{
    prop = current/total
    percentage = paste0(round(prop, 3) * 100, "% ")
    text = paste0("(", current, "/", total, ") ")
    bar = c(rep("=", floor(40 * prop)), ">", rep(" ", ceiling(40 *
        (1 - prop))))
    cat("|", bar, "| ", percentage, text, msg, sep = "", "\r")
    flush.console()
  }

alghul96/AdmSim documentation built on May 27, 2019, 3:29 p.m.