R 如何合并和取消合并字符向量？

我需要通过一系列的计算来跟踪我的数据

我有以下向量：

start_date <- "2010-11-04"
end_date <- "2010-11-10"

那么我想要相反的结果：

---

从：

“2010-11-04至2010-11-10”

返回到原始的两个向量

这不使用任何包：

p <- paste(start_date, "to", end_date)
p
## [1] "2010-11-04 to 2010-11-10"

另一种方法是使用strsplit拆分字符串：

s <- unlist(strsplit(p, " to "))
s
## [1] "2010-11-04" "2010-11-10"

s
sub(" .*", "", p)
## [1] "2010-11-04"
sub(".* ", "", p)
## [1] "2010-11-10"

s <- unlist(strsplit(p, " to "))
s
## [1] "2010-11-04" "2010-11-10"