dplyr

dplyrでlag()を使って、valueをずらすと空いた欄にNAが入るためそれを0に置き換える

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…