class: center, middle, inverse, title-slide # OPEN SCIENCE INDICATOR PRODUCTS: SEAGRASS TRANSECT DATA AND DASHBOARD ###
Dr. Marcus Beck
•
@fawda123
•
#TampaBayOpensci
### TAMPA BAY ESTUARY PROGRAM ### 3/24/2021 --- class: middle, center .center[ ## GOALS FOR TODAY ] * Overview of open science products * Accessing transect data * Seagrass status and trends (transect only) <img src="figure/Shoal-Grass-Textured.png" width="50%" style="display: block; margin: auto;" /> --- class: middle, center #
Open data #
Open process #
Open products --- class: middle, center ## THE OPEN SCIENCE CAKE <img src="figure/cake.png" width="100%" style="display: block; margin: auto;" /> --- class: middle, center <style type="text/css"> ul { font-family: 'Lato'; font-weight: 300; font-size: 36px; /* roughly h3 font size */ color: #958984; /* Change the color */ } </style> ## THE OPEN SCIENCE PROCESS <img src="figure/os-workflow.png" width="70%" style="display: block; margin: auto;" /> --- class: top, left .center[ ## EXISTING SEAGRASS DATA ] .pull-left[ .center[ ### District coverage maps ] * Photointerpretation of aerial imagery * Coverage estimates for tracking programmatic goals * Updated every two years, beginning 1988 ] .pull-right[ .center[ ### Transect data ] * Field data collected annually by TBEP and partners * Information on species abundance, location * 61 transects monitored since 1998 ] --- class: top, left .center[ ## TRANSECT DATA ]
--- class: top, left .center[ ## TOP OF THE CAKE ### <https://tbep.org/seagrass-assessment/> ] <img src="figure/transectpage.png" width="80%" style="display: block; margin: auto;" /> --- class: top, left .center[ ## BOTTOM OF THE CAKE: TBEPTOOLS ] .pull-left[ * Import raw data, estimate indicators, and report outcomes * Freely available on GitHub for version control and to engage with users * Workhorse for report cards and dashboards ] .pull-right[ <img src="figure/tbeptoolshex2.PNG" width="60%" style="display: block; margin: auto;" /> ### <https://tbep-tech.github.io/tbeptools> ] --- class: top, left .center[ ## TBEPTOOLS: DATA ACCESS ] ```r library(tbeptools) transect <- read_transect() transect ``` ``` ## # A tibble: 132,354 x 7 ## Date Transect Site Depth Savspecies var aveval ## <date> <chr> <chr> <int> <chr> <chr> <dbl> ## 1 2020-11-04 S5T8 0 -5 No Cover Abundance 0 ## 2 2020-11-04 S5T8 0 -5 No Cover Blade Length 0 ## 3 2020-11-04 S5T8 0 -5 No Cover Short Shoot Density NaN ## 4 2020-11-04 S5T8 10 -12 Halodule Abundance 5 ## 5 2020-11-04 S5T8 10 -12 Halodule Blade Length 0 ## 6 2020-11-04 S5T8 10 -12 Halodule Short Shoot Density NaN ## 7 2020-11-04 S5T8 100 -180 Syringodium Abundance 4 ## 8 2020-11-04 S5T8 100 -180 Syringodium Blade Length 0 ## 9 2020-11-04 S5T8 100 -180 Syringodium Short Shoot Density NaN ## 10 2020-11-04 S5T8 11 -20 Halodule Abundance 2 ## # ... with 132,344 more rows ``` .center[ ### __*date x transect x site x species x variable*__ ] --- class: top, left .center[ ## TBEPTOOLS: DATA ACCESS ] ```r transectocc <- anlz_transectocc(transect) transectocc ``` ``` ## # A tibble: 11,709 x 6 ## # Groups: Date, Transect [1,301] ## Date Transect Savspecies nsites foest bbest ## <date> <chr> <chr> <int> <dbl> <dbl> ## 1 1997-10-11 S2T3 AA 41 0 0 ## 2 1997-10-11 S2T3 Caulerpa 41 0 0 ## 3 1997-10-11 S2T3 DA 41 0 0 ## 4 1997-10-11 S2T3 Halodule 41 0.0488 0.146 ## 5 1997-10-11 S2T3 Halophila 41 0 0 ## 6 1997-10-11 S2T3 No Cover 41 0.951 4.76 ## 7 1997-10-11 S2T3 Ruppia 41 0 0 ## 8 1997-10-11 S2T3 Syringodium 41 0 0 ## 9 1997-10-11 S2T3 Thalassia 41 0 0 ## 10 1997-10-11 S2T5 AA 34 0 0 ## # ... with 11,699 more rows ``` .center[ ### __*date x transect x species x variable*__ ] --- class: top, left .center[ ## TBEPTOOLS: TRANSECT SUMMARY ] ```r show_transect(transect, site = 'S1T16', plotly = T) ```
--- class: top, left .center[ ## TBEPTOOLS: TRANSECT SUMMARY ] ```r show_transectsum(transectocc, site = 'S1T16') ```
--- class: top, left .center[ ## TBEPTOOLS: BAYWIDE SUMMARY ] ```r show_transectavespp(transectocc, plotly = T, family = 'Lato') ```
--- class: top, left .center[ ## TBEPTOOLS: BAYWIDE SUMMARY ] ```r show_transectmatrix(transectocc, neutral = T, plotly = T, family = 'Lato') ```
--- class: top, left .center[ ## TBEPTOOLS: PLAIN LANGUAGE VIGNETTE ### <https://tbep-tech.github.io/tbeptools/articles/seagrasstransect.html> ] <img src="figure/seagrassvignette2.PNG" width="80%" style="display: block; margin: auto;" /> --- class: top, left .center[ ## MIDDLE OF THE CAKE ### <https://shiny.tbep.org/seagrassransect-dash> ] <img src="figure/seagrassdash.PNG" width="80%" style="display: block; margin: auto;" /> --- class: top, left .center[ ## SEAGRASS STATUS AND TRENDS ] .pull-left[ * Transect data show reduction in f.o., all species baywide * Change was recent (2019-2020) and most dramatic in OTB, HB, MTB * Notable increase in attached algae (Caulerpa) * Need to link f.o. estimates with 2020 coverage (~April) ] .pull-right[
] --- class: middle, center .center[ ## FORTHCOMING COVERAGE DASHBOARD ] <img src="figure/seagrasscoverdash.png" width="95%" style="display: block; margin: auto;" /> --- class: middle, center .center[ ## GOALS FOR TODAY ] * Overview of open science products * Accessing transect data * Seagrass status and trends (transect only) <img src="figure/Shoal-Grass-Textured.png" width="50%" style="display: block; margin: auto;" /> --- class: top, left .center[ ## RESOURCES ] * Dashboard: <https://shiny.tbep.org/seagrasstransect-dash> * Dashboard source: <https://www.github.com/seagrasstransect-dash> * TBEPTOOLS: <https://tbep-tech.github.io/tbeptools> * TBEPTOOLS source: <https://www.github.com/tbep-tech/tbeptools> * Seagrass data viz web page: <https://tbep.org/seagrass-assessment/> <img src="figure/Turtlegrass-Textured.png" width="35%" style="display: block; margin: auto;" />