通过Id和贷款目的在R中找到比例

Question

请您按照ID和贷款目的向我提供以下样本数据的比例

数据：

Id  Loan
94  Expansion
94  Working Capital
94  Expansion
95  Working Capital
95  Working Capital
95  Inventory
99  Working Capital
99  Working Capital
99  Working Capital

期望的输出：

Id  Loan              Proportion
94  Expansion       66.67%
94  Working Capital     33.33%
95  Working Capital     83.33%
95  Inventory       16.67%

谢谢， 小号

Answer 1

使用标准的旧table和prop.table功能：

tmp <- table(dat)
data.frame(prop.table(tmp ,1))[tmp != 0,]
#  Id            Loan      Freq
#1 94       Expansion 0.6666667
#5 95       Inventory 0.3333333
#7 94 Working Capital 0.3333333
#8 95 Working Capital 0.6666667
#9 99 Working Capital 1.0000000