Skip to contents

Get annual averages of seagrass frequency occurrence by bay segments, year, and species

Usage

anlz_transectavespp(
  transectocc,
  bay_segment = c("OTB", "HB", "MTB", "LTB", "BCB"),
  yrrng = c(1998, 2022),
  species = c("Halodule", "Syringodium", "Thalassia", "Ruppia", "Halophila",
    "Caulerpa"),
  total = TRUE,
  by_seg = FALSE
)

Arguments

transectocc

data frame returned by anlz_transectocc

bay_segment

chr string for the bay segment, one to many of "OTB", "HB", "MTB", "LTB", "BCB"

yrrng

numeric indicating year ranges to evaluate

species

chr string of species to summarize, one to many of "Halodule", "Syringodium", "Thalassia", "Ruppia", "Halophila", "Caulerpa"

total

logical indicating if total frequency occurrence for all species is also returned

by_seg

logical indicating if separate results by bay segments are retained

Value

A data frame of annual averages by bay segment

Details

Frequency occurrence estimates are averaged across segments in bay_segment if by_seg = F, i.e., separate results by location are not returned. Results are retained by bay segment if by_seg = T. Also note that totals across species (total = T) are not returned if by_seg = T.

Examples

if (FALSE) {
transect <- read_transect()
}
transectocc <- anlz_transectocc(transect)
anlz_transectavespp(transectocc)
#> # A tibble: 175 × 3
#>       yr Savspecies    foest
#>    <dbl> <fct>         <dbl>
#>  1  1998 Caulerpa    0.0166 
#>  2  1998 Halodule    0.361  
#>  3  1998 Halophila   0      
#>  4  1998 Ruppia      0.0112 
#>  5  1998 Syringodium 0.0451 
#>  6  1998 Thalassia   0.254  
#>  7  1998 total       0.580  
#>  8  1999 Caulerpa    0.0277 
#>  9  1999 Halodule    0.306  
#> 10  1999 Halophila   0.00118
#> # … with 165 more rows