http://stackoverflow.com/questions/32380663/improve-speed-of-queries-using-complex-survey-design-in-r