格式為 function output 為數據幀

Question

我使用以下內容來總結 5 個不同年份中每個儒略日期的 TABR 的幾個度量：

TABR_YearDay<-with(wsmr, tapply(TABR, list(Julian, Year),sum))

哪個產生 output 像：

     2015 2016 2017 2018 2019
33    NA   NA   NA    2   NA
....

80    NA    1   NA   21   NA

81    NA   47   NA   25   NA

82    NA   12    1    9   NA

但我想將這些結果轉換為具有 6 列 Julian + 2015-2019 的 dataframe。

我試過了：

TABR_Day<-as.data.frame(TABR_YearDay)

但這似乎並沒有產生完全實現的 df：Julian 沒有列，如果我想調用單個變量，我必須在它周圍使用引號，例如：

hist(TABR_Day$"2017")

您能幫我將 function output 轉換為具有 6 個可行列的 dataframe 嗎？

Answer 1

該列存在於結果的行名中。 列名通常不以數字開頭，我們可以在列名前加上'Year'一詞，使其成為'Year_2015'等，並構造最終的 dataframe。

TABR_YearDay<-with(wsmr, tapply(TABR, list(Julian, Year),sum))
colnames(TABR_YearDay) <- paste0('Year_', colnames(TABR_YearDay))
TABR_Day <- data.frame(Julian = rownames(TABR_YearDay), TABR_YearDay)