在R語言中，可以使用日期函數as.Date()和時間函數as.POSIXct()來生成月日為固定值的日期。

以下是一些示例代碼，用于生成月日為4月15日的日期：

# 生成當前年份的4月15日的日期
current_year <- as.numeric(format(Sys.Date(), "%Y")) # 獲取當前年份
fixed_date <- as.Date(paste(current_year, "04-15", sep = "-")) # 生成日期
print(fixed_date)

# 生成特定年份的4月15日的日期
specific_year <- 2022 # 指定年份
fixed_date <- as.Date(paste(specific_year, "04-15", sep = "-")) # 生成日期
print(fixed_date)

輸出結果為：

[1] "2022-04-15"

上述代碼中，使用as.numeric(format(Sys.Date(), "%Y"))獲取當前年份，并使用paste()函數將年份和固定的月日拼接成字符串。然后，使用as.Date()將字符串轉換為日期格式。

如果要生成帶有時間的日期，可以使用as.POSIXct()函數。以下是一個示例代碼，用于生成4月15日上午10點的日期和時間：

# 生成當前年份的4月15日上午10點的日期和時間
current_year <- as.numeric(format(Sys.Date(), "%Y")) # 獲取當前年份
fixed_datetime <- as.POSIXct(paste(current_year, "04-15 10:00:00", sep = "-")) # 生成日期和時間
print(fixed_datetime)

# 生成特定年份的4月15日上午10點的日期和時間
specific_year <- 2022 # 指定年份
fixed_datetime <- as.POSIXct(paste(specific_year, "04-15 10:00:00", sep = "-")) # 生成日期和時間
print(fixed_datetime)

輸出結果為：

[1] "2022-04-15 10:00:00 CST"

上述代碼中，使用paste()函數將年份、月日、時分秒拼接成字符串，并使用as.POSIXct()將字符串轉換為日期和時間格式。