Add variable `orgname` if missing, update values if existing

fikse_sykehusnavn(df)

Arguments

df

data.frame, must contain variable `UnitId`

Value

data.frame with variable `orgname`. Old values are overwritten if `orgname` already existed if `df`

Examples

x <- data.frame(UnitId = c(108141, 109880, NA, 123, 105502))
x %>% fikse_sykehusnavn()
#>   UnitId orgname
#> 1 108141    <NA>
#> 2 109880    <NA>
#> 3     NA    <NA>
#> 4    123    <NA>
#> 5 105502    <NA>

y <- data.frame(UnitId = c(108141, 109880, NA, 123, 105502),
                orgname = c("AHUS", "Ullevål", "NA",
                 "test", "Stavanger"))