在r中，如何将值显示为总行数的百分比？

Question

我有一个data.frame之类的

a  b  c  d
1  3  4  2
1  2  3  4
3  4  2  1 
1  3  5  4

，并希望在那里显示值占总行数的百分比，例如

a  b  c  d
10 30 40 20
10 20 30 40
30 40 20 10 
8  23 38 31