如何在R Markdown YAML中正确配置依赖双包的动态日期

The issue with your current YAML configuration stems from two main problems: unseparated package loading calls, and incorrect handling of the locale setting within the month() function. Here's how to fix it, with a couple of cleaner, working approaches:

Approach 1: Concise Inline Single-Line Code #

If you prefer keeping everything compact in one line, separate package loads and setup code with semicolons. Also, handle the locale setting as a standalone step (since Sys.setlocale() sets the global locale, you don’t need to pass its return value directly to month()):

title: " "
date: '`r library(timeperiodsR); library(lubridate); Sys.setlocale("LC_TIME", "English"); prev_month <- previous_month(part="start"); paste(month(prev_month, label=TRUE, abbr=FALSE), year(prev_month), sep=" ")`'
output:
  html_document:
    toc: true
    toc_depth: 2
    toc_float:
      collapsed: false
      smooth_scroll: false
    fig_align: 'center'

Approach 2: Readable Multi-Line YAML Code #

For better maintainability and readability, use YAML’s multi-line syntax (|) to split your R code into logical lines:

title: " "
date: |
  `r 
  # Load required packages
  library(timeperiodsR)
  library(lubridate)
  
  # Set English locale for full month labels
  Sys.setlocale("LC_TIME", "English")
  
  # Calculate the start date of the previous month
  prev_month_start <- previous_month(part = "start")
  
  # Format the final date string
  paste(month(prev_month_start, label = TRUE, abbr = FALSE),
        year(prev_month_start),
        sep = " ")
  `
output:
  html_document:
    toc: true
    toc_depth: 2
    toc_float:
      collapsed: false
      smooth_scroll: false
    fig_align: 'center'

Key Fixes Explained #

1. Separating Package Calls: Your original code had two library() calls without separators, which caused a syntax error in inline R code. Use semicolons (for single-line) or line breaks (for multi-line) to split them properly.
2. Locale Handling: Calling Sys.setlocale() on its own sets the global locale, so you don’t need to pass it as an argument to month(). This simplifies the code and ensures the locale applies to all date-related functions.
3. Avoiding Redundant Work: Storing previous_month(part="start") in a variable avoids calling the function twice, making the code more efficient and easier to adjust later.

Quick Note for Windows Users #

If the English locale doesn’t apply immediately, try restarting your R session before knitting the document—Windows sometimes requires a restart to apply locale changes fully.

内容的提问来源于stack exchange，提问作者Agnieszka