MFI domain score calculator
Usage
mfi_domains(
ds,
reverse = TRUE,
reverse.vars = c(2, 5, 9, 10, 13, 14, 16, 17, 18, 19)
)
Examples
mfi_mess <- data.frame(matrix(
sample(c(" 1. ", "2. -A", "3.", " 4 ", "5.", NA),200,replace=TRUE),ncol=20))
mfi_mess |> mfi_domains()
#> # A tibble: 10 × 5
#> act gen men mot phy
#> <dbl> <dbl> <dbl> <dbl> <dbl>
#> 1 8 NA 14 13 NA
#> 2 12 17 NA NA 12
#> 3 10 14 NA NA 12
#> 4 NA 12 14 13 NA
#> 5 NA 10 NA 9 NA
#> 6 NA 7 NA 14 NA
#> 7 12 16 NA NA 13
#> 8 NA 13 11 NA 16
#> 9 NA 11 12 11 12
#> 10 13 13 NA 9 13