Extract time-level information
timedata(x)A tibble with time-level data
fn <- system.file("extdata/bds_v3.0/smocc/Laura_S.json",
package = "jamesdemodata")
timedata(read_bds(fn))
#> # A tibble: 58 × 8
#> age xname yname zname zref x y z
#> <dbl> <chr> <chr> <chr> <chr> <dbl> <dbl> <dbl>
#> 1 0 age hgt hgt_z nl_1997_hgt_female_nl 0 48 -1.52
#> 2 0.101 age hgt hgt_z nl_1997_hgt_female_nl 0.101 53.5 -0.499
#> 3 0.159 age hgt hgt_z nl_1997_hgt_female_nl 0.159 56 -0.261
#> 4 0.236 age hgt hgt_z nl_1997_hgt_female_nl 0.236 59.5 0.163
#> 5 0.485 age hgt hgt_z nl_1997_hgt_female_nl 0.485 65.5 -0.259
#> 6 0.753 age hgt hgt_z nl_1997_hgt_female_nl 0.753 71.5 0.131
#> 7 1.02 age hgt hgt_z nl_1997_hgt_female_nl 1.02 75 -0.18
#> 8 1.25 age hgt hgt_z nl_1997_hgt_female_nl 1.25 80 0.421
#> 9 1.54 age hgt hgt_z nl_1997_hgt_female_nl 1.54 84 0.527
#> 10 2.04 age hgt hgt_z nl_1997_hgt_female_nl 2.04 90 0.67
#> # ℹ 48 more rows