@@ -116,13 +116,13 @@ for (s in c("alabama", "california", "acs3yr" )) {
mse = TRUE ,
data = svydata)
print("initialized")
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]]
log.result("survey", sys, conf, s, r, timing)
clearResultRecycler()