我在下表中存储了名为payments的数据，该数据来自数据库Data taken from database
现在我只需要更改Week列的格式，而不是（201625）到（2016-25）。只在两者之间添加连字符，使其更清楚一年，然后是一周。
当然我无法更改数据库中的数据，所以我尝试使用
pdm_data [2] <- as.numeric(gsub("6","-",as.character(pdm_data[ ,2])))
但这仅查找要搜索的实际数字，而不是创建空格然后将连字符放在该空格
请帮助我真的很感激
答案 0 :(得分：1)
尝试str_replace包中的stringr：
stringr::str_replace("201625", "(\\d{4})(\\d{2})", "\\1-\\2")
[1] "2016-25"