diff --git a/DESCRIPTION b/DESCRIPTION index f367e42f619bdc408ddfc4093a639e6b699f5c87..5039f907ba9032abe2f2aa75a93f18132d6dff8e 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: leo Type: Package Title: Useful functions for LEO surveys -Version: 0.2.2 +Version: 0.2.3 Author: Gregor Dutz Maintainer: Gregor Dutz <gregor.dutz@uni-hamburg.de> Description: Implements simple functions to handle data from two German surveys diff --git a/R/leo_svydesign.R b/R/leo_svydesign.R index 4423fc618acdf62483786dfc0fadea6842b25d95..f23a4d065e029edfeba457cb8455cf92859e889e 100644 --- a/R/leo_svydesign.R +++ b/R/leo_svydesign.R @@ -37,8 +37,8 @@ leo_svydesign <- function(df, survey = "leo2018", replist = FALSE) { # create list with one pv-variable and one level-variable each (and all other variables) repList <- lit %>% purrr::map(function(x) {dplyr::select(df, all, paste0("alpha_", x), x) %>% - dplyr::rename(.data$pv := !!x) %>% - dplyr::rename(.data$alpha_pv := !!paste0("alpha_", x))}) + dplyr::rename(pv = !!x) %>% + dplyr::rename(alpha_pv = !!paste0("alpha_", x))}) # create further alpha-variables for different analyses # alpha3 (three levels): low literate (Alpha 1-3), Alpha 4, above Alpha 4