dplyr
require(tidyverse) date <- seq(as.Date("2020-1-1"), as.Date("2020-12-01"), by = "month")datevalue <- seq(1:12) test <- data.frame(date, value)test # たとえば、lag()を使って、valueをずらすと# 空いた欄にNAが入ることを確認するためのコード# 1…
require(tidyverse) date <- seq(as.Date("2020-1-1"), as.Date("2020-12-01"), by = "month")datevalue <- seq(1:12) test <- data.frame(date, value)test # たとえば、lag()を使って、valueをずらすと# 空いた欄にNAが入ることを確認するためのコード# 1…