powered by
This is really sweep(x, margin, margin.table(x, margin), "/") for newbies, except that if margin has length zero, then one gets x/sum(x).
sweep(x, margin, margin.table(x, margin), "/")
margin
x/sum(x)
prop.table(x, margin = NULL)
table
index, or vector of indices to generate margin for
Table like x expressed relative to margin
x
margin.table
# NOT RUN { m <- matrix(1:4, 2) m prop.table(m, 1) # }
Run the code above in your browser using DataLab