1

データフレーム (または 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))
4

3 に答える 3