taxdf <- data.frame(name = c("A", "B", "C"),
max_ma = c(150, 60, 30),
min_ma = c(110, 20, 0))
ex <- tax_expand_time(taxdf)
bins <- time_bins(scale = "GTS2012", rank = "stage")
ex2 <- tax_expand_time(taxdf, bins = bins)
Run the code above in your browser using DataLab