我有一个 2 列的矩阵。我使用以下公式逐行计算了每列对整体的百分比贡献：
B = matrix (c(2,4,3,1,5,7,5,3,8,3,7,3),nrow=6,ncol=2)
sweep(B, 1, rowSums(B), FUN="/")
这给出了以下结果：
[,1] [,2]
[1,] 0.2857143 0.7142857
[2,] 0.5714286 0.4285714
[3,] 0.2727273 0.7272727
[4,] 0.2500000 0.7500000
[5,] 0.4166667 0.5833333
[6,] 0.7000000 0.3000000
但是，我需要为每一行添加权重，即第 1 行为 1，第 2 行为 3。请问如何计算加权百分比贡献？