Closed ajdamico closed 8 months ago
library(convey) library(survey) library(laeken) data(eusilc) ; names( eusilc ) <- tolower( names( eusilc ) ) # linearized design des_eusilc <- svydesign( ids = ~rb030 , strata = ~db040 , weights = ~rb050 , data = eusilc ) des_eusilc <- convey_prep( des_eusilc ) svylorenz( ~eqincome , des_eusilc, seq(0,1,.05), alpha = .01 ) # replicate-weighted design des_eusilc_rep <- as.svrepdesign( des_eusilc , type = "bootstrap" ) des_eusilc_rep <- convey_prep( des_eusilc_rep ) svylorenz( ~eqincome , des_eusilc_rep, 0.5 ,plot=F) # Error in h(simpleError(msg, call)) : # error in evaluating the argument 'x' in selecting a method for function 'colMeans': (subscript) logical subscript too long