R/summarise_dist.R
disturbance_by_season.Rd
disturbance_by_season(data)
A dataframe with column "disturbance_cause", e.g. the ouput of
wastd_GET("turtle-nest-disturbance-observations")
parse_encounterobservations()
or data("wastd_data"); wastd_data$nest_dist
A tibble with columns season
, disturbance_cause
,
encounter_type
, and a tally n
.
Other wastd:
add_nest_labels()
,
filter_alive()
,
filter_dead()
,
filter_disturbance()
,
filter_predation()
,
ggplot_disturbance_by_season()
,
ggplot_emergence_success()
,
ggplot_hatching_success()
,
ggplot_hatchling_misorientation()
,
ggplot_nesting_success_per_area_season_species_pct()
,
ggplot_nesting_success_per_area_season_species()
,
ggplot_sighting_status_per_area_season_species()
,
ggplot_total_emergences_per_area_season_species()
,
ggplot_track_success_by_date()
,
ggplot_track_successrate_by_date()
,
hatching_emergence_success_area()
,
hatching_emergence_success_site()
,
hatching_emergence_success()
,
map_dist()
,
map_fanangles()
,
map_mwi()
,
map_nests()
,
map_tracks()
,
map_wastd_wamtram_sites()
,
map_wastd()
,
nesting_success_per_area_day_species()
,
nesting_success_per_area_season_species()
,
nesting_type_by_area_season_age_species()
,
nesting_type_by_area_season_species()
,
nesting_type_by_season_age_species()
,
nesting_type_by_season_calendarday_age_species()
,
nesting_type_by_season_calendarday_species()
,
nesting_type_by_season_day_species()
,
nesting_type_by_season_species()
,
nesting_type_by_season_week_age_species()
,
nesting_type_by_season_week_site_species()
,
nesting_type_by_season_week_species()
,
nesting_type_by_site_season_age_species()
,
nesting_type_by_site_season_species()
,
parse_animal_encounters()
,
parse_area_sf()
,
parse_area()
,
parse_encounterobservations()
,
parse_surveys()
,
parse_turtle_nest_encounters()
,
print.wastd_api_response()
,
sighting_status_per_area_season_species()
,
sighting_status_per_site_season_species()
,
summarise_hatching_and_emergence_success()
,
summarise_wastd_data_per_day_site()
,
total_emergences_per_area_season_species()
,
total_emergences_per_site_season_species()
,
track_success_by_species()
,
track_success()
,
tracks_ts()
data("wastd_data")
wastd_data$nest_dist %>% wastdr::disturbance_by_season()
#> # A tibble: 122 × 4
#> season disturbance_cause encounter_type n
#> <dbl> <chr> <chr> <int>
#> 1 2021 crab nest 23
#> 2 2021 bird nest 20
#> 3 2021 goanna nest 17
#> 4 2021 turtle nest 3
#> 5 2021 unknown nest 3
#> 6 2021 human nest 2
#> 7 2021 dog nest 1
#> 8 2021 pig nest 1
#> 9 2021 tide nest 1
#> 10 2021 vehicle other 2
#> # … with 112 more rows
data("odkc_data")
odkc_data$tracks_dist %>%
wastdr::sf_as_tbl() %>%
wastdr::disturbance_by_season()
#> # A tibble: 7 × 4
#> season disturbance_cause encounter_type n
#> <dbl> <chr> <chr> <int>
#> 1 2021 crab nest 35
#> 2 2021 goanna nest 25
#> 3 2021 bird nest 23
#> 4 2021 turtle nest 9
#> 5 2021 unknown nest 6
#> 6 2021 other nest 1
#> 7 2021 pig nest 1