powered by
table.margins(x)
margin.table
x <- matrix(1:4, 2, 2) table.margins(x)
Run the code above in your browser using DataLab