0

データフレームを再フォーマットして、すべての銘柄名を列ヘッダーとして 1 か所に表示しようとしています。したがって、最初の列は日付列になり、2 列目以降は株式になります。

Prices<-bdh(stocks, "PX_LAST", start.date = (as.Date("2019-06-14")), end.date = (as.Date("2019-06-21")), options = optW)
Prices<-data.frame(Prices)

出力:

      $`JKH SL Equity`
    date PX_LAST
    1 2019-06-14   138.3
    2 2019-06-21   138.7

    $`700 HK Equity`
    date PX_LAST
    1 2019-06-14   330.0
    2 2019-06-21   354.4

    $`BHP LN Equity`
    date PX_LAST
    1 2019-06-14    1910
    2 2019-06-21    1965

    $`ALL AU Equity`
    date PX_LAST
    1 2019-06-14   30.62
    2 2019-06-21   31.06

列名用に 1 行、2 つの価格用に 2 行の 3 行が必要です。

4

1 に答える 1

0

オプションは、Mapをループして、listcbindから「新しい」列を作成することnamesです。list

Map(cbind, lst1, new = names(lst1))
于 2019-06-24T07:28:27.843 に答える