r - 拆分数据框中列的字符以在 R 中的值之间插入下划线

Question

我有一个包含 YYYYMMDD 格式的日期列的数据框。我想将此列值转换为 YYYY_MM_DD 以匹配另一个数据库中的格式。
我发现的解决方案主要集中在拆分字符串，例如逗号分隔的字符串。
我本质上想要一个索引 YYYYMMDD 并在第 4 个字符和第 6 个字符后插入“_”的解决方案。
谢谢
更新:
发布后，我几乎立即找到了一个对我有用的解决方案:

library(tidyr)

# create names for new columns
newCol <- c("YEAR", "MONTH", "DAY")

# separate existing column at 4 and 6 character
newData <- separate(table, old_column, newCol, sep = c(4,6))

# combining the three columns to one delimited by '_'
table$newColumn <- paste(table$YEAR, table$MONTH, table$DAY, sep = "_")

Answer 1

你可以试试gsub + as.Date ，例如，

> gsub("-","_",as.Date(s,"%Y%m%d"))
[1] "2020_10_30" "2020_09_22"

数据

s <- c("20201030", "20200922")