データフレーム (または tibble) を tsibble に変換するための最も効率的なアプローチに関する提案についてお問い合わせしたいと思います。
データフレームの最初の列には日付があり、他のすべての列は、対応する日付に値が与えられたさまざまな時系列を表します。キー=各時系列の名前、インデックス=各日付でtsibbleを効率的に作成したいと思います。
したがって、出力は次のように表示される tsibble になります。
Key Index Value
TimeSeriesOne FirstDate Value TimeSeriesOne on first date
TimeSeriesOne SecondDate Value TimeSeriesOne on second date
......................................................................
TimeSeriesOne LastDate Value TimeSeriesOne on last date
TimeSeriesTwo FirstDate Value TimeSeriesTwo on first date
......................................................................
TimeSeriesN LastDate Value TimeSeriesN on last date
入力データの例:
numRows <- 15
startDate <- lubridate::as_date('2018-06-10')
endDate <- startDate + base::months(x = numRows-1)
theDates <- base::seq.Date(
from = startDate,
to = endDate,
by = "month")
inputData <- tibble::tibble(
"Dates" = theDates,
"SeriesOne" = stats::rnorm(numRows),
"SeriesTwo" = stats::rnorm(numRows),
"SeriesThree" = stats::rnorm(numRows),
"SeriesFour" = stats::rnorm(numRows))