inst/tests/summary.formula.response.stratify.r

require(Hmisc)
set.seed(1)
d <- expand.grid(day=c(1, 3), rx=c('A','B'), reps=1:3)
d$x <- runif(nrow(d))
s <- summary(x ~ day + stratify(rx), fun=smean.sd, overall=FALSE, data=d)
w <- latex(s, file='/tmp/z.tex', table.env=FALSE, booktabs=TRUE)

Try the Hmisc package in your browser

Any scripts or data that you put into this service are public.

Hmisc documentation built on Sept. 12, 2023, 5:06 p.m.