#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(...) { |