diff --git a/.github/workflows/build.yaml b/.github/workflows/build.yaml index bc1fa8db..24901451 100644 --- a/.github/workflows/build.yaml +++ b/.github/workflows/build.yaml @@ -20,11 +20,10 @@ jobs: with: fetch-depth: 0 - - name: Install Google Fonts + - name: Provide Fonts run: | - wget -O Atkinson_Hyperlegible.zip https://fonts.google.com/download?family=Atkinson%20Hyperlegible - unzip -d Atkinson_Hyperlegible/ Atkinson_Hyperlegible.zip - mv Atkinson_Hyperlegible /usr/share/fonts/ + mkdir /usr/share/fonts/Atkinson_Hyperlegible + cp -r fonts/ /usr/share/fonts/Atkinson_Hyperlegible/ fc-cache -fv - uses: quarto-dev/quarto-actions/setup@v2 diff --git a/R/country_top_20.R b/R/country_top_20.R index 58574b54..c188f6d9 100644 --- a/R/country_top_20.R +++ b/R/country_top_20.R @@ -108,7 +108,7 @@ country_multiple_plot <- ggplot(country_multiple_df_plot, aes(cr_year, prop, fil scale_fill_identity() + theme_minimal(base_family = "Atkinson Hyperlegible") + labs( - y = "OA Share", x = "2017 - 2023", + y = "OA Share", x = "2017 - 2024", subtitle = "**Country**

Total Lead Author Articles | Country Share" ) + theme( diff --git a/R/cr_upw.R b/R/cr_upw.R index 6da19839..75e135fb 100644 --- a/R/cr_upw.R +++ b/R/cr_upw.R @@ -13,7 +13,7 @@ cr_upw_data <- function(cr_upw = hoaddata::cr_upw, my_cat = "Global", ...) { cr_upw_plot <- function(cr_upw_data = hoaddata::cr_upw, ...) { plot_df <- cr_upw_data(cr_upw_data, ...) - my_plot <- ggplot(plot_df, aes(cr_year, value / article_total, + my_plot <- ggplot(plot_df, aes(as.character(cr_year), value / article_total, fill = name, tooltip = glue::glue('{name}
{format(value, big.mark = ",")} / {round((value / article_total) * 100, 1)}%
articles with CC license in {cr_year}') )) + diff --git a/R/oam_publisher_cc.R b/R/oam_publisher_cc.R index 6c101693..98eaa969 100644 --- a/R/oam_publisher_cc.R +++ b/R/oam_publisher_cc.R @@ -89,7 +89,7 @@ top_13_plot <- function(.collection = NULL, ...) { `CC BY-NC-ND` = "#C82E6B" )) + theme_minimal(base_family = "Atkinson Hyperlegible", base_size = 13) + - labs(y = NULL, x = "2017-2023") + + labs(y = NULL, x = "2017-2024") + theme(panel.grid.major.x = element_blank(), panel.grid.minor.x = element_blank(), axis.text.x=element_blank(), diff --git a/R/open_md.R b/R/open_md.R index ec910cd0..e0245742 100644 --- a/R/open_md.R +++ b/R/open_md.R @@ -59,6 +59,7 @@ open_md_react <- function(...) { `2021` = indicator_column(name = "2021"), `2022` = indicator_column(name = "2022"), `2023` = indicator_column(name = "2023"), + `2024` = indicator_column(name = "2024"), cat = colDef(show = FALSE) )) diff --git a/R/publisher_cc.R b/R/publisher_cc.R index 1ff031ba..aa9e8b19 100644 --- a/R/publisher_cc.R +++ b/R/publisher_cc.R @@ -89,7 +89,7 @@ top_13_plot <- function(.collection = NULL, ...) { `CC BY-NC-ND` = "#C82E6B" )) + theme_minimal(base_family = "Atkinson Hyperlegible", base_size = 13) + - labs(y = NULL, x = "2017-2023") + + labs(y = NULL, x = "2017-2024") + theme(panel.grid.major.x = element_blank(), panel.grid.minor.x = element_blank(), axis.text.x=element_blank(), diff --git a/R/teaser.R b/R/teaser.R index 88d2866b..a380b253 100644 --- a/R/teaser.R +++ b/R/teaser.R @@ -20,25 +20,25 @@ cc_ind_global <- function(jn_ind_df = jn_ind_df) { distinct() %>% ungroup() } -#' Publications 2017 - 2022 +#' Publications 2017 - 2024 all_publications <- cc_ind_global(jn_ind_df = jn_ind_df) |> distinct(cr_year, jn_all) |> pull(jn_all) |> sum(na.rm = TRUE) -#' Publications 2022 -all_publications_2022 <- +#' Publications 2023 +all_publications_2023 <- cc_ind_global(jn_ind_df = jn_ind_df) |> distinct(cr_year, jn_all) |> - filter(cr_year == "2022") |> + filter(cr_year == "2023") |> pull(jn_all) |> sum(na.rm = TRUE) #' CC publications 2017 - 2022 cc_publications <- cc_ind_global(jn_ind_df = jn_ind_df) |> pull(cc_total) |> sum(na.rm = TRUE) -#' CC publications 2022 -cc_publications_22 <- cc_ind_global(jn_ind_df = jn_ind_df) |> - filter(cr_year == "2022") |> +#' CC publications 2023 +cc_publications_23 <- cc_ind_global(jn_ind_df = jn_ind_df) |> + filter(cr_year == "2023") |> pull(cc_total) |> sum(na.rm = TRUE) @@ -66,25 +66,25 @@ cc_ind_de <- function(jn_aff_df = jn_aff_df) { mutate_if(is.numeric, ~replace(., is.na(.), 0)) } -#' Publications 2017 - 2022 +#' Publications 2017 - 2024 all_publications_de <- cc_ind_de(jn_aff_df = jn_aff_df) |> distinct(cr_year, jn_all) |> pull(jn_all) |> sum(na.rm = TRUE) -#' Publications 2022 -all_publications_2022_de <- +#' Publications 2023 +all_publications_2023_de <- cc_ind_de(jn_aff_df = jn_aff_df) |> distinct(cr_year, jn_all) |> - filter(cr_year == "2022") |> + filter(cr_year == "2023") |> pull(jn_all) |> sum(na.rm = TRUE) -#' CC publications 2017 - 2022 +#' CC publications 2017 - 2023 cc_publications_de <- cc_ind_de(jn_aff_df = jn_aff_df) |> pull(cc_total) |> sum(na.rm = TRUE) -#' CC publications 2022 -cc_publications_22_de <- cc_ind_de(jn_aff_df = jn_aff_df) |> - filter(cr_year == "2022") |> +#' CC publications 2023 +cc_publications_23_de <- cc_ind_de(jn_aff_df = jn_aff_df) |> + filter(cr_year == "2023") |> pull(cc_total) |> sum(na.rm = TRUE) @@ -97,10 +97,10 @@ basic_stat <- function(...) { cc_publications_de = cc_publications_de, all_publications_de = all_publications_de, all_publications = all_publications, - cc_publications_22 = cc_publications_22, - all_publications_2022 = all_publications_2022, - cc_publications_22_de = cc_publications_22_de, - all_publications_2022_de = all_publications_2022_de + cc_publications_23 = cc_publications_23, + all_publications_2023 = all_publications_2023, + cc_publications_23_de = cc_publications_23_de, + all_publications_2023_de = all_publications_2023_de ) |> mutate(across(everything(), ~ case_when( . < 1000 ~ as.character(.), @@ -110,7 +110,7 @@ basic_stat <- function(...) { glue::glue('
-

2017-2023

+

2017-2024

@@ -134,7 +134,7 @@ basic_stat <- function(...) {
-

2022

+

2023

@@ -147,12 +147,12 @@ basic_stat <- function(...) { - - + + - - + +
Germany*
{round(cc_publications_22 / all_publications_2022 * 100, 1)}%{round(cc_publications_22_de / all_publications_2022_de * 100, 1)}%{round(cc_publications_23 / all_publications_2023 * 100, 1)}%{round(cc_publications_23_de / all_publications_2023_de * 100, 1)}%
{number_format$cc_publications_22} out of {number_format$all_publications_2022}{number_format$cc_publications_22_de} out of {number_format$all_publications_2022_de}{number_format$cc_publications_23} out of {number_format$all_publications_2023}{number_format$cc_publications_23_de} out of {number_format$all_publications_2023_de}
diff --git a/_jct_overview.qmd b/_jct_overview.qmd index 660cdd39..cabe8f26 100644 --- a/_jct_overview.qmd +++ b/_jct_overview.qmd @@ -1,11 +1,6 @@ --- title: "Hybrid Open Access Dashboard" subtitle: "How open are hybrid journals in transformative agreements? You can analyse progress made over time by open license, publisher and country. You can also monitor the availability of publisher-provided metadata in Crossref." -format: - html: - theme: default - toc: true - toc-location: right execute: echo: false warnings: false @@ -142,7 +137,7 @@ export_files(.data = cc_df, .plot = cc_de_plot, width = 9, height = 6 * 0.618) ### Creative Commons licenses over time by publisher -Percentage of Open Access in hybrid journals included in transformative agreements by Creative Commons license types and Top 13 publishers in terms of total Open Access articles published in these journals between 2017 and 2023. +Percentage of Open Access in hybrid journals included in transformative agreements by Creative Commons license types and Top 13 publishers in terms of total Open Access articles published in these journals between 2017 and 2024. ```{r} #| echo: false @@ -277,7 +272,7 @@ my_df |> ### Market shares -Publisher market shares as measured by articles published between 2017 and 2023 in hybrid journals included in transformative agreements. +Publisher market shares as measured by articles published between 2017 and 2024 in hybrid journals included in transformative agreements. ```{r} #| echo: FALSE @@ -409,7 +404,7 @@ export_files( ```{js, echo = FALSE} /* https://stackoverflow.com/a/66216595 */ $(document).ready(function() { - document.getElementById("filter_year").getElementsByClassName("selectized")[0].selectize.setValue("2022", false); + document.getElementById("filter_year").getElementsByClassName("selectized")[0].selectize.setValue("2023", false); document.getElementById("filter_input").getElementsByClassName("selectized")[0].selectize.setValue("Global", false); }); ``` @@ -421,7 +416,7 @@ This section shows how hybrid open access has been adopted in different parts of ### Open Access in hybrid journals by country -Open Access uptake in hybrid journals with a Creative Commons license per country. Shown are the Top 20 most productive countries in terms of articles published in hybrid journals included in transformative agreements between 2017 and 2023. The analysis is based on lead author country affiliations. +Open Access uptake in hybrid journals with a Creative Commons license per country. Shown are the Top 20 most productive countries in terms of articles published in hybrid journals included in transformative agreements between 2017 and 2024. The analysis is based on lead author country affiliations. ::: column-body-outset ```{r country_top_20} @@ -511,7 +506,7 @@ export_files( ```{js,echo = FALSE} /* https://stackoverflow.com/a/66216595 */ $(document).ready(function() { - document.getElementById("filter_country_year").getElementsByClassName("selectized")[0].selectize.setValue("2022", false); + document.getElementById("filter_country_year").getElementsByClassName("selectized")[0].selectize.setValue("2023", false); document.getElementById("filter_country_deal").getElementsByClassName("selectized")[0].selectize.setValue("All", false); }); ``` @@ -597,7 +592,7 @@ export_files(.data = shared_upw_cr_diff_year$data()) ```{js, echo = FALSE} /* https://stackoverflow.com/a/66216595 */ $(document).ready(function() { - document.getElementById("filter_cr_year").getElementsByClassName("selectized")[0].selectize.setValue("2022", false); + document.getElementById("filter_cr_year").getElementsByClassName("selectized")[0].selectize.setValue("2023", false); document.getElementById("filter_cr_input").getElementsByClassName("selectized")[0].selectize.setValue("Global", false); }); ``` @@ -677,7 +672,7 @@ $(document).ready(function() { ## Journal table -This table presents the publication volume and Open Access share by journal between 2017 and 2023, comparing global metrics with metrics only for articles by lead authors based in Germany. Charts show the yearly Open Access share. You can search for journals or select a table header to sort by journal name or a metric. +This table presents the publication volume and Open Access share by journal between 2017 and 2024, comparing global metrics with metrics only for articles by lead authors based in Germany. Charts show the yearly Open Access share. You can search for journals or select a table header to sort by journal name or a metric. ::: column-body-outset diff --git a/_oam_overview.qmd b/_oam_overview.qmd index 8b11079a..e77278e7 100644 --- a/_oam_overview.qmd +++ b/_oam_overview.qmd @@ -1,11 +1,6 @@ --- title: "Hybrid Open Access Dashboard: Consortial Transformative Agreements in Germany" subtitle: "How open are hybrid journals in transformative agreements with library consortia based in Germany? You can analyse progress made over time by open license, publisher and country. You can also monitor the availability of publisher-provided metadata in Crossref." -format: - html: - theme: default - toc: true - toc-location: right execute: echo: false warnings: false @@ -143,7 +138,7 @@ export_files(.data = cc_ind_de(jn_aff_df = jn_aff_df), .plot = cc_de_plot, wid ### Creative Commons licenses over time by publisher -Percentage of Open Access in hybrid journals included in consortial transformative agreements in Germany by Creative Commons license types and Top 13 publishers in terms of total Open Access articles published in these journals between 2017 and 2023. +Percentage of Open Access in hybrid journals included in consortial transformative agreements in Germany by Creative Commons license types and Top 13 publishers in terms of total Open Access articles published in these journals between 2017 and 2024. ```{r} #| echo: false @@ -278,7 +273,7 @@ my_df |> ### Market shares -Publisher market shares as measured by articles published between 2017 and 2023 in hybrid journals included in consortial transformative agreements in Germany. +Publisher market shares as measured by articles published between 2017 and 2024 in hybrid journals included in consortial transformative agreements in Germany. ```{r} #| echo: FALSE @@ -426,7 +421,7 @@ export_files( ```{js, echo = FALSE} /* https://stackoverflow.com/a/66216595 */ $(document).ready(function() { - document.getElementById("filter_year").getElementsByClassName("selectized")[0].selectize.setValue("2022", false); + document.getElementById("filter_year").getElementsByClassName("selectized")[0].selectize.setValue("2023", false); document.getElementById("filter_input").getElementsByClassName("selectized")[0].selectize.setValue("Global", false); }); ``` @@ -438,7 +433,7 @@ This section shows how hybrid open access has been adopted in different parts of ### Open Access in hybrid journals by country -Open Access uptake in hybrid journals with a Creative Commons license per country. Shown are the Top 20 most productive countries in terms of articles published in hybrid journals included in consortial transformative agreements in Germany between 2017 and 2023. The analysis is based on lead author country affiliations. +Open Access uptake in hybrid journals with a Creative Commons license per country. Shown are the Top 20 most productive countries in terms of articles published in hybrid journals included in consortial transformative agreements in Germany between 2017 and 2024. The analysis is based on lead author country affiliations. ::: column-body-outset ```{r country_top_20} @@ -528,7 +523,7 @@ export_files( ```{js,echo = FALSE} /* https://stackoverflow.com/a/66216595 */ $(document).ready(function() { - document.getElementById("filter_country_year").getElementsByClassName("selectized")[0].selectize.setValue("2022", false); + document.getElementById("filter_country_year").getElementsByClassName("selectized")[0].selectize.setValue("2023", false); document.getElementById("filter_country_deal").getElementsByClassName("selectized")[0].selectize.setValue("All", false); }); ``` @@ -620,7 +615,7 @@ export_files(.data = shared_upw_cr_diff_year$data()) ```{js, echo = FALSE} /* https://stackoverflow.com/a/66216595 */ $(document).ready(function() { - document.getElementById("filter_cr_year").getElementsByClassName("selectized")[0].selectize.setValue("2022", false); + document.getElementById("filter_cr_year").getElementsByClassName("selectized")[0].selectize.setValue("2023", false); document.getElementById("filter_cr_input").getElementsByClassName("selectized")[0].selectize.setValue("Global", false); }); ``` @@ -699,7 +694,7 @@ $(document).ready(function() { ## Journal table -This table presents the publication volume and Open Access share by hybrid journal included in consortial transformative agreements in Germany between 2017 and 2023, comparing global metrics with metrics only for articles by lead authors based in Germany. Charts show the yearly Open Access share. You can search for journals or select a table header to sort by journal name or a metric. +This table presents the publication volume and Open Access share by hybrid journal included in consortial transformative agreements in Germany between 2017 and 2024, comparing global metrics with metrics only for articles by lead authors based in Germany. Charts show the yearly Open Access share. You can search for journals or select a table header to sort by journal name or a metric. ::: column-body-outset diff --git a/_portfolio_template.qmd b/_portfolio_template.qmd index 7717e56d..400279fa 100644 --- a/_portfolio_template.qmd +++ b/_portfolio_template.qmd @@ -1,9 +1,4 @@ --- -format: - html: - theme: default - toc: true - toc-location: right execute: echo: false warnings: false @@ -216,7 +211,7 @@ This section shows how hybrid open access has been adopted in different parts of ### Open Access in hybrid journals by country -Open Access uptake in hybrid journals with a Creative Commons license per country. Showing the Top 20 most productive countries in terms of articles published in `r ta_text` between 2017 and 2023. The analysis is based on lead author country affiliations. +Open Access uptake in hybrid journals with a Creative Commons license per country. Showing the Top 20 most productive countries in terms of articles published in `r ta_text` between 2017 and 2024. The analysis is based on lead author country affiliations. ::: column-body-outset ```{r country_top_20} @@ -299,7 +294,7 @@ export_files( ```{js,echo = FALSE} /* https://stackoverflow.com/a/66216595 */ $(document).ready(function() { - document.getElementById("filter_country_year").getElementsByClassName("selectized")[0].selectize.setValue("2022", false); + document.getElementById("filter_country_year").getElementsByClassName("selectized")[0].selectize.setValue("2023", false); }); ``` @@ -436,7 +431,7 @@ $(document).ready(function() { ## Journal table -**`r params$publisher`**: This table presents the publication volume and Open Access share by hybrid journal between 2017 and 2023, comparing global metrics with metrics only for articles by lead authors based in Germany. Charts show the yearly Open Access share. You can search for journals or select a table header to sort by journal name or a metric. +**`r params$publisher`**: This table presents the publication volume and Open Access share by hybrid journal between 2017 and 2024, comparing global metrics with metrics only for articles by lead authors based in Germany. Charts show the yearly Open Access share. You can search for journals or select a table header to sort by journal name or a metric. ::: column-body-outset diff --git a/_quarto.yml b/_quarto.yml index fd7d9b5a..7232f989 100644 --- a/_quarto.yml +++ b/_quarto.yml @@ -139,6 +139,8 @@ website: format: html: theme: [cosmo, styles.scss] + toc: true + toc-location: right grid: sidebar-width: 300px