improve table_decision()

[iantaylor-NOAA]

The table_decision() function worked really well for quickly combining output from multiple models during the lingcod STAR.

However, there are a few changes that I think would be useful:

• [x] use the catch from the middle state of nature rather than the first catch column since the low state of nature may not have enough fish to remove the full catch
• [x] compare catch from the low and high state to the middle state within a row and provide a message or warning saying which years from which models differ by more than some cutoff (I would suggest 1%, but it could be a new input rather than hardwired). I think it would be useful to put the result into a table caption (e.g. "The full catch could not be removed from the low state of nature for the years 2027-2032"). It's also easy to accidentally mix up models such that the catches differ because they are specified differently rather than because the catch can't be removed.

I'm not sure how best to make these changes elegantly within the existing function. Also, it would be nice to not break the flexibility in the number of columns (models) within each row.

Also

• [x] remove the random year line: https://github.com/iantaylor-NOAA/Lingcod_2021/blob/main/R/table_decision.R#L52

Added 1 Dec 2021:

• [ ] revise table_decision() to italicize only the state of nature for which catch is limiting, rather than all states of nature.

[kellijohnson-NOAA]

I will see what I can do, I think @chantelwetzel-noaa used an asterisk when the full catch couldn't be taken.

[iantaylor-NOAA]

I'd be happy with an asterisk.

[chantelwetzel-noaa]

I had the issues where full removals could not be taken from the final years of the projection in the low state of nature. In my decision table on page xx I highlighted these values by italics and provided a description in the caption. However, in hindsight I think a better approach would be via an asterisk which then could be added as a footnote to the table (or in the table caption).

[kellijohnson-NOAA]

Used max catch for each year, if it doesn't equal for a given catch stream then the SSB and depletion are italicized. I didn't have an example though to make sure it works. Just shooting off the hip.

We can change to an asterisk later with footnote, but wanted to get something by today.

Also, removed a lot of the coloration code b/c I had to add it to the conditional formatting that italicizes the column. This makes the colors work for no matter how many models are provided.

Done in e1df08c

[iantaylor-NOAA]

The new table looked great but was creating duplicate rows for reasons that I couldn't figure out so I went back to the old version and set the catch column to match the middle (base) model to produce something for #166. The improvements will be useful but can wait until later.

[iantaylor-NOAA]

@kellijohnson-NOAA, the models for decision table are on Google Drive (sens numbers starting with 600). Table function can be tested by downloaded those files for north or south and running these lines (or modifications of them): https://github.com/iantaylor-NOAA/Lingcod_2021/blob/main/models/model_decision_tables.R#L87-L115

[kellijohnson-NOAA]

Thanks @iantaylor-NOAA for giving me the model numbers, super helpful. I was able to figure out what I was doing wrong and have committed changes to table_decision with 7969544

[iantaylor-NOAA]

Changes by @kellijohnson-NOAA back in August (507cf37), combined with minor edit to caption in commit 969a5c9 resolve this issue.

[iantaylor-NOAA]

• [ ] revise table_decision() to italicize only the state of nature for which catch is limiting, rather than all states of nature.

As a short-term fix for the final 2021 document, we will edit the .tex files, but a long-term fix can be made to the function itself in the future. Adding to nextassessment benchmark.