如何將行名轉換為列名並在r中按順序綁定它

Question

我正在處理數據集： Ticker的年度報表

我想轉換為： 結果矩陣

我用過代碼：

returns.df < - 返回％>％spread（key = DATE，value = RETURN）

它顯示錯誤的順序： 在此處輸入圖像描述

Answer 1

假設您的長格式數據以您想要的順序開頭，請嘗試以下方法：

month_order = unique(returns)
returns.df <- returns %>%
  spread(key = DATE, value = RETURN) %>% 
  select(c("TICKER", month_order))

如果您的數據沒有按正確的順序開始，請追加一年並將其轉換為Date類對象。 然后您可以按正確的順序對其進行排序並使用上述方法。

Answer 2

我想出了我寫這些多行：

column <- unique(returns$DATE)
ret <- matrix(returns$RETURN,nrow = 22,ncol = 60)
row <- unique(returns$TICKER)
rownames(ret) <- row
colnames(ret) <- column
ret

這個怎么樣？