如何从r的Seris时间戳中提取日期到今天？

Question

我想从一系列时间戳中提取日期直到今天。我使用以下命令，但要获取所有日期，直到昨天，但不是今天：

substr(seq(as.POSIXct(start), as.POSIXct(format(Sys.time())), "day"), 1, 10)

开始是一个理想的时间戳，我正在从系统获取当前的时间戳。但是，答案将是一系列日期，直到当前日期的前一天。我也该如何获取当前日期？