R/viz.R

In impact-initiatives-geospatial/surveyGEER: Bringing relevant GEE Data Into Your Assessment

#
# gee_viz <- list(
#   air_quality <- list(
#     NO2_column_number_density = list(
#       min= NO2_min,
#       max= NO2_max,
#       opacity= 0.5,
#       palette= c("black", "blue", "purple", "cyan", "green", "yellow", "red")
#     )
#   )
#
# )
#
# gee_viz <- function(sat="s5p"){
#   if(sat=="s5p"){
#     list(
#         min= NO2_min,
#         max= NO2_max,
#         opacity= 0.5,
#         palette= c("black", "blue", "purple", "cyan", "green", "yellow", "red")
#       )
#
#   }
#
# }
# gee_viz()