if (FALSE) {
flex <- getFlexFile(survey = "NS-IBTS", year = 2020, quarter = 1)
str(flex)
# error checking examples:
flex <- getFlexFile(survey = "NS_IBTS", year = 2016, quarter = 1)
flex <- getFlexFile(survey = "NS-IBTS", year = 2030, quarter = 1)
flex <- getFlexFile(survey = "NS-IBTS", year = 2016, quarter = 6)
}
Run the code above in your browser using DataLab