# layers <- list(L1 = mat1, L2 = mat2, L3 = mat3)
# aggregate_layers(layers, "sum") # Total
# aggregate_layers(layers, "mean") # Average
# aggregate_layers(layers, "union") # Any edge
# aggregate_layers(layers, "intersection") # All edges
Run the code above in your browser using DataLab