#create filters
filter1 <- default_Filters('example')[[1]]
filter2 <- default_Filters('example2')[[1]]
#Create filterStack
name <- "example"
description <- "non realistic filterStack"
filters <- list(filter1)
filterStack <- create_FilterStack(name, description, filters)
plot_FilterStack(filterStack)
#add_Filter
filterStack <- add_Filter(filterStack, filter2)
plot_FilterStack(filterStack)
Run the code above in your browser using DataLab