#By Tobias Stalder #August 2020
library(scales)
eco_river_pal <- c("#d0ece7", "#a9dfbf", "#73c6b6", "#27ae60", "#117a65",
#By Tobias Stalder #August 2020
library(scales)
eco_river_pal <- c("#d0ece7", "#a9dfbf", "#73c6b6", "#27ae60", "#117a65",
library(doParallel) | |
# Choose number of iterations | |
n <- 100 | |
# Progress combine function | |
f <- function(iterator){ | |
pb <- txtProgressBar(min = 1, max = iterator - 1, style = 3) | |
count <- 0 | |
function(...) { |