tests/raowuboot.R

## regression test for bug reported by Richard Valliant
library(survey)
s<-subbootweights(c(1,1),1:2, 50)
stopifnot(all(s$repweights$weights %in% c(0,2)))
bschneidr/fastsurvey documentation built on March 13, 2024, 11:12 a.m.