diff --git a/survey.R b/survey.R index 7a4c406bd38c111476a3f1cf8c49f61dcf0b23e1..b5add740a5d3b448bb87d3ccf68783033f9dea13 100644 --- a/survey.R +++ b/survey.R @@ -119,7 +119,7 @@ for (s in c("alabama", "california", "acs3yr" )) { for (r in 1:5) { timing <- system.time({ agep <- svymean(~agep, svydsgn, se=TRUE) - relp <- svymean(~relp, svydsgn, se=TRUE) + relp <- svymean(~adjinc, svydsgn, se=TRUE) print(agep) print(relp) })[[3]]