Skip to content

Commit

Permalink
Change label name for support fxn
Browse files Browse the repository at this point in the history
  • Loading branch information
Schiano-NOAA committed Sep 11, 2024
1 parent 8d8ad59 commit 13c86c4
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion R/ss3_utils.R
Original file line number Diff line number Diff line change
Expand Up @@ -57,7 +57,7 @@ SS3_extract_bio_info <- function(
bio_info <- SS3_extract_df(output, "DERIVED_QUANTITIES")[-c(1:4),]
colnames(bio_info) <- bio_info[1,]
bio_info <- bio_info[-1,] |>
tidyr::separate_wider_delim(cols = LABEL, delim = "_", names = c("label", "year")) |>
tidyr::separate_wider_delim(cols = Label, delim = "_", names = c("label", "year")) |>
dplyr::filter(label == parameter)
bio_info <- Filter(function(x)!all(is.na(x)), bio_info)

Expand Down

0 comments on commit 13c86c4

Please sign in to comment.