data(testdata)
res <- pram_strata(testdata,variables="roof",strata_variables=c("urbrur","sex"))
print(res)
res1 <- pram_strata(testdata,variables=c("roof","walls","water"),strata_variables=c("urbrur","sex"))
print(res1)
Run the code above in your browser using DataLab