marginal total in tables

Question

I have a data frame with a number of infections identified from clinical isolates at different dates.

So far I have organised the data into a shape that I want to start

Answer 1

It also works with survey package's svytable().

addmargins(svytable(formula = ~x1+x2, design = df.w))