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