CHA2DS2VASc Add variable CHA2DS2VASc score from 0 to 9.

Source: R/utlede_variabler.R

CHA2DS2VASc Add variable CHA2DS2VASc score from 0 to 9.

utlede_CHA2DS2VASc(df)

Arguments

df

data.frame with Ablanor-data. Must contain variables hjertesvikt, hypertoni and diabetes, tia_slag, alder and gender.

Value

Returns df with 1 new column: CHA2DS2VASc

Details

  • C- hjertesvikt: score +1

  • H- hypertoni: score +1

  • A2- alder(>=75): score +2

  • D- diabetes: score +1

  • S2- tia_slag: score +2

  • V- karsykdom: score +1

  • A2- alder(>=65; <75): score +1

  • Sc- gender(female): score +1

Examples

 x <- data.frame(
    hjertesvikt = c(NA, 2, rep(1, 8)),
    hypertoni = c(NA, 1, NA, 0, 0, 9, 9, 1, 1, 1),
    karsykdom = c(0, 1, 1, 1, 1, 0, 0, NA, NA, 9),
    diabetes = c(NA, 9, 1, 9, 1, 1, NA, 1, 0, 9),
    tia_slag = c(NA, 1, 1, 9, 1, 1, 0, 1, 0, 0),
    alder = c(18, 25, 64, 65, 70, 74, 75, 76, 80, 105),
    gender = c(rep(1, 4), NA, NA, rep(2, 4)))
    x %>% ablanor::utlede_alder_65_75() %>% ablanor::utlede_CHA2DS2VASc()
#>    hjertesvikt hypertoni karsykdom diabetes tia_slag alder alder_65_75 gender
#> 1           NA        NA         0       NA       NA    18         <65      1
#> 2            2         1         1        9        1    25         <65      1
#> 3            1        NA         1        1        1    64         <65      1
#> 4            1         0         1        9        9    65     [65-75>      1
#> 5            1         0         1        1        1    70     [65-75>     NA
#> 6            1         9         0        1        1    74     [65-75>     NA
#> 7            1         9         0       NA        0    75        >=75      2
#> 8            1         1        NA        1        1    76        >=75      2
#> 9            1         1        NA        0        0    80        >=75      2
#> 10           1         1         9        9        0   105        >=75      2
#>    CHA2DS2VASc
#> 1            0
#> 2            4
#> 3            5
#> 4            3
#> 5            6
#> 6            5
#> 7            4
#> 8            8
#> 9            5
#> 10           5