Transfer news from old to new website (lmu-osc#306)

* Begin news transfer script

* Add notes and update csv with file names

Create code to write the new news pages

* Add transferred news files

* Fix quote errors and use listing in news home page

Make use of _metadata for freezing

* Remove lines that just have NA

* Remove NA subtitles

* Include newsletter files

Author: NeuroShepherd

news/_metadata.yml

@@ -0,0 +1,3 @@
+execute: 
+  echo: false
+  freeze: auto

news/_news_transfer.R

@@ -0,0 +1,114 @@
+
+
+library(dplyr)
+
+news_csv <- read.csv("https://raw.githubusercontent.com/lmu-osc/osc-website-transfer/refs/heads/main/news_metadata.csv?token=GHSAT0AAAAAADRLIEF73GZ33O3UHNP26NQK2LQYSJA")
+
+
+news_csv %>%
+  tibble() %>%
+  write.csv("news/news_metadata.csv")
+
+# had Copilot manually generate file names
+
+# ## Naming Patterns Used
+
+# 1. **Newsletters**: Always `newsletter-{month}-{year}`
+# 2. **Interviews**: Always `{person}-interview` 
+# 3. **Job ads**: `job-ad-` or `stellenausschreibung-` for German
+# 4. **New members**: `{number}-new-members` or `{dept}-joins-osc`
+# 5. **Awards/Recognition**: Include award name (`enter-award`, `hochschulperle-award`, `dgps-award`)
+# 6. **Reports**: `{topic}-report`
+# 7. **Events**: Descriptive of the event type
+# 8. **Papers**: `{topic}-paper-{status}` (e.g., `preprint`, `published`)
+
+# ## Consistency Features
+
+# - Hyphens only, no underscores
+# - All lowercase
+# - Removed special characters and German umlauts
+# - Kept meaningful keywords from titles
+# - Limited to 3-5 words per slug
+# - Date format: YYYY-MM-DD
+
+# ## Examples
+
+# - `2025-07-22-newsletter-july-2025.qmd`
+# - `2024-01-29-gollwitzer-schneck-interview.qmd`
+# - `2024-07-15-job-ad-scientific-coordinator.qmd`
+# - `2024-05-10-clusters-excellence-join-osc.qmd`
+# - `2024-07-03-enter-award-received.qmd`
+# - `2023-12-07-osc-impact-report-2017-2023.qmd`
+# - `2021-04-21-multiplicity-paper-published.qmd`
+
+final_news <- read.csv("news/news_metadata.csv") %>%
+  tibble()
+  
+  
+final_news %>%
+  mutate(
+    start_date = as.Date(start_date, format = "%d.%m.%Y")
+  ) %>%
+  select(
+    start_date, news_title, subtitle, body_misc, body, filename
+  ) %>%
+  purrr::pmap(function(start_date, news_title, subtitle, body_misc, body, filename) {
+    
+    yaml <- glue::glue(
+      "---\n",
+      "title: \"{news_title}\"\n",
+      "date: {start_date}\n",
+      "subtitle: \"{subtitle}\"\n",
+      "---\n\n"
+    )
+    
+    content <- glue::glue(
+      "{body_misc}\n\n{body}"
+    )
+    
+    full_content <- glue::glue(
+      "{yaml}\n{content}"
+    )
+    
+    writeLines(full_content, con = paste0("news/news/", filename))
+    
+  })
+
+
+
+
+# fix mistake of including NA from body_misc or body when no content from these is present
+
+list.files("news/news", full.names = TRUE)[-1] %>%
+  purrr::map(~{
+    file <- readLines(.x)
+    
+    # remove lines that contain just "NA"
+    file_cleaned <- file[file != "NA"]
+    writeLines(file_cleaned, con = .x)
+  })
+
+
+# fix mistake of including NA from subtitle when no content from these is present
+
+list.files("news/news", full.names = TRUE)[-1] %>%
+  purrr::map(~{
+    file <- readLines(.x)
+    
+    # find subtitle line
+    subtitle_line_index <- which(grepl("^subtitle: ", file))
+    
+    if (length(subtitle_line_index) > 0) {
+      subtitle_line <- file[subtitle_line_index]
+      
+      # check if subtitle is NA
+      if (grepl("subtitle: \"NA\"", subtitle_line)) {
+        # remove the subtitle line
+        file <- file[-subtitle_line_index]
+      }
+    }
+    
+    writeLines(file, con = .x)
+  })
+
+

news/files/newsletter_december_2023.pdf

@@ -2,4 +2,8 @@
 title: "News"
 editor: source
 repo-actions: false
+listing:
+    contents: news
+    type: table
+    sort: "date desc"
 ---

news/files/newsletter_july_2023.pdf

@@ -0,0 +1,25 @@
+---
+title: "The LMU Open Science Center is founded!"
+date: 2017-11-16
+subtitle: "In November 2017 the „Open Science Center“ (OSC) was founded at LMU Munich, with the goal to promote open, transparent and credible science."
+---
+
+<div id="imgZoom" class="mod mod-gallery mod-gallery-single">
+                <div class="m-item-m">
+                        <a>
+                            <img src="../../images/news1.jpg" alt="" class="m-thumb-m"></a>
+                </div>
+        </div>
+
+<p>In recent years, headlines have repeatedly reported that scientific results could not be reproduced, even under the same experimental conditions. The speaker of the newly founded LMU Open Science Center (LMU OSC), sociologist Prof. Dr. Katrin Auspurg, explains these alarming findings: “Competition for funding and professorships has led people to publish as many articles as possible in the shortest time possible in a marketing-effective way. This incentive structure often negatively affects the truthfulness of published research.”</p>
+<p><strong>Transparency in research: The foundation for credible and successful science</strong></p>
+<p>For a long time, science organizations have been demanding data and results generated in publicly funded research projects to be made openly available in order to enable reexamination and further analyses.</p>
+<p>“In times where we see frequent debates over fake news, it is very important to strengthen the trust in science”, clarifies the center's managing director, psychologist Dr. Felix Schönbrodt, who played a major role in establishing the Center. “The Open Science Center is a strong signal: We stand for integrity and reliability and support these principles in our teaching, our personnel decisions, as reviewers, and especially in our daily practice as researchers.”</p>
+<p>Thereby the competitiveness of the university is increased as many research funders, such as the ERC or the newly founded “Open Research Funders Group” emphasize the topic Open Science in their funding guidelines for new research projects.</p>
+<p><strong>Putting Open Science into action at LMU Munich</strong></p>
+<p>Prof. Dr. Barbara Conradt, the LMU’s vice president for research and diversity, pointed out, that “first and foremost, excellent research means producing correct and replicable results. In this respect, the foundation of the Open Science Center complements the LMU’s bigger strategy of supporting good scientific practice.”</p>
+<p>the OSC seeks to accomplishing this goal by offering public talks, trainings programs and workshops for scientists at all stages of their career, from PhD students to professors. Furthermore, the Center plans to conduct “research about research”, by investigating the scientific process itself. Thereby, psychological, sociological, and statistical/methodical aspects are investigated which lead to biased or wrong results in the scientific literature.</p>
+<p>The Center’s 17 founding members come from ten different scientific fields, ranging from sociology to geography. Three complete faculties of the LMU – the Faculty of Medicine, the Faculty of Veterinary Medicine, as well as the Faculty of Psychology and Educational Sciences – have joined the Center’s mission. Additionally, the Leibniz Supercomputing Centre (LRZ) and the University Library are supporting the Open Science Center.</p>
+<p>All members of the LMU Open Science Center share one common goal: Fostering good science and generating reliable knowledge through transparent and replicable research. For a society that can trust in it.</p>
+<p>Press Release: tba</p>
+<div class="g-clear"></div>