## Not run:
# data(testdata2)
# sdc <- createSdcObj(testdata2,
# keyVars=c('urbrur','roof','walls','water','electcon','relat','sex'),
# numVars=c('expend','income','savings'), w='sampling_weight')
# report(sdc)
# ## End(Not run)
Run the code above in your browser using DataLab