How can I use replicate weights to create standard errors in R?

CPS
10

The code for ACS samples should be nearly the same. The IPUMS USA page on replicate weights gives details on the calculations: https://usa.ipums.org/usa/repwt.shtml

I’ll refer you to the earlier post in this thread by @gfellis giving example code for using replicate weights with ASEC data. Apart from specific variables used in analysis, the code will work more or less unchanged for ACS, with a few modifications to the survey design specification. Below I’ve highlighted the things you would need to change, depending on whether you’re using -survey- or -srvyr- packages:

Using -survey-

ASEC:

svy <- svrepdesign(data = data, weight = ~ASECWT, repweights = “REPWTP[0-9]+”, 
      type = “JK1”, scale = 4/160, rscales = rep(1, 160), mse = TRUE)

ACS:

svy <- svrepdesign(data = data, weight = ~PERWT , repweights = “REPWTP[0-9]+”,
      type = “JK1”, scale = 4/ 80 , rscales = rep(1, 80 ), mse = TRUE)

Using -srvyr-

ASEC:

svy <- as_survey(data, weight = ASECWT, repweights = matches(“REPWTP[0-9]+”), 
      type = “JK1”, scale = 4/160, rscales = rep(1, 160), mse = TRUE)

ACS:

svy <- as_survey(data, weight = PERWT , repweights = matches(“REPWTP[0-9]+”), 
      type = “JK1”, scale = 4/ 80 , rscales = rep(1, 80 ), mse = TRUE)