Extract person-level information
persondata(x)
A tibble with person-level data
fn <- system.file("extdata/bds_v3.0/smocc/Laura_S.json",
package = "jamesdemodata")
persondata(read_bds(fn))
#> # A tibble: 1 × 22
#> id name dob dobm dobf src dnr sex gad ga
#> <int> <chr> <date> <date> <date> <chr> <chr> <chr> <dbl> <dbl>
#> 1 -1 Laura S 1989-01-21 1961-07-22 NA 0 NA female 276 39
#> # ℹ 12 more variables: smo <dbl>, bw <dbl>, hgtm <dbl>, hgtf <dbl>, agem <dbl>,
#> # etn <chr>, pc4 <chr>, blbf <int>, blbm <int>, eduf <int>, edum <int>,
#> # par <int>