创建一系列日期并存储在具有列名的数据框中
Create a sequence of dates and store in a data frame with a column name
我觉得我快疯了!
我需要创建一个带有列名的日期数据框,但我正在努力弄清楚。
我知道我可以使用 colnames(date_df) <- "DATE"
在 dplyr 链之外分配 colnames 但为了我自己的学习,我想了解是否可以在 dplyr pipe/chain
library(tidyverse)
library(lubridate)
date_df <- seq.Date(from = as.Date(today()- days(7)),
to = as.Date(today()),
by = "day") %>%
as.data.frame(col.names = c("DATE"))
有人可以让我摆脱痛苦并帮我为这个基本问题添加一个列名吗?
有很多方法可以做到这一点,因为您使用了 data.frame :
library(lubridate)
library(magrittr)
seq.Date(from = as.Date(today()- days(7)),
to = as.Date(today()),
by = "day") %>%
data.frame(DATE = .)
# DATE
#1 2021-04-23
#2 2021-04-24
#3 2021-04-25
#4 2021-04-26
#5 2021-04-27
#6 2021-04-28
#7 2021-04-29
#8 2021-04-30
也许只是:
data.frame(DATE = seq.Date(from = as.Date(today() - days(7)),
to = as.Date(today()),
by = "day"))
我觉得我快疯了!
我需要创建一个带有列名的日期数据框,但我正在努力弄清楚。
我知道我可以使用 colnames(date_df) <- "DATE"
在 dplyr 链之外分配 colnames 但为了我自己的学习,我想了解是否可以在 dplyr pipe/chain
library(tidyverse)
library(lubridate)
date_df <- seq.Date(from = as.Date(today()- days(7)),
to = as.Date(today()),
by = "day") %>%
as.data.frame(col.names = c("DATE"))
有人可以让我摆脱痛苦并帮我为这个基本问题添加一个列名吗?
有很多方法可以做到这一点,因为您使用了 data.frame :
library(lubridate)
library(magrittr)
seq.Date(from = as.Date(today()- days(7)),
to = as.Date(today()),
by = "day") %>%
data.frame(DATE = .)
# DATE
#1 2021-04-23
#2 2021-04-24
#3 2021-04-25
#4 2021-04-26
#5 2021-04-27
#6 2021-04-28
#7 2021-04-29
#8 2021-04-30
也许只是:
data.frame(DATE = seq.Date(from = as.Date(today() - days(7)),
to = as.Date(today()),
by = "day"))