r - 将日期时间数组中的年份更改为当前年份
问题描述
如何datetime
使用 将所有值中的年份部分更改为 2021 lubridate
?
library(lubridate)
library(dplyr)
time <- ymd_hms(c("2018-01-05 12:00:15", "2018-01-01 02:00:15", "2018-02-25 12:00:15",
"2018-04-15 12:00:15", "2020-10-15 12:00:15", "2019-10-20 12:00:15",
"2019-11-15 12:01:15", "2018-11-02 11:00:15", "2018-07-09 02:00:15",
"2020-10-02 11:00:15", "2020-01-29 12:00:15", "2019-03-15 12:00:15")
)
tbl <- tibble(time)
解决方案
year(tbl$time) = 2021
> tbl
# A tibble: 12 × 1
time
<dttm>
1 2021-01-05 12:00:15
2 2021-01-01 02:00:15
3 2021-02-25 12:00:15
4 2021-04-15 12:00:15
5 2021-10-15 12:00:15
6 2021-10-20 12:00:15
7 2021-11-15 12:01:15
8 2021-11-02 11:00:15
9 2021-07-09 02:00:15
10 2021-10-02 11:00:15
11 2021-01-29 12:00:15
12 2021-03-15 12:00:15
推荐阅读
- javascript - Javascript,点击时需要返回到某个位置
- c - 将for循环程序修改为while循环程序的问题
- c# - 何时将样式内的 ControlTemplate 定义为资源?
- javascript - 如何用 Jest 测试这个事件
- azure-ad-b2c - B2c 自定义策略和内置策略组合 - 检索用户名
- automated-tests - 在赛普拉斯仪表板上哪里可以找到代码覆盖率
- javascript - 正则表达式在 3 位和 4 位数字后插入破折号
- python - How to detect a Python type implements buffer protocol or not?
- python - Replace " " with Space in a separated list
- javascript - Stuck trying to deploy Selinium and javascript webdriver test