Tivy (version 0.1.1)

create_fishery_dashboard: Create fishery dashboard

Description

Generates a comprehensive dashboard for fishery analysis including juvenile analysis, catch trends, spatial distribution, and summary statistics. This function consolidates all dashboard functionality.

Usage

create_fishery_dashboard(
  data,
  date_col = NULL,
  length_cols = NULL,
  a = 1e-04,
  b = 2.984,
  latitude_col = NULL,
  longitude_col = NULL,
  catch_col = NULL,
  juvenile_col = NULL,
  map_xlim = c(-85, -70),
  map_ylim = c(-20, 0),
  color_palette = NULL,
  date_breaks = NULL,
  sort_comparison = FALSE,
  comparison_title = NULL,
  catch_title = NULL,
  map_title = NULL,
  trend_title = NULL
)

Value

List with individual plots and combined dashboard (if patchwork available).

Arguments

data

Data frame with complete fishery data.

date_col

Date column name. If NULL, auto-detect.

length_cols

Length frequency column names. If NULL, auto-detect.

a

Length-weight coefficient.

b

Length-weight exponent.

latitude_col

Latitude column name. If NULL, auto-detect.

longitude_col

Longitude column name. If NULL, auto-detect.

catch_col

Catch column name. If NULL, auto-detect.

juvenile_col

Juvenile percentage column name. If NULL, auto-detect.

map_xlim

Map longitude limits.

map_ylim

Map latitude limits.

color_palette

Custom color palette.

date_breaks

Date axis breaks.

sort_comparison

Sort comparison plot.

comparison_title

Comparison plot title.

catch_title

Catch plot title.

map_title

Map plot title.

trend_title

Trend plot title.

Examples

if (FALSE) {
dashboard <- create_fishery_dashboard(
  data = complete_fishery_data,
  date_col = "date",
  length_cols = paste0("length_", seq(8, 15, 0.5)),
  catch_col = "total_catch",
  latitude_col = "latitude",
  longitude_col = "longitude"
)

dashboard$comparison
dashboard$catch_trends
dashboard$spatial_map
dashboard$trends
dashboard$dashboard
}