在R中編碼複雜表格的好方法？

Question

有沒有人有任何關於如何在R中編寫複雜表格的好主意？

恐怕我可能會在這個有點模糊，但我想建立一個腳本來創建一批類似於美國統計摘要一個複雜的表格。

例如爲：http://www.census.gov/compendia/statab/tables/09s0015.pdf

而且我想避免一大堆rbind和hbind語句。

在SAS，我聽說過，有一個表創建說明語言;我想知道R是否有類似的功能？

謝謝！

Answer 1

它看起來像你想對一些數據應用一些不同的計算，將它分組一個字段（在這個例子中，按狀態）？

有很多方法可以做到這一點。見this related question。

你可以使用哈德利韋翰的reshape包（見reshape homepage）。舉例來說，如果你想要的平均，總和，計數應用於由值分組的一些數據的功能（這是沒有意義的，但它從重塑使用airquality數據）：

> library(reshape) 
> names(airquality) <- tolower(names(airquality)) 
> # melt the data to just include month and temp 
> aqm <- melt(airquality, id="month", measure="temp", na.rm=TRUE) 
> # cast by month with the various relevant functions 
> cast(aqm, month ~ ., function(x) c(mean(x),sum(x),length(x))) 
    month X1 X2 X3 
1  5 66 2032 31 
2  6 79 2373 30 
3  7 84 2601 31 
4  8 84 2603 31 
5  9 77 2307 30 

或者你可以使用by()功能。指數將代表各州。在你的情況下，你可以應用你自己的函數來完成多個任務（取決於你的需要），而不是應用一個函數（例如mean）：例如，function(x) { c(mean(x), length(x)) }。然後在輸出上運行do.call("rbind"（例如）。

此外，你可能會使用一個報告程序，如Sweave（與xtable）或Jeffrey Horner's brew package給予一定的考慮。有一個great post on the learnr blog about creating repetitive reports顯示如何使用它。

Answer 2

另一種選擇是plyr包。

library(plyr) 
names(airquality) <- tolower(names(airquality)) 
ddply(airquality, "month", function(x){ 
    with(x, c(meantemp = mean(temp), maxtemp = max(temp), nonsense = max(temp) - min(solar.r))) 
}) 

Answer 3

Here is an interesting blog posting on this topic.作者試圖創建一個類似於聯合國的「世界人口前景：2008年修訂報告」的報告。

希望幫助， 查理