Skip to content

Commit

Permalink
Figs for all files in indicator_objects work!
Browse files Browse the repository at this point in the history
  • Loading branch information
CarissaGervasi-NOAA committed Mar 8, 2024
1 parent c32ff00 commit 8ae582a
Show file tree
Hide file tree
Showing 2 changed files with 53 additions and 22 deletions.
29 changes: 27 additions & 2 deletions Report_book_files/Performance_indicators.qmd
Original file line number Diff line number Diff line change
Expand Up @@ -19,6 +19,21 @@ Indicator 16

Indicator 17

```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/landings.RData")
plotIndicatorTimeSeries(inddata, coltoplot = 1:6, trendAnalysis = T, sublabel = T)
```

```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/total_landings.RData")
plotIndicatorTimeSeries(inddata, coltoplot = 1:9, trendAnalysis = T, sublabel = T)
```

```{r}
load("../indicator_objects/fish_density.RData")
plotIndicatorTimeSeries(inddata, coltoplot = 1:3, plotrownum = 2, trendAnalysis = T, sublabel = T)
```

### Maximum length and size structure

Indicator 18
Expand Down Expand Up @@ -62,7 +77,7 @@ Indicator 26

```{r}
load("../indicator_objects/gini.RData")
plotIndicatorTimeSeries(inddata, coltoplot = 1:2, plotrownum = 2, trendAnalysis = T, sublabel = T)
plotIndicatorTimeSeries(inddata, coltoplot = 1:3, plotrownum = 2, trendAnalysis = T, sublabel = T)
```

### Commercial fishing community engegement and reliance
Expand All @@ -75,6 +90,11 @@ Indicator 27

Indicator 28

```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/total_rec_catch.RData")
plotIndicatorTimeSeries(inddata, coltoplot = 1:2, trendAnalysis = T, sublabel = T)
```

### Commercial fishing engagement and participation

Indicator 29
Expand Down Expand Up @@ -107,7 +127,12 @@ Indicator 34

```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/NCRMP_coral_cover_richness.RData")
plotIndicatorTimeSeries(inddata, trendAnalysis = F)
plotIndicatorTimeSeries(inddata, coltoplot = 1:6, sublabel = T, trendAnalysis = F)
```

```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/coral_spprichness_cover.RData")
plotIndicatorTimeSeries(inddata, coltoplot = 1:4, sublabel = T, trendAnalysis = T)
```

### Coral species diversity
Expand Down
46 changes: 26 additions & 20 deletions Report_book_files/Risk_indicators.qmd
Original file line number Diff line number Diff line change
Expand Up @@ -11,7 +11,10 @@ library(spam)

Indicator 1

DegreeHeatingWeeks.RData doesn't work. Think it's an issue with the date column. Also called ind not inddata.
```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/DegreeHeatingWeeks.RData")
plotIndicatorTimeSeries(ind, coltoplot = 1:2, trendAnalysis = T, sublabel = T, dateformat = "%Y%m", plotrownum = 2, plotcolnum = 1)
```

### Ocean acidification via aragonite saturation state

Expand All @@ -35,18 +38,19 @@ plotIndicatorTimeSeries(ind, trendAnalysis = T)

Indicator 4

turbidity.RData doesn't work. Again looks like an issue with the date.

```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/turbidity.RData")
plotIndicatorTimeSeries(ind, coltoplot = 1:3, plotrownum = 2, trendAnalysis = T)
plotIndicatorTimeSeries(ind, coltoplot = 1:3, plotrownum = 2, trendAnalysis = T, dateformat = "%m-%Y", sublabel = T)
```

### Sea surface temperature

Indicator 5

No RData file for SST
```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/Carib_SST.RData")
plotIndicatorTimeSeries(ind, coltoplot = 1:3, trendAnalysis = T, sublabel = T, dateformat = "%m-%Y")
```


### Marine debris
Expand All @@ -71,11 +75,9 @@ Indicator 7

Indicator 8

carib_Chl.RData doesn't work. Another issue with the date.

```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/carib_Chl.RData")
plotIndicatorTimeSeries(ind, trendAnalysis = F)
plotIndicatorTimeSeries(ind, trendAnalysis = T, dateformat = "%m-%Y")
```

### Coastal development via land cover
Expand Down Expand Up @@ -104,25 +106,29 @@ plotIndicatorTimeSeries(inddata, coltoplot = 1:3, trendAnalysis = T, sublabel =

Indicator 12

doesn't work

load("indicator_objects/Sargassum.RData")
plotIndicatorTimeSeries(inddata, coltoplot = 1:2, plotrownum = 2, trendAnalysis = F, sublabel = T)
```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/Sargassum.RData")
plotIndicatorTimeSeries(inddata, trendAnalysis = T)
```

load("indicator_objects/sargassum_innundation_monthly_mean_hu.RData")
plotIndicatorTimeSeries(inddata, coltoplot = 1:2, plotrownum = 2, trendAnalysis = F, sublabel = T)
```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/sargassum_innundation_monthly_mean_hu.RData")
plotIndicatorTimeSeries(inddata, coltoplot = 1:3, sublabel = T, trendAnalysis = T, dateformat = "%Y%b")
```

### Tourism via hotel occupancy

Indicator 13

doesn't work

load("indicator_objects/hotel_occupancy_rates_USVI_and_PR.RData")
plotIndicatorTimeSeries(inddata, trendAnalysis = F)
```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/hotel_occupancy_rates_USVI_and_PR.RData")
plotIndicatorTimeSeries(inddata, coltoplot = 1:2, sublabel = T, trendAnalysis = T, dateformat = "%Y%b")
```
```{r, message = FALSE, warnings = FALSE}
load("../indicator_objects/hotel_occupancy.RData")
plotIndicatorTimeSeries(inddata, coltoplot = 1:2, sublabel = T, trendAnalysis = T, dateformat = "%Y%b")
```

load("indicator_objects/hotel_occupancy.RData")
plotIndicatorTimeSeries(inddata, trendAnalysis = F)

### Population density

Expand Down

0 comments on commit 8ae582a

Please sign in to comment.