txtProgressBar package:utils R Documentation _T_e_x_t _P_r_o_g_r_e_s_s _B_a_r _D_e_s_c_r_i_p_t_i_o_n: Text progress bar in the R console. _U_s_a_g_e: txtProgressBar(min = 0, max = 1, initial = 0, char = "=", width = NA, title, label, style = 1) getTxtProgressBar(pb) setTxtProgressBar(pb, value, title = NULL, label = NULL) ## S3 method for class 'txtProgressBar': close(con, ...) _A_r_g_u_m_e_n_t_s: min, max: (finite) numeric values for the extremes of the progress bar. initial, value: initial or new value for the progress bar. char: the character (or character string) to form the progress bar. width: the width of the progress bar, as a multiple of the width of 'char'. If 'NA', the default, the number of characters is that which fits into 'getOption("width")'. style: the 'style' of the bar - see 'Details'. pb, con: an object of class '"txtProgressBar"'. title, label: ignored, for compatibility with other progress bars. ...: for consistency with the generic. _D_e_t_a_i_l_s: 'txtProgressBar' will display a progress bar on the R console via a text representation. 'setTxtProgessBar' will update the value. Missing ('NA') and out-of-range values of 'value' will be (silently) ignored. The progress bar should be 'close'd when finished with: this outputs the final newline character. 'style = 1' and 'style = 2' just shows a line of 'char'. They differ in that 'style = 2' redraws the line each time, which is useful if other code might be writing to the R console. 'style = 3' marks the end of the range by '|' and gives a percentage to the right of the bar. _V_a_l_u_e: For 'txtProgressBar' an object of class '"txtProgressBar"'. For 'getTxtProgressBar' and 'setTxtProgressBar', a length-one numeric vector giving the previous value (invisibly for 'setTxtProgressBar'). _N_o_t_e: Using 'style' 2 or 3 or reducing the value with 'style = 1' uses '\r' to return to the left margin - the interpretation of carriage return is up to the terminal or console in which R is running. _S_e_e _A_l_s_o: 'tkProgressBar' _E_x_a_m_p_l_e_s: # slow testit <- function(x = sort(runif(20)), ...) { pb <- txtProgressBar(...) for(i in c(0, x, 1)) {Sys.sleep(0.5); setTxtProgressBar(pb, i)} Sys.sleep(1) close(pb) } testit() testit(runif(10)) testit(style=3)