在R中創建摘要數據表

Question

我在R中有一個數據框，其中包含以下示例數據：

choice  Wealth
1       10
2       5
3       8
3       10
2       10
3       5
1       8
2       5
2       5

我正在嘗試創建一個匯總表，以按財富水平顯示％選擇（即，那些擁有財富x的人中，有多少人選擇了1或2或3）：

Wealth %choice1 %choice2 %choice3
5      0%       75%      25%
8      50%      0%       50%
10     33%      33%      33%

我嘗試了許多不同的方法，但似乎無法獲得正確的結果（表，dplyr等）。 由於我是R的新手，因此非常感謝您的任何想法或幫助。

Answer 1

這是janitor軟件包中的tabyl函數的一種方式：

library(janitor); library(dplyr)
df %>%
  tabyl(Wealth, choice) %>%
  adorn_percentages("row")

# Wealth         1         2         3
#      5 0.0000000 0.7500000 0.2500000
#      8 0.5000000 0.0000000 0.5000000
#     10 0.3333333 0.3333333 0.3333333

Answer 2

用table檢查rowSums

tb=table(df$Wealth,df$choice)
tb/rowSums(tb)

           1         2         3
5  0.0000000 0.7500000 0.2500000
8  0.5000000 0.0000000 0.5000000
10 0.3333333 0.3333333 0.3333333