Skip to contents

Create longitudinal data skeleton

Source: R/create_skeleton.R
create_skeleton.Rd

Creates a longitudinal data skeleton with individual IDs and time periods (both ISO years and ISO year-weeks) for Swedish registry data analysis. The skeleton provides the framework for merging various registry datasets with consistent time structure.

Usage

create_skeleton(ids, date_min, date_max)

Arguments

ids

Vector of individual IDs to include in the skeleton

date_min

Date object specifying the start date for the analysis period

date_max

Date object specifying the end date for the analysis period

Value

A data.table skeleton with columns:

  • id: Individual identifier

  • isoyear: ISO year (integer)

  • isoyearweek: ISO year-week (character, format "YYYY-WW" or "YYYY-**" for annual rows)

  • is_isoyear: Logical indicating if row represents annual (TRUE) or weekly (FALSE) data

  • isoyearweeksun: Date representing the Sunday (last day) of the ISO week/year

  • personyears: Person-time contribution (1 for annual rows, 1/52.25 for weekly rows)

See also

add_onetime for demographic data, add_diagnoses for diagnosis codes, add_rx for prescription data, add_operations for surgical procedures

Examples

# Load fake data
data("fake_person_ids", package = "swereg")

# Create skeleton for 2020-2022 period
skeleton <- create_skeleton(
  ids = fake_person_ids[1:10],
  date_min = as.Date("2020-01-01"),
  date_max = as.Date("2022-12-31")
)
utils::head(skeleton)
#>       id isoyear isoyearweek is_isoyear isoyearweeksun personyears
#>    <int>   <int>      <char>     <lgcl>         <Date>       <num>
#> 1:     1    1900     1900-**       TRUE     1900-07-01           1
#> 2:     1    1901     1901-**       TRUE     1901-06-30           1
#> 3:     1    1902     1902-**       TRUE     1902-06-29           1
#> 4:     1    1903     1903-**       TRUE     1903-06-28           1
#> 5:     1    1904     1904-**       TRUE     1904-07-03           1
#> 6:     1    1905     1905-**       TRUE     1905-07-02           1

# Check structure
utils::str(skeleton)
#> Classes ‘data.table’ and 'data.frame':	2780 obs. of  6 variables:
#>  $ id            : int  1 1 1 1 1 1 1 1 1 1 ...
#>  $ isoyear       : int  1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 ...
#>  $ isoyearweek   : chr  "1900-**" "1901-**" "1902-**" "1903-**" ...
#>  $ is_isoyear    : logi  TRUE TRUE TRUE TRUE TRUE TRUE ...
#>  $ isoyearweeksun: Date, format: "1900-07-01" "1901-06-30" ...
#>  $ personyears   : num  1 1 1 1 1 1 1 1 1 1 ...
#>  - attr(*, ".internal.selfref")=<externalptr>