this function generates some test-data
ck_create_testdata()a data.frame
dat <- ck_create_testdata(); print(str(dat))
#> Classes 'data.table' and 'data.frame': 4580 obs. of 15 variables:
#> $ urbrur : int 2 2 2 2 2 2 2 2 2 2 ...
#> $ roof : int 4 4 4 4 4 4 4 4 4 4 ...
#> $ walls : int 3 3 3 3 2 2 2 2 2 2 ...
#> $ water : int 3 3 3 3 3 3 3 3 3 3 ...
#> $ electcon : int 1 1 1 1 1 1 1 1 1 1 ...
#> $ relat : int 1 2 3 3 1 2 3 3 3 3 ...
#> $ sex : Factor w/ 2 levels "male","female": 1 2 1 1 1 2 2 2 1 2 ...
#> $ age : Factor w/ 6 levels "age_group1","age_group2",..: 3 3 1 1 4 3 1 2 1 2 ...
#> $ hhcivil : int 2 2 1 1 2 2 1 1 1 1 ...
#> $ expend : num 9093 2734 2652 1807 671 ...
#> $ income : num 5780 2530 6920 7960 9030 3290 2270 8910 209 4410 ...
#> $ savings : num 12 28 550 870 20 102 812 988 704 478 ...
#> $ ori_hid : int 1 1 1 1 2 2 2 2 2 2 ...
#> $ sampling_weight : int 93 93 39 47 92 26 27 20 42 39 ...
#> $ household_weights: num 25 25 25 25 16.7 ...
#> - attr(*, ".internal.selfref")=<externalptr>
#> NULL