############################################################################ # PROGRAM: NISTEENPUF09.R # # # # PURPOSE: THIS R PROGRAM CREATES A PERMANENT R DATASET # # FROM THE 2009 NIS-TEEN PUBLIC-USE ASCII FILE # # # # NOTES: THIS PROGRAM IS DIVIDED INTO SEVEN STEPS AS FOLLOWS: # # # # STEP 1: LOAD AN R PACKAGE AND ASSIGN FILE NAMES # # # # ONE R PACKAGE FOR TWO FUNCTIONS (CONTENTS, WTD.TABLE) # # WILL BE LOADED # # THE USER CAN ENTER THE PATH TO THE ASCII DATA FILE AND # # THE PATH WHERE THE R DATASET WILL BE CREATED # # # # STEP 2: CREATE FORMATS # # # # STEP 3: READ THE FLAT DATA FILE # # # # STEP 4: ASSIGN VARIABLE LABELS # # # # STEP 5: CREATE A PERMANENT R DATASET # # # # STEP 6: ASSIGN FORMATS # # # # FORMATS ARE APPLICABLE ONLY TO CATEGORICAL VARIABLES IN R # # # # STEP 7: CONTENTS AND STATISTICAL ESTIMATES(FREQUENCY) EXAMPLE # # # ############################################################################ ############################################################################ # Step 1: LOAD R PACKAGES AND ASSIGN FILE NAMES # ############################################################################ #Users may need to install the Hmisc library before invoking it. library(Hmisc) #TO USE contents() #---USE SLASH(/) TO SEPERATE A FILE PATH---# PUF <- "path-to-data" flatfile <- "path-to-file/NISTEENPUF09.DAT" ############################################################################ # Step 2: CREATE FORMATS # ############################################################################ LANGUAGElevels=c(1,2,3) LANGUAGElabels=c("ENGLISH", "SPANISH", "OTHER") YNDKRFlevels=c(1,2,77,98,99) YNDKRFlabels=c("YES", "NO", "DON'T KNOW", "MISSING IN ERROR", "REFUSED") CKUPLASTlevels=c(1,2,3,77,98,99) CKUPLASTlabels=c("MORE THAN (AGE - 12) YEARS AGO", "EXACTLY (AGE - 12) YEARS AGO", "LESS THAN (AGE - 12) YEARS AGO", "DON'T KNOW", "MISSING IN ERROR", "REFUSED") CPOX_Rlevels=c(1,2,3,4,77,98,99) CPOX_Rlabels=c("LESS THAN 1 YEAR OLD", "1 TO 5 YEARS OLD", "5 TO 10 YEARS OLD", "MORE THAN 10 YEARS OLD", "DON'T KNOW", "MISSING IN ERROR", "REFUSED") HHCOUNTlevels=c(50,77,98,99) HHCOUNTlabels=c("ALL SHOTS", "DON'T KNOW", "MISSING IN ERROR", "REFUSED") SHOTCARDlevels=c(1,2) SHOTCARDlabels=c("SECTION A ADMINISTERED", "SECTION B ADMINISTERED") TETTYPElevels=c("1","2","77","98","99") TETTYPElabels=c("TD ONLY", "TDAP ONLY", "DON'T KNOW", "MISSING IN ERROR", "REFUSED") INCPOVlevels=c(1,2,3,4) INCPOVlabels=c("ABOVE POVERTY > $75K", "ABOVE POVERTY <= $75K", "BELOW POVERTY", "UNKNOWN") MOBILlevels=c(1,2,77,98,99) MOBILlabels=c("MOVED FROM DIFFERENT STATE", "DID NOT MOVE FROM DIFFERENT STATE", "DON'T KNOW", "MISSING IN ERROR", "REFUSED") NUM_PHONlevels=c(1,2,3,4,77,98,99) NUM_PHONlabels=c("ONE", "TWO", "THREE OR MORE", "NONE", "DON'T KNOW", "MISSING IN ERROR", "REFUSED") SEXlevels=c(1,2,77,98,99) SEXlabels=c("MALE", "FEMALE", "DON'T KNOW", "MISSING IN ERROR", "REFUSED") ADEQlevels=c(1,2) ADEQlabels=c("TEEN HAS ADEQUATE PROVIDER DATA", "TEEN DOES NOT HAVE ADEQUATE PROVIDER DATA") CONSENTlevels=c(1,2) CONSENTlabels=c("CONSENT GIVEN", "CONSENT DENIED") TYPElevels=c("","01","02","03","04","11","13","14","15","20","21","22","30","31","32","33","43","44","61","62","63","64","70","71","72","80","81","82","BC","DC","DH","DK","FL","FM","FN","FO","FV","FZ","HA","HB","HI","HO","HP","MA","MB","MM","MP","NC","OT", "RB","RO","TY","UN","VA","VM","VO","YF") TYPElabels=c("MISSING", "DT", "DTP", "DT/DTP/DTAP-CONTAINING, UNKNOWN SUBTYPE", "DTAP", "TD", "DT/TD-CONTAINING, UNKNOWN SUBTYPE", "TDAP", "TD/TDAP-CONTAINING, UNKNOWN SUBTYPE", "OPV", "IPV", "POLIO-CONTAINING, UNKNOWN SUBTYPE", "MMR-ONLY", "MEASLES-ONLY", "MEASLES-MUMPS", "MEASLES-RUBELLA", "HEPB-HIB", "HIB-ONLY", "0.5 ML RECOMBIVAX", "1.0 ML RECOMBIVAX", "ENGERIX", "HEPATITIS B-ONLY, UNKNOWN SUBTYPE CHECKED", "PNEUMOCOCCAL CONJUGATE", "PNEUMOCOCCAL POLYSACCHARIDE", "PNEUMOCOCCAL-CONTAINING, UKNOWN SUBTYPE", "MCV4 (MENACTRA)", "MPSV4 (MENOMUNE)", "MENINGOCOCCAL-CONTAINING, UNKNOWN SUBTYPE", "BCG (TUBERCULOSIS)", "DTP/DTAP COMBO", "DTP-HEPB", "DON'T KNOW", "SEASONAL FLU-CONTAINING, UNKNOWN SUBTYPE", "SEASONAL FLUMIST", "INJECTED SEASONAL FLU, OTHER/UNKNOWN SUBTYPE", "FOUR-IN-ONE", "SEASONAL FLUVIRIN", "SEASONAL FLUZONE", "HEPATITIS A-CONTAINING, UNKNOWN SUBTYPE", "HEPATITIS B-CONTAINING, UNKNOWN SUBTYPE", "HIB-CONTAINING, UNKNOWN SUBTYPE", "HEPATITIS A-ONLY (HAVRIX OR VAQTA)", "HUMAN PAPILLOMAVIRUS", "MALARIA", "MUMPS-RUBELLA", "MEASLES-CONTAINING, UNKNOWN SUBTYPE", "MUMPS-ONLY", "NEVER CODABLE DESCRIPTION", "VERBATIM", "RUBELLA-ONLY", "ROTAVIRUS", "TYPHOID", "UNCODABLE DESCRIPTION", "VARICELLA-CONTAINING, UNKNOWN SUBTYPE", "MMR-VARICELLA", "VARICELLA-ONLY", "YELLOW FEVER") YESMISSlevels=c(1) YESMISSlabels=c("YES") UTDlevels=c(0,1) UTDlabels=c("NOT UTD", "UTD") CENREGlevels=c(1,2,3,4) CENREGlabels=c("NORTHEAST", "MIDWEST", "SOUTH", "WEST") STATElevels=c(1,10,11,12,13,14,15,16,17,18,19,2,20,21,22,23,24,25,26,27,28,29,3,30,31,32,33,34,35,36,37,38,39,4,40,41,42,43,44,45,46,47,48,49,5,50,51,52,53,54,55,56,6,7,78,8,9) STATElabels=c("ALABAMA", "DELAWARE", "DISTRICT OF COLUMBIA", "FLORIDA", "GEORGIA", "", "HAWAII", "IDAHO", "ILLINOIS", "INDIANA", "IOWA", "ALASKA", "KANSAS", "KENTUCKY", "LOUISIANA", "MAINE", "MARYLAND", "MASSACHUSETTS", "MICHIGAN", "MINNESOTA", "MISSISSIPPI", "MISSOURI", "", "MONTANA", "NEBRASKA", "NEVADA", "NEW HAMPSHIRE", "NEW JERSEY", "NEW MEXICO", "NEW YORK", "NORTH CAROLINA", "NORTH DAKOTA", "OHIO", "ARIZONA", "OKLAHOMA", "OREGON", "PENNSYLVANIA", "", "RHODE ISLAND", "SOUTH CAROLINA", "SOUTH DAKOTA", "TENNESSEE", "TEXAS", "UTAH", "ARKANSAS", "VERMONT", "VIRGINIA", "", "WASHINGTON", "WEST VIRGINIA", "WISCONSIN", "WYOMING", "CALIFORNIA", "", "U.S. VIRGIN ISLANDS", "COLORADO", "CONNECTICUT") EDUC4_Mlevels=c(1,2,3,4,77,98,99) EDUC4_Mlabels=c("LESS THAN 12 YEARS", "12 YEARS", "MORE THAN 12 YEARS, NON-COLLEGE GRAD", "COLLEGE GRADUATE", "DON'T KNOW", "MISSING IN ERROR", "REFUSED") FACILSUMlevels=c(1,2,3,4,5,6) FACILSUMlabels=c("ALL PUBLIC FACILITIES", "ALL HOSPITAL FACILITIES", "ALL PRIVATE FACILITIES", "ALL STD/SCHOOL/TEEN CLINICS OR OTHER FACILITIES", "MIXED", "UNKNOWN") REGISTRYlevels=c(1,2,3,4) REGISTRYlabels=c("ALL PROVIDERS", "SOME BUT POSSIBLY OR DEFINITELY NOT ALL PROVIDERS", "NO PROVIDERS", "UNKNOWN/DON'T KNOW") AGEGRP_Mlevels=c(1,2,3,77,98,99) AGEGRP_Mlabels=c("<= 34 YEARS", "35 TO 44 YEARS", ">= 45 YEARS", "DON'T KNOW", "MISSING IN ERROR", "REFUSED") HVSTSlevels=c(1,2,3,4,5,6,7,77,8,9,98,99) HVSTSlabels=c("NONE", "1", "2 - 3", "4 - 5", "6 - 7", "8 - 9", "10 - 12", "DON'T KNOW", "13 - 15", "16+", "MISSING IN ERROR", "REFUSED") UTDVRClevels=c(0,1,2) UTDVRClabels=c("NOT UTD, NO HISTORY OF CHICKEN POX DISEASE", "UTD", "NOT UTD, HISTORY OF CHICKEN POX DISEASE") RENTOWNlevels=c(1,2,3,77,99) RENTOWNlabels=c("OWNED OR BEING BOUGHT", "RENTED", "OTHER ARRANGMENT", "DON'T KNOW", "REFUSED") AGEATSHOTlevels=c(-99,77,99) AGEATSHOTlabels=c("IMMUN. DATE BEFORE BEST DOB", "DON'T KNOW", "REFUSED") MONTHFlevels=c(77,99) MONTHFlabels=c("DON'T KNOW", "REFUSED") YEARFlevels=c(777,999) YEARFlabels=c("DON'T KNOW", "REFUSED") CHILDNMFlevels=c(1,2,3,77,99) CHILDNMFlabels=c("ONE", "TWO OR THREE", "FOUR OR MORE", "DON'T KNOW", "REFUSED") NOSCHRlevels=c(0,1,2,3,4,5,6,7,77,8,9,96,98,99) NOSCHRlabels=c("ZERO", "ONE", "TWO", "THREE", "FOUR", "FIVE", "6 TO 9", "10 TO 19", "DON'T KNOW", "20 TO 29", "30 OR MORE", "DID NOT GO TO SCHOOL", "MISSING IN ERROR", "REFUSED") EDUC_TRlevels=c(1,2,3,4,77,99) EDUC_TRlabels=c("6TH TO 8TH GRADE", "9TH TO 12TH GRADE", "HS GRAD/GED COMPLETED/ENROLLED IN GED PROGRAM", "NOT IN SCHOOL/OTHER", "DON'T KNOW", "REFUSED") C1Rlevels=c(1,2,3,4,5,6,7,8) C1Rlabels=c("1", "2", "3", "4", "5", "6", "7", "8+") RACE_PUFlevels=c(1,2,3) RACE_PUFlabels=c("WHITE ONLY", "BLACK ONLY", "OTHER + MULTIPLE RACE") RACEETHKlevels=c(1,2,3,4) RACEETHKlabels=c("HISPANIC", "NON-HISPANIC WHITE ONLY", "NON-HISPANIC BLACK ONLY", "NON-HISPANIC OTHER + MULTIPLE RACE") C5Rlevels=c(1,2,3,4,77,99) C5Rlabels=c("MOTHER (STEP, FOSTER, ADOPTIVE) OR FEMALE GUARDIAN", "FATHER (STEP, FOSTER, ADOPTIVE) OR MALE GUARDIAN", "GRANDPARENT", "OTHER FAMILY MEMBER/FRIEND", "DON'T KNOW", "REFUSED") INCQ298Alevels=c(10,11,12,13,14,3,4,5,6,7,77,8,9,99) INCQ298Alabels=c("$35001 - $40000", "$40001 - $50000", "$50001 - $60000", "$60001 - $75000", "$75001+", "$0 - $7500", "$7501 - $10000", "$10001 - $17500", "$17501 - $20000", "$20001 - $25000", "DON'T KNOW", "$25001 - $30000", "$30001 - $35000", "REFUSED") D6Rlevels=c(0,1,2,3) D6Rlabels=c("0", "1", "2", "3+") ESTIAPT09Flevels=c(1,10,11,12,13,14,16,17,18,19,2,20,22,25,27,28,29,30,31,34,35,36,37,38,4,40,41,44,46,47,49,5,50,51,52,53,54,55,56,57,58,59,6,60,61,62,63,64,65,66,68,69,7,72,73,74,75,76,77,8,95,96) ESTIAPT09Flabels=c("CT", "NY-REST OF STATE", "NY-CITY OF NEW YORK", "DC", "DE", "MD", "PA-REST OF STATE", "PA-PHILADELPHIA COUNTY", "VA", "WV", "MA", "AL", "FL", "GA", "KY", "MS", "NC", "SC", "TN", "IL-REST OF STATE", "IL-CITY OF CHICAGO", "IN-REST OF STATE", "IN-MARION COUNTY", "MI", "ME", "MN", "OH", "WI", "AR", "LA", "NM", "NH", "OK", "TX-REST OF STATE", "TX-DALLAS COUNTY", "TX-EL PASO COUNTY", "TX-CITY OF HOUSTON", "TX-BEXAR COUNTY", "IA", "KS", "MO", "NE", "RI", "CO", "MT", "ND", "SD", "UT", "WY", "AZ", "CA-REST OF STATE", "CA-LOS ANGELES COUNTY", "VT", "HI", "NV", "AK", "ID", "OR", "WA", "NJ", "U.S. VIRGIN ISLANDS", "IN-LAKE COUNTY") INS_STATlevels=c(1,2,3) INS_STATlabels=c("YES", "NO", "NOT ASCERTAINED") MAR_PUF2_levels=c(1,2) MAR_PUF2_labels=c("MARRIED", "NEVER MARRIED/WIDOWED/DIVORCED/SEPARATED/DECEASED") ############################################################################ # Step 3: READ THE FLAT DATA FILE # ############################################################################ LIST.NAMEWIDTH <- c("PDAT",1, "PROVWT",20, "PROVWTVI",20, "RDDWT",20, "RDDWTVI",20, "SEQNUMT",5, "YEAR",4, "ASTHMA",2, "CKUP_11_12",2, "CKUP_AGE",2, "CKUP_LAST",2, "CPOX_AGE",2, "CPOX_AGER",2, "CPOX_HAD",2, "HEPA_AGE_SC1",2, "HEPA_AGE_SC2",2, "HEPA_AGE_SC3",2, "HEPA_AGE_SC4",2, "HEPA_AGE_SC5",2, "HEPA_AGE_SC6",1, "HEPA_AGE_SC7",1, "HEPA_AGE_SC8",1, "HEPA_ANY_REC",2, "HEPA_ANY_SC",2, "HEPA_NUM_REC",2, "HEPA_NUM_SC",2, "HEPA_NUM_TOT",2, "HEPA_RECOM",2, "HEPB_AGE_SC1",2, "HEPB_AGE_SC2",2, "HEPB_AGE_SC3",2, "HEPB_AGE_SC4",2, "HEPB_AGE_SC5",2, "HEPB_AGE_SC6",2, "HEPB_AGE_SC7",2, "HEPB_AGE_SC8",1, "HEPB_ANY_REC",2, "HEPB_ANY_SC",2, "HEPB_NUM_REC",2, "HEPB_NUM_SC",2, "HEPB_NUM_TOT",2, "HEPB_SCH",2, "HPVI_AGE_SC1",2, "HPVI_AGE_SC2",2, "HPVI_AGE_SC3",2, "HPVI_AGE_SC4",2, "HPVI_AGE_SC5",1, "HPVI_AGE_SC6",1, "HPVI_AGE_SC7",1, "HPVI_AGE_SC8",1, "HPVI_ANY_REC",16, "HPVI_ANY_SC",2, "HPVI_HEARD",2, "HPVI_KNOW",2, "HPVI_NUM_REC",2, "HPVI_NUM_SC",2, "HPVI_NUM_TOT",2, "HPVI_REAS_1",2, "HPVI_REAS_10",2, "HPVI_REAS_11",2, "HPVI_REAS_12",2, "HPVI_REAS_13",2, "HPVI_REAS_14",2, "HPVI_REAS_15",2, "HPVI_REAS_16",2, "HPVI_REAS_17",2, "HPVI_REAS_18",2, "HPVI_REAS_19",2, "HPVI_REAS_2",2, "HPVI_REAS_20",2, "HPVI_REAS_21",2, "HPVI_REAS_22",2, "HPVI_REAS_23",2, "HPVI_REAS_24",2, "HPVI_REAS_25",2, "HPVI_REAS_26",2, "HPVI_REAS_27",2, "HPVI_REAS_28",2, "HPVI_REAS_3",2, "HPVI_REAS_5",2, "HPVI_REAS_6",2, "HPVI_REAS_9",2, "HPVI_RECOM",2, "IMM_ANY",2, "MCV_AGE_SC1",2, "MCV_AGE_SC2",2, "MCV_AGE_SC3",2, "MCV_AGE_SC4",2, "MCV_AGE_SC5",2, "MCV_AGE_SC6",2, "MCV_AGE_SC7",2, "MCV_AGE_SC8",2, "MCV_ANY_REC",2, "MCV_ANY_SC",2, "MCV_NUM_REC",2, "MCV_NUM_SC",2, "MCV_NUM_TOT",2, "MEN_AGE_SC1",2, "MEN_AGE_SC2",2, "MEN_AGE_SC3",2, "MEN_AGE_SC4",2, "MEN_AGE_SC5",2, "MEN_AGE_SC6",1, "MEN_AGE_SC7",1, "MEN_AGE_SC8",1, "MEN_ANY_REC",2, "MEN_ANY_SC",2, "MEN_NUM_REC",2, "MEN_NUM_SC",2, "MEN_NUM_TOT",2, "MEN_REAS_1",2, "MEN_REAS_10",2, "MEN_REAS_11",2, "MEN_REAS_12",2, "MEN_REAS_13",2, "MEN_REAS_14",2, "MEN_REAS_15",2, "MEN_REAS_16",2, "MEN_REAS_17",2, "MEN_REAS_18",2, "MEN_REAS_19",2, "MEN_REAS_2",2, "MEN_REAS_20",2, "MEN_REAS_21",2, "MEN_REAS_22",2, "MEN_REAS_23",2, "MEN_REAS_3",2, "MEN_REAS_4",2, "MEN_REAS_5",2, "MEN_REAS_6",2, "MEN_REAS_7",2, "MEN_RECOM",2, "NOSCHOOLR",2, "RISK_EVER",2, "RISK_HH",2, "RISK_NOW",2, "SHOTCARD",1, "SHOTCARD_ALL",2, "TET_AGE_SC1",2, "TET_AGE_SC2",2, "TET_AGE_SC3",2, "TET_AGE_SC4",2, "TET_AGE_SC5",2, "TET_AGE_SC6",2, "TET_AGE_SC7",2, "TET_AGE_SC8",2, "TET_ANY_REC",2, "TET_ANY_SC",2, "TET_LAST_AGE",2, "TET_LAST_TYPE",2, "TET_NUM_SC",2, "TET_PLACE_1",2, "TET_PLACE_2",2, "TET_PLACE_3",2, "TET_PLACE_4",2, "TET_PLACE_5",2, "TET_PLACE_6",2, "TET_PLACE_7",2, "TET_PLACE_8",2, "TET_PLACE_9",2, "TET_REAS_1",2, "TET_REAS_10",2, "TET_REAS_11",2, "TET_REAS_12",2, "TET_REAS_13",2, "TET_REAS_14",2, "TET_REAS_15",2, "TET_REAS_16",2, "TET_REAS_17",2, "TET_REAS_18",2, "TET_REAS_19",2, "TET_REAS_2",2, "TET_REAS_20",2, "TET_REAS_21",2, "TET_REAS_22",2, "TET_REAS_23",2, "TET_REAS_24",2, "TET_REAS_3",2, "TET_REAS_4",2, "TET_REAS_5",2, "TET_REAS_7",2, "TET_RECOM",2, "TET_TYPE1",2, "TET_TYPE2",2, "TET_TYPE3",2, "TET_TYPE4",2, "TET_TYPE5",2, "TET_TYPE6",2, "TET_TYPE7",2, "TET_TYPE8",2, "VISITS",2, "VRC_AGE_SC1",2, "VRC_AGE_SC2",2, "VRC_AGE_SC3",2, "VRC_AGE_SC4",2, "VRC_AGE_SC5",1, "VRC_AGE_SC6",1, "VRC_AGE_SC7",1, "VRC_AGE_SC8",1, "VRC_ANY_REC",2, "VRC_ANY_SC",2, "VRC_NUM_REC",2, "VRC_NUM_SC",2, "VRC_NUM_TOT",2, "AGE",2, "AGEGRP_M_I",1, "C1R",1, "C5R",2, "CEN_REG",1, "CHILDNM",1, "EDUC1",1, "EDUC_TR",2, "INCPORAR",16, "INCPOV1",1, "INCQ298A",2, "I_HISP_K",1, "LANGUAGE",1, "MARITAL2",1, "MOBIL_I",1, "NUM_CELLS_HH",2, "NUM_CELLS_PARENTS",2, "NUM_PHONE",2, "RACEETHK",1, "RACE_K",1, "RENT_OWN",2, "SEX",1, "ESTIAPT09",2, "STATE",2, "D6R",1, "D7",1, "NUM_PROVR",1, "N_PRVR",1, "FACILITY",1, "REGISTRY",1, "VFC_ORDER",1, "P_N13FLU",1, "P_N13FLU_FL",1, "P_N13FLU_FM",1, "P_N13FLU_FN",1, "P_N13FLU_FV",1, "P_N13FLU_FZ",1, "P_N13HEPA",1, "P_N13HEPA_HA",1, "P_N13HEPA_HO",1, "P_N13HEPB",1, "P_N13HEPB_43",1, "P_N13HEPB_61",1, "P_N13HEPB_62",1, "P_N13HEPB_63",1, "P_N13HEPB_64",1, "P_N13HEPB_HB",1, "P_N13HPV",1, "P_N13MCV",1, "P_N13MCV_30",1, "P_N13MCV_31",1, "P_N13MCV_32",1, "P_N13MCV_33",1, "P_N13MCV_MM",1, "P_N13MCV_VM",1, "P_N13MEN",1, "P_N13MEN_80",1, "P_N13MEN_81",1, "P_N13MEN_82",1, "P_N13MMR",1, "P_N13PPS",1, "P_N13TDAP_POST10",1, "P_N13TDP",1, "P_N13TDP_11",1, "P_N13TDP_14",1, "P_N13TDP_15",1, "P_N13TDP_POST10",1, "P_N13VRC",1, "P_N13VRC_POST1",1, "P_N13VRC_VA",1, "P_N13VRC_VM",1, "P_N13VRC_VO",1, "P_NUMFLU",1, "P_NUMFLU_FL",1, "P_NUMFLU_FM",1, "P_NUMFLU_FN",1, "P_NUMFLU_FV",1, "P_NUMFLU_FZ",1, "P_NUMHEPA",1, "P_NUMHEPA_HA",1, "P_NUMHEPA_HO",1, "P_NUMHEPB",1, "P_NUMHEPB_43",1, "P_NUMHEPB_61",1, "P_NUMHEPB_62",1, "P_NUMHEPB_63",1, "P_NUMHEPB_64",1, "P_NUMHEPB_HB",1, "P_NUMHPV",1, "P_NUMMCV",1, "P_NUMMCV_30",1, "P_NUMMCV_31",1, "P_NUMMCV_32",1, "P_NUMMCV_33",1, "P_NUMMCV_MM",1, "P_NUMMCV_VM",1, "P_NUMMEN",1, "P_NUMMEN_80",1, "P_NUMMEN_81",1, "P_NUMMEN_82",1, "P_NUMMMR",1, "P_NUMPPS",1, "P_NUMTDAP_POST10",1, "P_NUMTDP",1, "P_NUMTDP_11",1, "P_NUMTDP_14",1, "P_NUMTDP_15",1, "P_NUMTDP_POST10",1, "P_NUMVRC",1, "P_NUMVRC_POST1",1, "P_NUMVRC_VA",1, "P_NUMVRC_VM",1, "P_NUMVRC_VO",1, "P_U131321",1, "P_U1313212",1, "P_U13FLU0708",1, "P_U13FLU0809",1, "P_U13FLU0910",1, "P_U13HEPA",1, "P_U13HEPB",1, "P_U13HPV",1, "P_U13MCV",1, "P_U13MEN",1, "P_U13MMR",1, "P_U13PPS",1, "P_U13TD",1, "P_U13TDAP",1, "P_U13VRC",1, "P_U13VRC2",1, "P_UTD1321",1, "P_UTD13212",1, "P_UTDFLU0708",1, "P_UTDFLU0809",1, "P_UTDFLU0910",1, "P_UTDHEPA",1, "P_UTDHEPB",1, "P_UTDHPV",1, "P_UTDMCV",1, "P_UTDMEN",1, "P_UTDMMR",1, "P_UTDPPS",1, "P_UTDTD",1, "P_UTDTDAP",1, "P_UTDVRC",1, "P_UTDVRC2",1, "VRC_HIST",1, "FLU_AGE1",2, "FLU_AGE2",2, "FLU_AGE3",2, "FLU_AGE4",2, "FLU_AGE5",1, "FLU_AGE6",1, "FLU_AGE7",1, "FLU_AGE8",1, "FLU_AGE9",1, "FLU_MONTH1",2, "FLU_MONTH2",2, "FLU_MONTH3",2, "FLU_MONTH4",2, "FLU_MONTH5",1, "FLU_MONTH6",1, "FLU_MONTH7",1, "FLU_MONTH8",1, "FLU_MONTH9",1, "FLU_YEAR1",4, "FLU_YEAR2",4, "FLU_YEAR3",4, "FLU_YEAR4",4, "FLU_YEAR5",1, "FLU_YEAR6",1, "FLU_YEAR7",1, "FLU_YEAR8",1, "FLU_YEAR9",1, "HEPA_AGE1",2, "HEPA_AGE2",2, "HEPA_AGE3",2, "HEPA_AGE4",2, "HEPA_AGE5",1, "HEPA_AGE6",1, "HEPA_AGE7",1, "HEPA_AGE8",1, "HEPA_AGE9",1, "HEPB_AGE1",2, "HEPB_AGE2",2, "HEPB_AGE3",2, "HEPB_AGE4",2, "HEPB_AGE5",2, "HEPB_AGE6",2, "HEPB_AGE7",2, "HEPB_AGE8",2, "HEPB_AGE9",1, "HPV_AGE1",2, "HPV_AGE2",2, "HPV_AGE3",2, "HPV_AGE4",2, "HPV_AGE5",2, "HPV_AGE6",1, "HPV_AGE7",1, "HPV_AGE8",1, "HPV_AGE9",1, "MCV_AGE1",2, "MCV_AGE2",2, "MCV_AGE3",2, "MCV_AGE4",2, "MCV_AGE5",1, "MCV_AGE6",1, "MCV_AGE7",1, "MCV_AGE8",1, "MCV_AGE9",1, "MEN_AGE1",2, "MEN_AGE2",2, "MEN_AGE3",2, "MEN_AGE4",1, "MEN_AGE5",1, "MEN_AGE6",1, "MEN_AGE7",1, "MEN_AGE8",1, "MEN_AGE9",1, "PPS_AGE1",2, "PPS_AGE2",2, "PPS_AGE3",1, "PPS_AGE4",1, "PPS_AGE5",1, "PPS_AGE6",1, "PPS_AGE7",1, "PPS_AGE8",1, "PPS_AGE9",1, "TDP_AGE1",2, "TDP_AGE2",2, "TDP_AGE3",2, "TDP_AGE4",2, "TDP_AGE5",2, "TDP_AGE6",2, "TDP_AGE7",1, "TDP_AGE8",1, "TDP_AGE9",1, "VRC_AGE1",2, "VRC_AGE2",2, "VRC_AGE3",2, "VRC_AGE4",2, "VRC_AGE5",2, "VRC_AGE6",1, "VRC_AGE7",1, "VRC_AGE8",1, "VRC_AGE9",1, "XFLUTY1",2, "XFLUTY2",2, "XFLUTY3",2, "XFLUTY4",2, "XFLUTY5",1, "XFLUTY6",1, "XFLUTY7",1, "XFLUTY8",1, "XFLUTY9",1, "XHEPATY1",2, "XHEPATY2",2, "XHEPATY3",2, "XHEPATY4",2, "XHEPATY5",1, "XHEPATY6",1, "XHEPATY7",1, "XHEPATY8",1, "XHEPATY9",1, "XHEPBTY1",2, "XHEPBTY2",2, "XHEPBTY3",2, "XHEPBTY4",2, "XHEPBTY5",2, "XHEPBTY6",2, "XHEPBTY7",2, "XHEPBTY8",2, "XHEPBTY9",1, "XMCVTY1",2, "XMCVTY2",2, "XMCVTY3",2, "XMCVTY4",2, "XMCVTY5",2, "XMCVTY6",1, "XMCVTY7",1, "XMCVTY8",1, "XMCVTY9",1, "XMENTY1",2, "XMENTY2",2, "XMENTY3",2, "XMENTY4",2, "XMENTY5",1, "XMENTY6",1, "XMENTY7",1, "XMENTY8",1, "XMENTY9",1, "XTDPTY1",2, "XTDPTY2",2, "XTDPTY3",2, "XTDPTY4",2, "XTDPTY5",2, "XTDPTY6",2, "XTDPTY7",1, "XTDPTY8",1, "XTDPTY9",1, "XVRCTY1",2, "XVRCTY2",2, "XVRCTY3",2, "XVRCTY4",2, "XVRCTY5",2, "XVRCTY6",1, "XVRCTY7",1, "XVRCTY8",1, "XVRCTY9",1, "TIS_INS_1",2, "TIS_INS_11",2, "TIS_INS_2",2, "TIS_INS_3",2, "TIS_INS_3A",2, "TIS_INS_4_5",2, "TIS_INS_6",2, "VFC_I",1 ) NAMEWIDTH <- matrix(LIST.NAMEWIDTH, 520, 2, byrow=T, dimnames = list(NULL, c("VARIABLE","WIDTH"))) NA_STRING <- c(" ", ".", " .", " .", " .", " . ", " . ", " . ", " . ", " . ") NISTEENPUF09 <- read.fwf(flatfile, widths= as.numeric(NAMEWIDTH[,2]), col.names = NAMEWIDTH[,1], na.strings= NA_STRING, as.is=TRUE) NISTEENPUF09$SEQNUMT <- as.character(NISTEENPUF09$SEQNUMT) NISTEENPUF09$XFLUTY1 <- as.character(NISTEENPUF09$XFLUTY1) NISTEENPUF09$XFLUTY2 <- as.character(NISTEENPUF09$XFLUTY2) NISTEENPUF09$XFLUTY3 <- as.character(NISTEENPUF09$XFLUTY3) NISTEENPUF09$XFLUTY4 <- as.character(NISTEENPUF09$XFLUTY4) NISTEENPUF09$XFLUTY5 <- as.character(NISTEENPUF09$XFLUTY5) NISTEENPUF09$XFLUTY6 <- as.character(NISTEENPUF09$XFLUTY6) NISTEENPUF09$XFLUTY7 <- as.character(NISTEENPUF09$XFLUTY7) NISTEENPUF09$XFLUTY8 <- as.character(NISTEENPUF09$XFLUTY8) NISTEENPUF09$XFLUTY9 <- as.character(NISTEENPUF09$XFLUTY9) NISTEENPUF09$XHEPATY1 <- as.character(NISTEENPUF09$XHEPATY1) NISTEENPUF09$XHEPATY2 <- as.character(NISTEENPUF09$XHEPATY2) NISTEENPUF09$XHEPATY3 <- as.character(NISTEENPUF09$XHEPATY3) NISTEENPUF09$XHEPATY4 <- as.character(NISTEENPUF09$XHEPATY4) NISTEENPUF09$XHEPATY5 <- as.character(NISTEENPUF09$XHEPATY5) NISTEENPUF09$XHEPATY6 <- as.character(NISTEENPUF09$XHEPATY6) NISTEENPUF09$XHEPATY7 <- as.character(NISTEENPUF09$XHEPATY7) NISTEENPUF09$XHEPATY8 <- as.character(NISTEENPUF09$XHEPATY8) NISTEENPUF09$XHEPATY9 <- as.character(NISTEENPUF09$XHEPATY9) NISTEENPUF09$XHEPBTY1 <- as.character(NISTEENPUF09$XHEPBTY1) NISTEENPUF09$XHEPBTY2 <- as.character(NISTEENPUF09$XHEPBTY2) NISTEENPUF09$XHEPBTY3 <- as.character(NISTEENPUF09$XHEPBTY3) NISTEENPUF09$XHEPBTY4 <- as.character(NISTEENPUF09$XHEPBTY4) NISTEENPUF09$XHEPBTY5 <- as.character(NISTEENPUF09$XHEPBTY5) NISTEENPUF09$XHEPBTY6 <- as.character(NISTEENPUF09$XHEPBTY6) NISTEENPUF09$XHEPBTY7 <- as.character(NISTEENPUF09$XHEPBTY7) NISTEENPUF09$XHEPBTY8 <- as.character(NISTEENPUF09$XHEPBTY8) NISTEENPUF09$XHEPBTY9 <- as.character(NISTEENPUF09$XHEPBTY9) NISTEENPUF09$XMCVTY1 <- as.character(NISTEENPUF09$XMCVTY1) NISTEENPUF09$XMCVTY2 <- as.character(NISTEENPUF09$XMCVTY2) NISTEENPUF09$XMCVTY3 <- as.character(NISTEENPUF09$XMCVTY3) NISTEENPUF09$XMCVTY4 <- as.character(NISTEENPUF09$XMCVTY4) NISTEENPUF09$XMCVTY5 <- as.character(NISTEENPUF09$XMCVTY5) NISTEENPUF09$XMCVTY6 <- as.character(NISTEENPUF09$XMCVTY6) NISTEENPUF09$XMCVTY7 <- as.character(NISTEENPUF09$XMCVTY7) NISTEENPUF09$XMCVTY8 <- as.character(NISTEENPUF09$XMCVTY8) NISTEENPUF09$XMCVTY9 <- as.character(NISTEENPUF09$XMCVTY9) NISTEENPUF09$XMENTY1 <- as.character(NISTEENPUF09$XMENTY1) NISTEENPUF09$XMENTY2 <- as.character(NISTEENPUF09$XMENTY2) NISTEENPUF09$XMENTY3 <- as.character(NISTEENPUF09$XMENTY3) NISTEENPUF09$XMENTY4 <- as.character(NISTEENPUF09$XMENTY4) NISTEENPUF09$XMENTY5 <- as.character(NISTEENPUF09$XMENTY5) NISTEENPUF09$XMENTY6 <- as.character(NISTEENPUF09$XMENTY6) NISTEENPUF09$XMENTY7 <- as.character(NISTEENPUF09$XMENTY7) NISTEENPUF09$XMENTY8 <- as.character(NISTEENPUF09$XMENTY8) NISTEENPUF09$XMENTY9 <- as.character(NISTEENPUF09$XMENTY9) NISTEENPUF09$XTDPTY1 <- as.character(NISTEENPUF09$XTDPTY1) NISTEENPUF09$XTDPTY2 <- as.character(NISTEENPUF09$XTDPTY2) NISTEENPUF09$XTDPTY3 <- as.character(NISTEENPUF09$XTDPTY3) NISTEENPUF09$XTDPTY4 <- as.character(NISTEENPUF09$XTDPTY4) NISTEENPUF09$XTDPTY5 <- as.character(NISTEENPUF09$XTDPTY5) NISTEENPUF09$XTDPTY6 <- as.character(NISTEENPUF09$XTDPTY6) NISTEENPUF09$XTDPTY7 <- as.character(NISTEENPUF09$XTDPTY7) NISTEENPUF09$XTDPTY8 <- as.character(NISTEENPUF09$XTDPTY8) NISTEENPUF09$XTDPTY9 <- as.character(NISTEENPUF09$XTDPTY9) NISTEENPUF09$XVRCTY1 <- as.character(NISTEENPUF09$XVRCTY1) NISTEENPUF09$XVRCTY2 <- as.character(NISTEENPUF09$XVRCTY2) NISTEENPUF09$XVRCTY3 <- as.character(NISTEENPUF09$XVRCTY3) NISTEENPUF09$XVRCTY4 <- as.character(NISTEENPUF09$XVRCTY4) NISTEENPUF09$XVRCTY5 <- as.character(NISTEENPUF09$XVRCTY5) NISTEENPUF09$XVRCTY6 <- as.character(NISTEENPUF09$XVRCTY6) NISTEENPUF09$XVRCTY7 <- as.character(NISTEENPUF09$XVRCTY7) NISTEENPUF09$XVRCTY8 <- as.character(NISTEENPUF09$XVRCTY8) NISTEENPUF09$XVRCTY9 <- as.character(NISTEENPUF09$XVRCTY9) ############################################################################ # Step 4: ASSIGN VARIABLE LABELS # ############################################################################ label(NISTEENPUF09$PDAT) <- "ADEQUATE PROVIDER DATA FLAG" label(NISTEENPUF09$PROVWT) <- "FINAL PROVIDER-PHASE WEIGHT (EXCLUDING U.S. VIRGIN ISLANDS)" label(NISTEENPUF09$PROVWTVI) <- "FINAL PROVIDER-PHASE WEIGHT (INCLUDING U.S. VIRGIN ISLANDS)" label(NISTEENPUF09$RDDWT) <- "FINAL RDD-PHASE WEIGHT (EXCLUDING U.S. VIRGIN ISLANDS)" label(NISTEENPUF09$RDDWTVI) <- "FINAL RDD-PHASE WEIGHT (INCLUDING U.S. VIRGIN ISLANDS)" label(NISTEENPUF09$SEQNUMT) <- "UNIQUE TEEN IDENTIFIER" label(NISTEENPUF09$YEAR) <- "SAMPLING YEAR" label(NISTEENPUF09$ASTHMA) <- "HAS TEEN BEEN TOLD BY DOCTOR OR OTHER HEALTH PROFESSIONAL THAT HE/SHE HAS ASTHMA?" label(NISTEENPUF09$CKUP_11_12) <- "DID TEEN HAVE AN 11-12 YEAR OLD WELL-CHILD EXAM OR CHECK-UP?" label(NISTEENPUF09$CKUP_AGE) <- "AGE IN YEARS AT LAST CHECK-UP" label(NISTEENPUF09$CKUP_LAST) <- "WAS TEEN'S LAST CHECK-UP MORE OR LESS THAN (AGE - 12) YEARS AGO?" label(NISTEENPUF09$CPOX_AGE) <- "AGE IN YEARS WHEN HAD CHICKEN POX DISEASE" label(NISTEENPUF09$CPOX_AGER) <- "AGE RANGE WHEN HAD CHICKEN POX DISEASE" label(NISTEENPUF09$CPOX_HAD) <- "TEEN EVER HAD CHICKEN POX DISEASE?" label(NISTEENPUF09$HEPA_AGE_SC1) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS A SHOT #1 (SHOTCARD)" label(NISTEENPUF09$HEPA_AGE_SC2) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS A SHOT #2 (SHOTCARD)" label(NISTEENPUF09$HEPA_AGE_SC3) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS A SHOT #3 (SHOTCARD)" label(NISTEENPUF09$HEPA_AGE_SC4) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS A SHOT #4 (SHOTCARD)" label(NISTEENPUF09$HEPA_AGE_SC5) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS A SHOT #5 (SHOTCARD)" label(NISTEENPUF09$HEPA_AGE_SC6) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS A SHOT #6 (SHOTCARD)" label(NISTEENPUF09$HEPA_AGE_SC7) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS A SHOT #7 (SHOTCARD)" label(NISTEENPUF09$HEPA_AGE_SC8) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS A SHOT #8 (SHOTCARD)" label(NISTEENPUF09$HEPA_ANY_REC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY HEPATITIS A SHOTS? (RECALL)" label(NISTEENPUF09$HEPA_ANY_SC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY HEPATITIS A SHOTS? (SHOTCARD)" label(NISTEENPUF09$HEPA_NUM_REC) <- "NUMBER OF HH-REPORTED HEPATITIS A SHOTS RECEIVED (RECALL)" label(NISTEENPUF09$HEPA_NUM_SC) <- "NUMBER OF HH-REPORTED HEPATITIS A SHOTS RECEIVED (SHOTCARD)" label(NISTEENPUF09$HEPA_NUM_TOT) <- "NUMBER OF HH-REPORTED HEPATITIS A SHOTS RECEIVED (TOTAL)" label(NISTEENPUF09$HEPA_RECOM) <- "HAD OR HAS DOCTOR OR OTHER HEALTH CARE PROFESSIONAL EVER RECOMMENDED HEPATITIS A SHOTS?" label(NISTEENPUF09$HEPB_AGE_SC1) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS B SHOT #1 (SHOTCARD)" label(NISTEENPUF09$HEPB_AGE_SC2) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS B SHOT #2 (SHOTCARD)" label(NISTEENPUF09$HEPB_AGE_SC3) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS B SHOT #3 (SHOTCARD)" label(NISTEENPUF09$HEPB_AGE_SC4) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS B SHOT #4 (SHOTCARD)" label(NISTEENPUF09$HEPB_AGE_SC5) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS B SHOT #5 (SHOTCARD)" label(NISTEENPUF09$HEPB_AGE_SC6) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS B SHOT #6 (SHOTCARD)" label(NISTEENPUF09$HEPB_AGE_SC7) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS B SHOT #7 (SHOTCARD)" label(NISTEENPUF09$HEPB_AGE_SC8) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HEPATITIS B SHOT #8 (SHOTCARD)" label(NISTEENPUF09$HEPB_ANY_REC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY HEPATITIS B SHOTS? (RECALL)" label(NISTEENPUF09$HEPB_ANY_SC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY HEPATITIS B SHOTS? (SHOTCARD)" label(NISTEENPUF09$HEPB_NUM_REC) <- "NUMBER OF HH-REPORTED HEPATITIS B SHOTS RECEIVED (RECALL)" label(NISTEENPUF09$HEPB_NUM_SC) <- "NUMBER OF HH-REPORTED HEPATITIS B SHOTS RECEIVED (SHOTCARD)" label(NISTEENPUF09$HEPB_NUM_TOT) <- "NUMBER OF HH-REPORTED HEPATITIS B SHOTS RECEIVED (TOTAL)" label(NISTEENPUF09$HEPB_SCH) <- "DID TEEN RECEIVE HEPATITIS B SHOTS BECAUSE OF SCHOOL REQUIREMENT?" label(NISTEENPUF09$HPVI_AGE_SC1) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HUMAN PAPILLOMAVIRUS SHOT #1 (SHOTCARD)" label(NISTEENPUF09$HPVI_AGE_SC2) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HUMAN PAPILLOMAVIRUS SHOT #2 (SHOTCARD)" label(NISTEENPUF09$HPVI_AGE_SC3) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HUMAN PAPILLOMAVIRUS SHOT #3 (SHOTCARD)" label(NISTEENPUF09$HPVI_AGE_SC4) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HUMAN PAPILLOMAVIRUS SHOT #4 (SHOTCARD)" label(NISTEENPUF09$HPVI_AGE_SC5) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HUMAN PAPILLOMAVIRUS SHOT #5 (SHOTCARD)" label(NISTEENPUF09$HPVI_AGE_SC6) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HUMAN PAPILLOMAVIRUS SHOT #6 (SHOTCARD)" label(NISTEENPUF09$HPVI_AGE_SC7) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HUMAN PAPILLOMAVIRUS SHOT #7 (SHOTCARD)" label(NISTEENPUF09$HPVI_AGE_SC8) <- "AGE OF TEEN IN YEARS AT HH-REPORTED HUMAN PAPILLOMAVIRUS SHOT #8 (SHOTCARD)" label(NISTEENPUF09$HPVI_ANY_REC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY HUMAN PAPILLOMAVIRUS SHOTS? (RECALL)" label(NISTEENPUF09$HPVI_ANY_SC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY HUMAN PAPILLOMAVIRUS SHOTS? (SHOTCARD)" label(NISTEENPUF09$HPVI_HEARD) <- "HAVE YOU EVER HEARD OF HUMAN PAPILLOMAVIRUS?" label(NISTEENPUF09$HPVI_KNOW) <- "HAVE YOU EVER HEARD OF THE CERVICAL CANCER VACCINE, HPV SHOT, OR GARDASIL?" label(NISTEENPUF09$HPVI_NUM_REC) <- "NUMBER OF HH-REPORTED HUMAN PAPILLOMAVIRUS SHOTS RECEIVED (RECALL)" label(NISTEENPUF09$HPVI_NUM_SC) <- "NUMBER OF HH-REPORTED HUMAN PAPILLOMAVIRUS SHOTS RECEIVED (SHOTCARD)" label(NISTEENPUF09$HPVI_NUM_TOT) <- "NUMBER OF HH-REPORTED HUMAN PAPILLOMAVIRUS SHOTS RECEIVED (TOTAL)" label(NISTEENPUF09$HPVI_REAS_1) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: NOT RECOMMENDED" label(NISTEENPUF09$HPVI_REAS_10) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: COSTS" label(NISTEENPUF09$HPVI_REAS_11) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: SAFETY CONCERN/SIDE EFFECTS" label(NISTEENPUF09$HPVI_REAS_12) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: EFFECTIVENESS CONCERN" label(NISTEENPUF09$HPVI_REAS_13) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: CHILD FEARFUL" label(NISTEENPUF09$HPVI_REAS_14) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: CHILD SHOULD MAKE DECISION" label(NISTEENPUF09$HPVI_REAS_15) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: COLLEGE SHOT" label(NISTEENPUF09$HPVI_REAS_16) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: DON'T BELIEVE IN VACCINATIONS" label(NISTEENPUF09$HPVI_REAS_17) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: FAMILY/PARENTAL DECISION" label(NISTEENPUF09$HPVI_REAS_18) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: HANDICAPPED/SPECIAL NEEDS/ILLNESS" label(NISTEENPUF09$HPVI_REAS_19) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: RELIGION/ORTHODOX" label(NISTEENPUF09$HPVI_REAS_2) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: NOT NEEDED OR NOT NECESSARY" label(NISTEENPUF09$HPVI_REAS_20) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: TIME" label(NISTEENPUF09$HPVI_REAS_21) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: MORE INFO/NEW VACCINE" label(NISTEENPUF09$HPVI_REAS_22) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: ALREADY UP-TO-DATE" label(NISTEENPUF09$HPVI_REAS_23) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: NOT AVAILABLE" label(NISTEENPUF09$HPVI_REAS_24) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: NOT A SCHOOL REQUIREMENT" label(NISTEENPUF09$HPVI_REAS_25) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: INCREASED SEXUAL ACTIVITY CONCERN" label(NISTEENPUF09$HPVI_REAS_26) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: NO OB/GYN" label(NISTEENPUF09$HPVI_REAS_27) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: ALREADY SEXUALLY ACTIVE" label(NISTEENPUF09$HPVI_REAS_28) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: NO DOCTOR OR DOCTOR'S VISIT NOT SCHEDULED" label(NISTEENPUF09$HPVI_REAS_3) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: LACK OF KNOWLEDGE" label(NISTEENPUF09$HPVI_REAS_5) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: NOT SEXUALLY ACTIVE" label(NISTEENPUF09$HPVI_REAS_6) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: NOT APPROPRIATE AGE" label(NISTEENPUF09$HPVI_REAS_9) <- "MAIN REASON TEEN WILL NOT RECEIVE HUMAN PAPILLOMAVIRUS SHOTS IN THE NEXT 12 MONTHS: OTHER REASON" label(NISTEENPUF09$HPVI_RECOM) <- "HAD OR HAS DOCTOR OR OTHER HEALTH CARE PROFESSIONAL EVER RECOMMENDED THAT TEEN RECEIVE HPV SHOTS?" label(NISTEENPUF09$IMM_ANY) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY VACCINATIONS?" label(NISTEENPUF09$MCV_AGE_SC1) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MEASLES OR MMR SHOT #1 (SHOTCARD)" label(NISTEENPUF09$MCV_AGE_SC2) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MEASLES OR MMR SHOT #2 (SHOTCARD)" label(NISTEENPUF09$MCV_AGE_SC3) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MEASLES OR MMR SHOT #3 (SHOTCARD)" label(NISTEENPUF09$MCV_AGE_SC4) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MEASLES OR MMR SHOT #4 (SHOTCARD)" label(NISTEENPUF09$MCV_AGE_SC5) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MEASLES OR MMR SHOT #5 (SHOTCARD)" label(NISTEENPUF09$MCV_AGE_SC6) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MEASLES OR MMR SHOT #6 (SHOTCARD)" label(NISTEENPUF09$MCV_AGE_SC7) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MEASLES OR MMR SHOT #7 (SHOTCARD)" label(NISTEENPUF09$MCV_AGE_SC8) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MEASLES OR MMR SHOT #8 (SHOTCARD)" label(NISTEENPUF09$MCV_ANY_REC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY MMR/MEASLES SHOTS? (RECALL)" label(NISTEENPUF09$MCV_ANY_SC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY MMR/MEASLES SHOTS? (SHOTCARD)" label(NISTEENPUF09$MCV_NUM_REC) <- "NUMBER OF HH-REPORTED MMR/MEASLES SHOTS RECEIVED (RECALL)" label(NISTEENPUF09$MCV_NUM_SC) <- "NUMBER OF HH-REPORTED MMR/MEASLES SHOTS RECEIVED (SHOTCARD)" label(NISTEENPUF09$MCV_NUM_TOT) <- "NUMBER OF HH-REPORTED MMR/MEASLES SHOTS RECEIVED (TOTAL)" label(NISTEENPUF09$MEN_AGE_SC1) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MENINGOCOCCAL SHOT #1 (SHOTCARD)" label(NISTEENPUF09$MEN_AGE_SC2) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MENINGOCOCCAL SHOT #2 (SHOTCARD)" label(NISTEENPUF09$MEN_AGE_SC3) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MENINGOCOCCAL SHOT #3 (SHOTCARD)" label(NISTEENPUF09$MEN_AGE_SC4) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MENINGOCOCCAL SHOT #4 (SHOTCARD)" label(NISTEENPUF09$MEN_AGE_SC5) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MENINGOCOCCAL SHOT #5 (SHOTCARD)" label(NISTEENPUF09$MEN_AGE_SC6) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MENINGOCOCCAL SHOT #6 (SHOTCARD)" label(NISTEENPUF09$MEN_AGE_SC7) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MENINGOCOCCAL SHOT #7 (SHOTCARD)" label(NISTEENPUF09$MEN_AGE_SC8) <- "AGE OF TEEN IN YEARS AT HH-REPORTED MENINGOCOCCAL SHOT #8 (SHOTCARD)" label(NISTEENPUF09$MEN_ANY_REC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY MENINGITIS SHOTS? (RECALL)" label(NISTEENPUF09$MEN_ANY_SC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY MENINGITIS SHOTS? (SHOTCARD)" label(NISTEENPUF09$MEN_NUM_REC) <- "NUMBER OF HH-REPORTED MENINGITIS SHOTS RECEIVED (RECALL)" label(NISTEENPUF09$MEN_NUM_SC) <- "NUMBER OF HH-REPORTED MENINGITIS SHOTS RECEIVED (SHOTCARD)" label(NISTEENPUF09$MEN_NUM_TOT) <- "NUMBER OF HH-REPORTED MENINGITIS SHOTS RECEIVED (TOTAL)" label(NISTEENPUF09$MEN_REAS_1) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: NOT RECOMMENDED" label(NISTEENPUF09$MEN_REAS_10) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: COSTS" label(NISTEENPUF09$MEN_REAS_11) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: SAFETY CONCERN/SIDE EFFECTS" label(NISTEENPUF09$MEN_REAS_12) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: EFFECTIVENESS CONCERN" label(NISTEENPUF09$MEN_REAS_13) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: CHILD FEARFUL" label(NISTEENPUF09$MEN_REAS_14) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: CHILD SHOULD MAKE DECISION" label(NISTEENPUF09$MEN_REAS_15) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: COLLEGE SHOT" label(NISTEENPUF09$MEN_REAS_16) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: DON'T BELIEVE IN VACCINATIONS" label(NISTEENPUF09$MEN_REAS_17) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: FAMILY/PARENTAL DECISION" label(NISTEENPUF09$MEN_REAS_18) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: HANDICAPPED/SPECIAL NEEDS/ILLNESS" label(NISTEENPUF09$MEN_REAS_19) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: RELIGION/ORTHODOX" label(NISTEENPUF09$MEN_REAS_2) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: LACK OF KNOWLEDGE" label(NISTEENPUF09$MEN_REAS_20) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: TIME" label(NISTEENPUF09$MEN_REAS_21) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: MORE INFO/NEW VACCINE" label(NISTEENPUF09$MEN_REAS_22) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: ALREADY UP-TO-DATE" label(NISTEENPUF09$MEN_REAS_23) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: NO DOCTOR OR DOCTOR'S VISIT NOT SCHEDULED" label(NISTEENPUF09$MEN_REAS_3) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: NOT NEEDED OR NOT NECESSARY" label(NISTEENPUF09$MEN_REAS_4) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: NOT SCHOOL REQUIREMENT" label(NISTEENPUF09$MEN_REAS_5) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: NOT AVAILABLE" label(NISTEENPUF09$MEN_REAS_6) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: NOT APPROPRIATE AGE" label(NISTEENPUF09$MEN_REAS_7) <- "MAIN REASON TEEN DID NOT RECEIVE MENINGITIS SHOTS: OTHER REASON" label(NISTEENPUF09$MEN_RECOM) <- "HAD OR HAS DOCTOR OR OTHER HEALTH CARE PROFESSIONAL EVER RECOMMENDED THAT TEEN RECEIVE MENINGITIS SHOTS?" label(NISTEENPUF09$NOSCHOOLR) <- "DURING PAST 12 MONTHS, ABOUT HOW MANY DAYS DID TEEN MISS SCHOOL BECAUSE OF ILLNESS OR INJURY? (RECODE)" label(NISTEENPUF09$RISK_EVER) <- "HAS DOCTOR, NURSE, OR OTHER HEALTH CARE PROFESSIONAL EVER SAID THAT TEEN HAS HAD ANY OF THE FOLLOWING HEALTH CONDITIONS?" label(NISTEENPUF09$RISK_HH) <- "DO ANY OTHER MEMBERS OF TEEN'S HOUSEHOLD HAVE ANY OF THE FOLLOWING HEALTH CONDITIONS?" label(NISTEENPUF09$RISK_NOW) <- "DOES TEEN STILL HAVE ANY OF THESE CONDITIONS?" label(NISTEENPUF09$SHOTCARD) <- "SHOT CARD FLAG" label(NISTEENPUF09$SHOTCARD_ALL) <- "HH-REPORT: DOES SHOT RECORD INCLUDE ALL VACCINATIONS?" label(NISTEENPUF09$TET_AGE_SC1) <- "AGE OF TEEN IN YEARS AT HH-REPORTED TETANUS BOOSTER SHOT #1 (SHOTCARD)" label(NISTEENPUF09$TET_AGE_SC2) <- "AGE OF TEEN IN YEARS AT HH-REPORTED TETANUS BOOSTER SHOT #2 (SHOTCARD)" label(NISTEENPUF09$TET_AGE_SC3) <- "AGE OF TEEN IN YEARS AT HH-REPORTED TETANUS BOOSTER SHOT #3 (SHOTCARD)" label(NISTEENPUF09$TET_AGE_SC4) <- "AGE OF TEEN IN YEARS AT HH-REPORTED TETANUS BOOSTER SHOT #4 (SHOTCARD)" label(NISTEENPUF09$TET_AGE_SC5) <- "AGE OF TEEN IN YEARS AT HH-REPORTED TETANUS BOOSTER SHOT #5 (SHOTCARD)" label(NISTEENPUF09$TET_AGE_SC6) <- "AGE OF TEEN IN YEARS AT HH-REPORTED TETANUS BOOSTER SHOT #6 (SHOTCARD)" label(NISTEENPUF09$TET_AGE_SC7) <- "AGE OF TEEN IN YEARS AT HH-REPORTED TETANUS BOOSTER SHOT #7 (SHOTCARD)" label(NISTEENPUF09$TET_AGE_SC8) <- "AGE OF TEEN IN YEARS AT HH-REPORTED TETANUS BOOSTER SHOT #8 (SHOTCARD)" label(NISTEENPUF09$TET_ANY_REC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY TETANUS BOOSTER SHOTS? (RECALL)" label(NISTEENPUF09$TET_ANY_SC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY TETANUS BOOSTER SHOTS? (SHOTCARD)" label(NISTEENPUF09$TET_LAST_AGE) <- "AGE IN YEARS AT LAST TETANUS BOOSTER SHOT (RECALL)" label(NISTEENPUF09$TET_LAST_TYPE) <- "TYPE OF LAST TETANUS BOOSTER SHOT (RECALL)" label(NISTEENPUF09$TET_NUM_SC) <- "NUMBER OF HH-REPORTED TETANUS BOOSTER SHOTS RECEIVED (SHOTCARD)" label(NISTEENPUF09$TET_PLACE_1) <- "KIND OF PLACE TEEN RECEIVED TETANUS BOOSTER SHOT AFTER AGE 7 YEARS: DOCTOR'S OFFICE" label(NISTEENPUF09$TET_PLACE_2) <- "KIND OF PLACE TEEN RECEIVED TETANUS BOOSTER SHOT AFTER AGE 7 YEARS: EMERGENCY ROOM" label(NISTEENPUF09$TET_PLACE_3) <- "KIND OF PLACE TEEN RECEIVED TETANUS BOOSTER SHOT AFTER AGE 7 YEARS: HEALTH DEPARTMENT" label(NISTEENPUF09$TET_PLACE_4) <- "KIND OF PLACE TEEN RECEIVED TETANUS BOOSTER SHOT AFTER AGE 7 YEARS: CLINIC OR HEALTH CENTER" label(NISTEENPUF09$TET_PLACE_5) <- "KIND OF PLACE TEEN RECEIVED TETANUS BOOSTER SHOT AFTER AGE 7 YEARS: HOSPITAL" label(NISTEENPUF09$TET_PLACE_6) <- "KIND OF PLACE TEEN RECEIVED TETANUS BOOSTER SHOT AFTER AGE 7 YEARS: OTHER MEDICALLY-RELATED PLACE" label(NISTEENPUF09$TET_PLACE_7) <- "KIND OF PLACE TEEN RECEIVED TETANUS BOOSTER SHOT AFTER AGE 7 YEARS: PHARMACY OR DRUG STORE" label(NISTEENPUF09$TET_PLACE_8) <- "KIND OF PLACE TEEN RECEIVED TETANUS BOOSTER SHOT AFTER AGE 7 YEARS: WORKPLACE" label(NISTEENPUF09$TET_PLACE_9) <- "KIND OF PLACE TEEN RECEIVED TETANUS BOOSTER SHOT AFTER AGE 7 YEARS: OTHER NON-MEDICALLY-RELATED PLACE" label(NISTEENPUF09$TET_REAS_1) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: NOT RECOMMENDED" label(NISTEENPUF09$TET_REAS_10) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: COSTS" label(NISTEENPUF09$TET_REAS_11) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: SAFETY CONCERN/SIDE EFFECTS" label(NISTEENPUF09$TET_REAS_12) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: EFFECTIVENESS CONCERN" label(NISTEENPUF09$TET_REAS_13) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: CHILD FEARFUL" label(NISTEENPUF09$TET_REAS_14) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: CHILD SHOULD MAKE DECISION" label(NISTEENPUF09$TET_REAS_15) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: COLLEGE SHOT" label(NISTEENPUF09$TET_REAS_16) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: DON'T BELIEVE IN VACCINATIONS" label(NISTEENPUF09$TET_REAS_17) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: FAMILY/PARENTAL DECISION" label(NISTEENPUF09$TET_REAS_18) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: HANDICAPPED/SPECIAL NEEDS/ILLNESS" label(NISTEENPUF09$TET_REAS_19) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: RELIGION/ORTHODOX" label(NISTEENPUF09$TET_REAS_2) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: LACK OF KNOWLEDGE" label(NISTEENPUF09$TET_REAS_20) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: TIME" label(NISTEENPUF09$TET_REAS_21) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: MORE INFO/NEW VACCINE" label(NISTEENPUF09$TET_REAS_22) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: ALREADY UP-TO-DATE" label(NISTEENPUF09$TET_REAS_23) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: NOT AVAILABLE" label(NISTEENPUF09$TET_REAS_24) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: NOT A SCHOOL REQUIREMENT" label(NISTEENPUF09$TET_REAS_3) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: NOT NEEDED OR NOT NECESSARY" label(NISTEENPUF09$TET_REAS_4) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: NO DOCTOR OR DOCTOR'S VISIT NOT SCHEDULED" label(NISTEENPUF09$TET_REAS_5) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: NOT APPROPRIATE AGE" label(NISTEENPUF09$TET_REAS_7) <- "MAIN REASON TEEN DID NOT RECEIVE TETANUS BOOSTER SHOTS: OTHER REASON" label(NISTEENPUF09$TET_RECOM) <- "HAD OR HAS DOCTOR OR OTHER HEALTH CARE PROFESSIONAL EVER RECOMMENDED THAT TEEN RECEIVE TETANUS BOOSTER SHOTS?" label(NISTEENPUF09$TET_TYPE1) <- "TYPE OF HH-REPORTED TETANUS BOOSTER SHOT #1" label(NISTEENPUF09$TET_TYPE2) <- "TYPE OF HH-REPORTED TETANUS BOOSTER SHOT #2" label(NISTEENPUF09$TET_TYPE3) <- "TYPE OF HH-REPORTED TETANUS BOOSTER SHOT #3" label(NISTEENPUF09$TET_TYPE4) <- "TYPE OF HH-REPORTED TETANUS BOOSTER SHOT #4" label(NISTEENPUF09$TET_TYPE5) <- "TYPE OF HH-REPORTED TETANUS BOOSTER SHOT #5" label(NISTEENPUF09$TET_TYPE6) <- "TYPE OF HH-REPORTED TETANUS BOOSTER SHOT #6" label(NISTEENPUF09$TET_TYPE7) <- "TYPE OF HH-REPORTED TETANUS BOOSTER SHOT #7" label(NISTEENPUF09$TET_TYPE8) <- "TYPE OF HH-REPORTED TETANUS BOOSTER SHOT #8" label(NISTEENPUF09$VISITS) <- "IN PAST 12 MONTHS NUMBER OF TIMES TEEN HAS SEEN A DOCTOR OR OTHER HEALTH CARE PROFESSIONAL" label(NISTEENPUF09$VRC_AGE_SC1) <- "AGE OF TEEN IN YEARS AT HH-REPORTED VARICELLA SHOT #1 (SHOTCARD)" label(NISTEENPUF09$VRC_AGE_SC2) <- "AGE OF TEEN IN YEARS AT HH-REPORTED VARICELLA SHOT #2 (SHOTCARD)" label(NISTEENPUF09$VRC_AGE_SC3) <- "AGE OF TEEN IN YEARS AT HH-REPORTED VARICELLA SHOT #3 (SHOTCARD)" label(NISTEENPUF09$VRC_AGE_SC4) <- "AGE OF TEEN IN YEARS AT HH-REPORTED VARICELLA SHOT #4 (SHOTCARD)" label(NISTEENPUF09$VRC_AGE_SC5) <- "AGE OF TEEN IN YEARS AT HH-REPORTED VARICELLA SHOT #5 (SHOTCARD)" label(NISTEENPUF09$VRC_AGE_SC6) <- "AGE OF TEEN IN YEARS AT HH-REPORTED VARICELLA SHOT #6 (SHOTCARD)" label(NISTEENPUF09$VRC_AGE_SC7) <- "AGE OF TEEN IN YEARS AT HH-REPORTED VARICELLA SHOT #7 (SHOTCARD)" label(NISTEENPUF09$VRC_AGE_SC8) <- "AGE OF TEEN IN YEARS AT HH-REPORTED VARICELLA SHOT #8 (SHOTCARD)" label(NISTEENPUF09$VRC_ANY_REC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY VARICELLA SHOTS? (RECALL)" label(NISTEENPUF09$VRC_ANY_SC) <- "HH-REPORT: HAS TEEN EVER RECEIVED ANY VARICELLA SHOTS? (SHOTCARD)" label(NISTEENPUF09$VRC_NUM_REC) <- "NUMBER OF HH-REPORTED VARICELLA SHOTS RECEIVED (RECALL)" label(NISTEENPUF09$VRC_NUM_SC) <- "NUMBER OF HH-REPORTED VARICELLA SHOTS RECEIVED (SHOTCARD)" label(NISTEENPUF09$VRC_NUM_TOT) <- "NUMBER OF HH-REPORTED VARICELLA SHOTS RECEIVED (TOTAL)" label(NISTEENPUF09$AGE) <- "AGE IN YEARS OF SELECTED TEEN" label(NISTEENPUF09$AGEGRP_M_I) <- "MOTHER'S AGE CATEGORIES (RECODE)" label(NISTEENPUF09$C1R) <- "NUMBER OF PEOPLE IN HOUSEHOLD (RECODE)" label(NISTEENPUF09$C5R) <- "RELATIONSHIP OF RESPONDENT TO TEEN (RECODE)" label(NISTEENPUF09$CEN_REG) <- "CENSUS REGION BASED ON TRUE STATE OF RESIDENCE" label(NISTEENPUF09$CHILDNM) <- "NUMBER OF CHILDREN UNDER 18 YEARS OF AGE IN HH (RECODE)" label(NISTEENPUF09$EDUC1) <- "EDUCATION LEVEL OF MOTHER WITH 4 CATEGORIES (RECODE)" label(NISTEENPUF09$EDUC_TR) <- "TEEN'S CURRENT GRADE IN SCHOOL (RECODE)" label(NISTEENPUF09$INCPORAR) <- "INCOME TO POVERTY RATIO (RECODE)" label(NISTEENPUF09$INCPOV1) <- "POVERTY STATUS" label(NISTEENPUF09$INCQ298A) <- "FAMILY INCOME CATEGORIES (RECODE)" label(NISTEENPUF09$I_HISP_K) <- "IS TEEN HISPANIC OR LATINO?" label(NISTEENPUF09$LANGUAGE) <- "LANGUAGE IN WHICH INTERVIEW WAS CONDUCTED" label(NISTEENPUF09$MARITAL2) <- "MARITAL STATUS OF MOTHER (RECODE)" label(NISTEENPUF09$MOBIL_I) <- "GEOGRAPHIC MOBILITY STATUS: STATE OF RESIDENCE AT BIRTH VERSUS CURRENT STATE" label(NISTEENPUF09$NUM_PHONE) <- "NUMBER OF RESIDENTIAL TELEPHONE NUMBERS IN HOUSEHOLD (EXCLUDING CELL PHONES)" label(NISTEENPUF09$NUM_CELLS_HH) <- "NUMBER OF WORKING CELL PHONES HOUSEHOLD MEMBERS HAVE AVAILABLE FOR PERSONAL USE" label(NISTEENPUF09$NUM_CELLS_PARENTS) <- "NUMBER OF WORKING CELL PHONES USUALLY USED BY PARENTS OR GUARDIANS" label(NISTEENPUF09$RACEETHK) <- "RACE/ETHNICITY OF TEEN WITH MULTIRACE CATEGORY (RECODE)" label(NISTEENPUF09$RACE_K) <- "RACE OF TEEN WITH MULTIRACE CATEGORY (RECODE)" label(NISTEENPUF09$RENT_OWN) <- "IS HOME OWNED/BEING BOUGHT, RENTED, OR OCCUPIED BY SOME OTHER ARRANGEMENT?" label(NISTEENPUF09$SEX) <- "GENDER OF CHILD" label(NISTEENPUF09$ESTIAPT09) <- "ESTIMATION AREA OF RESIDENCE" label(NISTEENPUF09$STATE) <- "TRUE STATE OF RESIDENCE (STATE FIPS CODE)" label(NISTEENPUF09$D6R) <- "NUMBER OF PROVIDERS IDENTIFIED BY RESPONDENT (NOT DE-DUPLICATED) (RECODE)" label(NISTEENPUF09$D7) <- "CONSENT TO OBTAIN VACCINATION RECORDS FROM PROVIDERS" label(NISTEENPUF09$NUM_PROVR) <- "NUMBER OF VALID, UNIQUE PROVIDERS IDENTIFIED BY RESPONDENT (FOR TEENS WITH CONSENT) (RECODE)" label(NISTEENPUF09$N_PRVR) <- "NUMBER OF IHQS WITH VACCINATION INFORMATION FOR THE TEEN (RECODE)" label(NISTEENPUF09$FACILITY) <- "FACILITY TYPES FOR TEEN'S PROVIDERS" label(NISTEENPUF09$REGISTRY) <- "DID TEEN'S PROVIDERS REPORT TEEN'S IMMUNIZATIONS TO IMMUNIZATION REGISTRY?" label(NISTEENPUF09$VFC_ORDER) <- "DO TEEN'S PROVIDERS ORDER VACCINES FROM STATE/LOCAL HEALTH DEPT?" label(NISTEENPUF09$P_N13FLU) <- "NUMBER OF SEASONAL INFLUENZA VACCINATIONS IN THE PAST THREE YEARS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13FLU_FL) <- "NUMBER OF SEASONAL INFLUENZA VACCINATIONS OF UNKNOWN TYPE IN PAST THREE YEARS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13FLU_FM) <- "NUMBER OF SEASONAL FLUMIST VACCINATIONS IN PAST THREE YEARS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13FLU_FN) <- "NUMBER OF INJECTED SEASONAL INFLUENZA SHOTS OF OTHER/UNKNOWN TYPE IN PAST THREE YEARS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13FLU_FV) <- "NUMBER OF SEASONAL FLUVIRIN SHOTS IN PAST THREE YEARS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13FLU_FZ) <- "NUMBER OF SEASONAL FLUZONE SHOTS IN PAST THREE YEARS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13HEPA) <- "NUMBER OF HEPATITIS A-CONTAINING SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13HEPA_HA) <- "NUMBER OF HEPATITIS A-CONTAINING SHOTS OF UNKNOWN TYPE BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13HEPA_HO) <- "NUMBER OF HEPATITIS A-ONLY SHOTS DETERMINED BY AGE 13 YEARS FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13HEPB) <- "NUMBER OF HEPATITIS B-CONTAINING SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13HEPB_43) <- "NUMBER OF HEPB/HIB COMBO SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13HEPB_61) <- "NUMBER OF HEPATITIS B 0.5 ML RECOMBIVAX SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13HEPB_62) <- "NUMBER OF HEPATITIS B 1.0 ML RECOMBIVAX SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13HEPB_63) <- "NUMBER OF HEPATITIS B ENGERIX SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13HEPB_64) <- "NUMBER OF HEPATITIS B-ONLY SHOTS OF UNKNOWN TYPE BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13HEPB_HB) <- "NUMBER OF HEPATITIS B-CONTAINING SHOTS OF UNKNOWN TYPE BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13HPV) <- "NUMBER OF HUMAN PAPILLOMAVIRUS SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13MCV) <- "NUMBER OF MEASLES-CONTAINING SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13MCV_30) <- "NUMBER OF MMR-ONLY SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13MCV_31) <- "NUMBER OF MEASLES-ONLY SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13MCV_32) <- "NUMBER OF MEASLES-MUMPS SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13MCV_33) <- "NUMBER OF MEASLES-RUBELLA SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13MCV_MM) <- "NUMBER OF MEASLES-CONTAINING SHOTS OF UNKNOWN TYPE BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13MCV_VM) <- "NUMBER OF MMR/VARICELLA SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13MEN) <- "NUMBER OF MENINGOCOCCAL-CONTAINING SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13MEN_80) <- "NUMBER OF MENINGOCOCCAL MCV4 SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13MEN_81) <- "NUMBER OF MENINGOCOCCAL MPSV4 SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13MEN_82) <- "NUMBER OF MENINGOCOCCAL-CONTAINING SHOTS OF UNKNOWN TYPE BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13MMR) <- "NUMBER OF MMR-CONTAINING SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13PPS) <- "NUMBER OF PNEUMOCOCCAL POLYSACCHARIDE SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13TDAP_POST10) <- "NUMBER OF TDAP SHOTS SINCE AGE 10 YEARS AND BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13TDP) <- "NUMBER OF TD/TDAP-CONTAINING SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13TDP_11) <- "NUMBER OF TD-ONLY SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13TDP_14) <- "NUMBER OF TDAP-ONLY SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13TDP_15) <- "NUMBER OF TD/TDAP-CONTAINING SHOTS OF UNKNOWN TYPE BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13TDP_POST10) <- "NUMBER OF TD/TDAP-CONTAINING SHOTS SINCE AGE 10 YEARS AND BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13VRC) <- "NUMBER OF VARICELLA-CONTAINING SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13VRC_POST1) <- "NUMBER OF VARICELLA-CONTAINING SHOTS AT 12+ MONTHS OF AGE AND BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13VRC_VA) <- "NUMBER OF VARICELLA-CONTAINING SHOTS OF UNKNOWN TYPE BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13VRC_VM) <- "NUMBER OF MMR/VARICELLA SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_N13VRC_VO) <- "NUMBER OF VARICELLA-ONLY SHOTS BY AGE 13 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMFLU) <- "NUMBER OF SEASONAL INFLUENZA VACCINATIONS IN THE PAST THREE YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMFLU_FL) <- "NUMBER OF SEASONAL INFLUENZA VACCINATIONS OF UNKNOWN TYPE IN PAST THREE YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMFLU_FM) <- "NUMBER OF SEASONAL FLUMIST VACCINATIONS IN PAST THREE YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMFLU_FN) <- "NUMBER OF INJECTED SEASONAL INFLUENZA SHOTS OF OTHER/UNKNOWN TYPE IN PAST THREE YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMFLU_FV) <- "NUMBER OF SEASONAL FLUVIRIN SHOTS IN PAST THREE YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMFLU_FZ) <- "NUMBER OF SEASONAL FLUZONE SHOTS IN PAST THREE YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMHEPA) <- "NUMBER OF HEPATITIS A-CONTAINING SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMHEPA_HA) <- "NUMBER OF HEPATITIS A-CONTAINING SHOTS OF UNKNOWN TYPE DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMHEPA_HO) <- "NUMBER OF HEPATITIS A-ONLY SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMHEPB) <- "NUMBER OF HEPATITIS B-CONTAINING SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMHEPB_43) <- "NUMBER OF HEPB/HIB COMBO SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMHEPB_61) <- "NUMBER OF HEPATITIS B 0.5 ML RECOMBIVAX SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMHEPB_62) <- "NUMBER OF HEPATITIS B 1.0 ML RECOMBIVAX SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMHEPB_63) <- "NUMBER OF HEPATITIS B ENGERIX SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMHEPB_64) <- "NUMBER OF HEPATITIS B-ONLY SHOTS OF UNKNOWN TYPE DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMHEPB_HB) <- "NUMBER OF HEPATITIS B-CONTAINING SHOTS OF UNKNOWN TYPE DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMHPV) <- "NUMBER OF HUMAN PAPILLOMAVIRUS SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMMCV) <- "NUMBER OF MEASLES-CONTAINING SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMMCV_30) <- "NUMBER OF MMR-ONLY SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMMCV_31) <- "NUMBER OF MEASLES-ONLY SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMMCV_32) <- "NUMBER OF MEASLES-MUMPS SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMMCV_33) <- "NUMBER OF MEASLES-RUBELLA SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMMCV_MM) <- "NUMBER OF MEASLES-CONTAINING SHOTS OF UNKNOWN TYPE DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMMCV_VM) <- "NUMBER OF MMR/VARICELLA SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMMEN) <- "NUMBER OF MENINGOCOCCAL-CONTAINING SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMMEN_80) <- "NUMBER OF MENINGOCOCCAL MCV4 SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMMEN_81) <- "NUMBER OF MENINGOCOCCAL MPSV4 SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMMEN_82) <- "NUMBER OF MENINGOCOCCAL-CONTAINING SHOTS OF UNKNOWN TYPE DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMMMR) <- "NUMBER OF MMR-CONTAINING SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMPPS) <- "NUMBER OF PNEUMOCOCCAL POLYSACCHARIDE SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMTDAP_POST10) <- "NUMBER OF TDAP SHOTS SINCE AGE 10 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMTDP) <- "NUMBER OF TD/TDAP-CONTAINING SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMTDP_11) <- "NUMBER OF TD-ONLY SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMTDP_14) <- "NUMBER OF TDAP-ONLY SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMTDP_15) <- "NUMBER OF TD/TDAP-CONTAINING SHOTS OF UNKNOWN TYPE DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMTDP_POST10) <- "NUMBER OF TD/TDAP-CONTAINING SHOTS SINCE AGE 10 YEARS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMVRC) <- "NUMBER OF VARICELLA-CONTAINING SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMVRC_POST1) <- "NUMBER OF VARICELLA-CONTAINING SHOTS AT 12+ MONTHS OF AGE DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMVRC_VA) <- "NUMBER OF VARICELLA-CONTAINING SHOTS OF UNKNOWN TYPE DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMVRC_VM) <- "NUMBER OF MMR/VARICELLA SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_NUMVRC_VO) <- "NUMBER OF VARICELLA-ONLY SHOTS DETERMINED FROM PROVIDER INFO, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U131321) <- "UP-TO-DATE FLAG (PROV INFO): 1:3:2:1 SERIES BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U1313212) <- "UP-TO-DATE FLAG (PROV INFO): 1:3:2:1:2 SERIES BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13FLU0708) <- "UP-TO-DATE FLAG (PROV INFO): 1+ SEASONAL INFLUENZA VACCINATION BETWEEN SEPT 1, 2007 AND JAN 31, 2008, BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13FLU0809) <- "UP-TO-DATE FLAG (PROV INFO): 1+ SEASONAL INFLUENZA VACCINATION BETWEEN SEPT 1, 2008 AND JAN 31, 2009, BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13FLU0910) <- "UP-TO-DATE FLAG (PROV INFO): 1+ SEASONAL INFLUENZA VACCINATION BETWEEN SEPT 1, 2009 AND JAN 31, 2010, BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13HEPA) <- "UP-TO-DATE FLAG (PROV INFO): 2+ HEPATITIS A-CONTAINING SHOTS BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13HEPB) <- "UP-TO-DATE FLAG (PROV INFO): 2+ HEPB 1.0 ML RECOMBIVAX SHOTS BEFORE AGE 13 YEARS, OR 3+ ANY COMBINATION OF HEPATITIS B-CONTAINING SHOTS BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13HPV) <- "UP-TO-DATE FLAG (PROV INFO): 1+ HUMAN PAPILLOMAVIRUS SHOT BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13MCV) <- "UP-TO-DATE FLAG (PROV INFO): 2+ MEASLES-CONTAINING SHOTS BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13MEN) <- "UP-TO-DATE FLAG (PROV INFO): 1+ MENINGOCOCCAL-CONTAINING SHOT BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13MMR) <- "UP-TO-DATE FLAG (PROV INFO): 2+ MMR-CONTAINING SHOTS BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13PPS) <- "UP-TO-DATE FLAG (PROV INFO): 1+ PNEUMOCOCCAL POLYSACCHARIDE SHOT BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13TD) <- "UP-TO-DATE FLAG (PROV INFO) FOR TD/TDAP BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13TDAP) <- "UP-TO-DATE FLAG (PROV INFO): 1+ TDAP-ONLY SHOT SINCE AGE 10 YEARS AND BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13VRC) <- "UP-TO-DATE FLAG (PROV INFO): 1+ VARICELLA-CONTAINING SHOT AT 12+ MONTHS OF AGE AND BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_U13VRC2) <- "UP-TO-DATE FLAG (PROV INFO): 2+ VARICELLA-CONTAINING SHOTS AT 12+ MONTHS OF AGE AND BEFORE AGE 13 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTD1321) <- "UP-TO-DATE FLAG (PROV INFO): 1:3:2:1 SERIES, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTD13212) <- "UP-TO-DATE FLAG (PROV INFO): 1:3:2:1:2 SERIES, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDFLU0708) <- "UP-TO-DATE FLAG (PROV INFO): 1+ SEASONAL INFLUENZA VACCINATION BETWEEN SEPT 1, 2007 AND JAN 31, 2008, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDFLU0809) <- "UP-TO-DATE FLAG (PROV INFO): 1+ SEASONAL INFLUENZA VACCINATION BETWEEN SEPT 1, 2008 AND JAN 31, 2009, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDFLU0910) <- "UP-TO-DATE FLAG (PROV INFO): 1+ SEASONAL INFLUENZA VACCINATION BETWEEN SEPT 1, 2009 AND JAN 31, 2010, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDHEPA) <- "UP-TO-DATE FLAG (PROV INFO): 2+ HEPATITIS A-CONTAINING SHOTS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDHEPB) <- "UP-TO-DATE FLAG (PROV INFO): 2+ HEPB 1.0 ML RECOMBIVAX SHOTS, OR 3+ ANY COMBINATION OF HEPATITIS B-CONTAINING SHOTS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDHPV) <- "UP-TO-DATE FLAG (PROV INFO): 1+ HUMAN PAPILLOMAVIRUS SHOT, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDMCV) <- "UP-TO-DATE FLAG (PROV INFO): 2+ MEASLES-CONTAINING SHOTS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDMEN) <- "UP-TO-DATE FLAG (PROV INFO): 1+ MENINGOCOCCAL-CONTAINING SHOT, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDMMR) <- "UP-TO-DATE FLAG (PROV INFO): 2+ MMR-CONTAINING SHOTS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDPPS) <- "UP-TO-DATE FLAG (PROV INFO): 1+ PNEUMOCOCCAL POLYSACCHARIDE SHOT, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDTD) <- "UP-TO-DATE FLAG (PROV INFO) FOR TD/TDAP, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDTDAP) <- "UP-TO-DATE FLAG (PROV INFO): 1+ TDAP-ONLY SHOT SINCE AGE 10 YEARS, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDVRC) <- "UP-TO-DATE FLAG (PROV INFO): 1+ VARICELLA-CONTAINING SHOT AT 12+ MONTHS OF AGE, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$P_UTDVRC2) <- "UP-TO-DATE FLAG (PROV INFO): 2+ VARICELLA-CONTAINING SHOTS AT 12+ MONTHS OF AGE, EXCLUDING ANY VACCINATIONS AFTER THE RDD INTERVIEW DATE." label(NISTEENPUF09$VRC_HIST) <- "HISTORY OF CHICKEN POX REPORTED BY THE HOUSEHOLD OR BY ANY PROVIDER" label(NISTEENPUF09$FLU_AGE1) <- "AGE IN YEARS OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #1" label(NISTEENPUF09$FLU_AGE2) <- "AGE IN YEARS OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #2" label(NISTEENPUF09$FLU_AGE3) <- "AGE IN YEARS OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #3" label(NISTEENPUF09$FLU_AGE4) <- "AGE IN YEARS OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #4" label(NISTEENPUF09$FLU_AGE5) <- "AGE IN YEARS OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #5" label(NISTEENPUF09$FLU_AGE6) <- "AGE IN YEARS OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #6" label(NISTEENPUF09$FLU_AGE7) <- "AGE IN YEARS OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #7" label(NISTEENPUF09$FLU_AGE8) <- "AGE IN YEARS OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #8" label(NISTEENPUF09$FLU_AGE9) <- "AGE IN YEARS OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #9" label(NISTEENPUF09$FLU_MONTH1) <- "MONTH OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #1" label(NISTEENPUF09$FLU_MONTH2) <- "MONTH OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #2" label(NISTEENPUF09$FLU_MONTH3) <- "MONTH OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #3" label(NISTEENPUF09$FLU_MONTH4) <- "MONTH OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #4" label(NISTEENPUF09$FLU_MONTH5) <- "MONTH OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #5" label(NISTEENPUF09$FLU_MONTH6) <- "MONTH OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #6" label(NISTEENPUF09$FLU_MONTH7) <- "MONTH OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #7" label(NISTEENPUF09$FLU_MONTH8) <- "MONTH OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #8" label(NISTEENPUF09$FLU_MONTH9) <- "MONTH OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #9" label(NISTEENPUF09$FLU_YEAR1) <- "YEAR OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #1" label(NISTEENPUF09$FLU_YEAR2) <- "YEAR OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #2" label(NISTEENPUF09$FLU_YEAR3) <- "YEAR OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #3" label(NISTEENPUF09$FLU_YEAR4) <- "YEAR OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #4" label(NISTEENPUF09$FLU_YEAR5) <- "YEAR OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #5" label(NISTEENPUF09$FLU_YEAR6) <- "YEAR OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #6" label(NISTEENPUF09$FLU_YEAR7) <- "YEAR OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #7" label(NISTEENPUF09$FLU_YEAR8) <- "YEAR OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #8" label(NISTEENPUF09$FLU_YEAR9) <- "YEAR OF PROV-REPORTED SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #9" label(NISTEENPUF09$HEPA_AGE1) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS A-CONTAINING SHOT #1" label(NISTEENPUF09$HEPA_AGE2) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS A-CONTAINING SHOT #2" label(NISTEENPUF09$HEPA_AGE3) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS A-CONTAINING SHOT #3" label(NISTEENPUF09$HEPA_AGE4) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS A-CONTAINING SHOT #4" label(NISTEENPUF09$HEPA_AGE5) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS A-CONTAINING SHOT #5" label(NISTEENPUF09$HEPA_AGE6) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS A-CONTAINING SHOT #6" label(NISTEENPUF09$HEPA_AGE7) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS A-CONTAINING SHOT #7" label(NISTEENPUF09$HEPA_AGE8) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS A-CONTAINING SHOT #8" label(NISTEENPUF09$HEPA_AGE9) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS A-CONTAINING SHOT #9" label(NISTEENPUF09$HEPB_AGE1) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS B-CONTAINING SHOT #1" label(NISTEENPUF09$HEPB_AGE2) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS B-CONTAINING SHOT #2" label(NISTEENPUF09$HEPB_AGE3) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS B-CONTAINING SHOT #3" label(NISTEENPUF09$HEPB_AGE4) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS B-CONTAINING SHOT #4" label(NISTEENPUF09$HEPB_AGE5) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS B-CONTAINING SHOT #5" label(NISTEENPUF09$HEPB_AGE6) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS B-CONTAINING SHOT #6" label(NISTEENPUF09$HEPB_AGE7) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS B-CONTAINING SHOT #7" label(NISTEENPUF09$HEPB_AGE8) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS B-CONTAINING SHOT #8" label(NISTEENPUF09$HEPB_AGE9) <- "AGE IN YEARS OF PROV-REPORTED HEPATITIS B-CONTAINING SHOT #9" label(NISTEENPUF09$HPV_AGE1) <- "AGE IN YEARS OF PROV-REPORTED HUMAN PAPILLOMAVIRUS SHOT #1" label(NISTEENPUF09$HPV_AGE2) <- "AGE IN YEARS OF PROV-REPORTED HUMAN PAPILLOMAVIRUS SHOT #2" label(NISTEENPUF09$HPV_AGE3) <- "AGE IN YEARS OF PROV-REPORTED HUMAN PAPILLOMAVIRUS SHOT #3" label(NISTEENPUF09$HPV_AGE4) <- "AGE IN YEARS OF PROV-REPORTED HUMAN PAPILLOMAVIRUS SHOT #4" label(NISTEENPUF09$HPV_AGE5) <- "AGE IN YEARS OF PROV-REPORTED HUMAN PAPILLOMAVIRUS SHOT #5" label(NISTEENPUF09$HPV_AGE6) <- "AGE IN YEARS OF PROV-REPORTED HUMAN PAPILLOMAVIRUS SHOT #6" label(NISTEENPUF09$HPV_AGE7) <- "AGE IN YEARS OF PROV-REPORTED HUMAN PAPILLOMAVIRUS SHOT #7" label(NISTEENPUF09$HPV_AGE8) <- "AGE IN YEARS OF PROV-REPORTED HUMAN PAPILLOMAVIRUS SHOT #8" label(NISTEENPUF09$HPV_AGE9) <- "AGE IN YEARS OF PROV-REPORTED HUMAN PAPILLOMAVIRUS SHOT #9" label(NISTEENPUF09$MCV_AGE1) <- "AGE IN YEARS OF PROV-REPORTED MEASLES-CONTAINING SHOT #1" label(NISTEENPUF09$MCV_AGE2) <- "AGE IN YEARS OF PROV-REPORTED MEASLES-CONTAINING SHOT #2" label(NISTEENPUF09$MCV_AGE3) <- "AGE IN YEARS OF PROV-REPORTED MEASLES-CONTAINING SHOT #3" label(NISTEENPUF09$MCV_AGE4) <- "AGE IN YEARS OF PROV-REPORTED MEASLES-CONTAINING SHOT #4" label(NISTEENPUF09$MCV_AGE5) <- "AGE IN YEARS OF PROV-REPORTED MEASLES-CONTAINING SHOT #5" label(NISTEENPUF09$MCV_AGE6) <- "AGE IN YEARS OF PROV-REPORTED MEASLES-CONTAINING SHOT #6" label(NISTEENPUF09$MCV_AGE7) <- "AGE IN YEARS OF PROV-REPORTED MEASLES-CONTAINING SHOT #7" label(NISTEENPUF09$MCV_AGE8) <- "AGE IN YEARS OF PROV-REPORTED MEASLES-CONTAINING SHOT #8" label(NISTEENPUF09$MCV_AGE9) <- "AGE IN YEARS OF PROV-REPORTED MEASLES-CONTAINING SHOT #9" label(NISTEENPUF09$MEN_AGE1) <- "AGE IN YEARS OF PROV-REPORTED MENINGOCOCCAL-CONTAINING SHOT #1" label(NISTEENPUF09$MEN_AGE2) <- "AGE IN YEARS OF PROV-REPORTED MENINGOCOCCAL-CONTAINING SHOT #2" label(NISTEENPUF09$MEN_AGE3) <- "AGE IN YEARS OF PROV-REPORTED MENINGOCOCCAL-CONTAINING SHOT #3" label(NISTEENPUF09$MEN_AGE4) <- "AGE IN YEARS OF PROV-REPORTED MENINGOCOCCAL-CONTAINING SHOT #4" label(NISTEENPUF09$MEN_AGE5) <- "AGE IN YEARS OF PROV-REPORTED MENINGOCOCCAL-CONTAINING SHOT #5" label(NISTEENPUF09$MEN_AGE6) <- "AGE IN YEARS OF PROV-REPORTED MENINGOCOCCAL-CONTAINING SHOT #6" label(NISTEENPUF09$MEN_AGE7) <- "AGE IN YEARS OF PROV-REPORTED MENINGOCOCCAL-CONTAINING SHOT #7" label(NISTEENPUF09$MEN_AGE8) <- "AGE IN YEARS OF PROV-REPORTED MENINGOCOCCAL-CONTAINING SHOT #8" label(NISTEENPUF09$MEN_AGE9) <- "AGE IN YEARS OF PROV-REPORTED MENINGOCOCCAL-CONTAINING SHOT #9" label(NISTEENPUF09$PPS_AGE1) <- "AGE IN YEARS OF PROV-REPORTED PNEUMOCOCCAL POLYSACCHARIDE SHOT #1" label(NISTEENPUF09$PPS_AGE2) <- "AGE IN YEARS OF PROV-REPORTED PNEUMOCOCCAL POLYSACCHARIDE SHOT #2" label(NISTEENPUF09$PPS_AGE3) <- "AGE IN YEARS OF PROV-REPORTED PNEUMOCOCCAL POLYSACCHARIDE SHOT #3" label(NISTEENPUF09$PPS_AGE4) <- "AGE IN YEARS OF PROV-REPORTED PNEUMOCOCCAL POLYSACCHARIDE SHOT #4" label(NISTEENPUF09$PPS_AGE5) <- "AGE IN YEARS OF PROV-REPORTED PNEUMOCOCCAL POLYSACCHARIDE SHOT #5" label(NISTEENPUF09$PPS_AGE6) <- "AGE IN YEARS OF PROV-REPORTED PNEUMOCOCCAL POLYSACCHARIDE SHOT #6" label(NISTEENPUF09$PPS_AGE7) <- "AGE IN YEARS OF PROV-REPORTED PNEUMOCOCCAL POLYSACCHARIDE SHOT #7" label(NISTEENPUF09$PPS_AGE8) <- "AGE IN YEARS OF PROV-REPORTED PNEUMOCOCCAL POLYSACCHARIDE SHOT #8" label(NISTEENPUF09$PPS_AGE9) <- "AGE IN YEARS OF PROV-REPORTED PNEUMOCOCCAL POLYSACCHARIDE SHOT #9" label(NISTEENPUF09$TDP_AGE1) <- "AGE IN YEARS OF PROV-REPORTED TD/TDAP-CONTAINING SHOT #1" label(NISTEENPUF09$TDP_AGE2) <- "AGE IN YEARS OF PROV-REPORTED TD/TDAP-CONTAINING SHOT #2" label(NISTEENPUF09$TDP_AGE3) <- "AGE IN YEARS OF PROV-REPORTED TD/TDAP-CONTAINING SHOT #3" label(NISTEENPUF09$TDP_AGE4) <- "AGE IN YEARS OF PROV-REPORTED TD/TDAP-CONTAINING SHOT #4" label(NISTEENPUF09$TDP_AGE5) <- "AGE IN YEARS OF PROV-REPORTED TD/TDAP-CONTAINING SHOT #5" label(NISTEENPUF09$TDP_AGE6) <- "AGE IN YEARS OF PROV-REPORTED TD/TDAP-CONTAINING SHOT #6" label(NISTEENPUF09$TDP_AGE7) <- "AGE IN YEARS OF PROV-REPORTED TD/TDAP-CONTAINING SHOT #7" label(NISTEENPUF09$TDP_AGE8) <- "AGE IN YEARS OF PROV-REPORTED TD/TDAP-CONTAINING SHOT #8" label(NISTEENPUF09$TDP_AGE9) <- "AGE IN YEARS OF PROV-REPORTED TD/TDAP-CONTAINING SHOT #9" label(NISTEENPUF09$VRC_AGE1) <- "AGE IN YEARS OF PROV-REPORTED VARICELLA-CONTAINING SHOT #1" label(NISTEENPUF09$VRC_AGE2) <- "AGE IN YEARS OF PROV-REPORTED VARICELLA-CONTAINING SHOT #2" label(NISTEENPUF09$VRC_AGE3) <- "AGE IN YEARS OF PROV-REPORTED VARICELLA-CONTAINING SHOT #3" label(NISTEENPUF09$VRC_AGE4) <- "AGE IN YEARS OF PROV-REPORTED VARICELLA-CONTAINING SHOT #4" label(NISTEENPUF09$VRC_AGE5) <- "AGE IN YEARS OF PROV-REPORTED VARICELLA-CONTAINING SHOT #5" label(NISTEENPUF09$VRC_AGE6) <- "AGE IN YEARS OF PROV-REPORTED VARICELLA-CONTAINING SHOT #6" label(NISTEENPUF09$VRC_AGE7) <- "AGE IN YEARS OF PROV-REPORTED VARICELLA-CONTAINING SHOT #7" label(NISTEENPUF09$VRC_AGE8) <- "AGE IN YEARS OF PROV-REPORTED VARICELLA-CONTAINING SHOT #8" label(NISTEENPUF09$VRC_AGE9) <- "AGE IN YEARS OF PROV-REPORTED VARICELLA-CONTAINING SHOT #9" label(NISTEENPUF09$XFLUTY1) <- "SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #1 TYPE CODE" label(NISTEENPUF09$XFLUTY2) <- "SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #2 TYPE CODE" label(NISTEENPUF09$XFLUTY3) <- "SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #3 TYPE CODE" label(NISTEENPUF09$XFLUTY4) <- "SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #4 TYPE CODE" label(NISTEENPUF09$XFLUTY5) <- "SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #5 TYPE CODE" label(NISTEENPUF09$XFLUTY6) <- "SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #6 TYPE CODE" label(NISTEENPUF09$XFLUTY7) <- "SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #7 TYPE CODE" label(NISTEENPUF09$XFLUTY8) <- "SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #8 TYPE CODE" label(NISTEENPUF09$XFLUTY9) <- "SEASONAL INFLUENZA VACCINATION IN PAST THREE YEARS #9 TYPE CODE" label(NISTEENPUF09$XHEPATY1) <- "HEPATITIS A-CONTAINING VACCINATION #1 TYPE CODE" label(NISTEENPUF09$XHEPATY2) <- "HEPATITIS A-CONTAINING VACCINATION #2 TYPE CODE" label(NISTEENPUF09$XHEPATY3) <- "HEPATITIS A-CONTAINING VACCINATION #3 TYPE CODE" label(NISTEENPUF09$XHEPATY4) <- "HEPATITIS A-CONTAINING VACCINATION #4 TYPE CODE" label(NISTEENPUF09$XHEPATY5) <- "HEPATITIS A-CONTAINING VACCINATION #5 TYPE CODE" label(NISTEENPUF09$XHEPATY6) <- "HEPATITIS A-CONTAINING VACCINATION #6 TYPE CODE" label(NISTEENPUF09$XHEPATY7) <- "HEPATITIS A-CONTAINING VACCINATION #7 TYPE CODE" label(NISTEENPUF09$XHEPATY8) <- "HEPATITIS A-CONTAINING VACCINATION #8 TYPE CODE" label(NISTEENPUF09$XHEPATY9) <- "HEPATITIS A-CONTAINING VACCINATION #9 TYPE CODE" label(NISTEENPUF09$XHEPBTY1) <- "HEPATITIS B-CONTAINING VACCINATION #1 TYPE CODE" label(NISTEENPUF09$XHEPBTY2) <- "HEPATITIS B-CONTAINING VACCINATION #2 TYPE CODE" label(NISTEENPUF09$XHEPBTY3) <- "HEPATITIS B-CONTAINING VACCINATION #3 TYPE CODE" label(NISTEENPUF09$XHEPBTY4) <- "HEPATITIS B-CONTAINING VACCINATION #4 TYPE CODE" label(NISTEENPUF09$XHEPBTY5) <- "HEPATITIS B-CONTAINING VACCINATION #5 TYPE CODE" label(NISTEENPUF09$XHEPBTY6) <- "HEPATITIS B-CONTAINING VACCINATION #6 TYPE CODE" label(NISTEENPUF09$XHEPBTY7) <- "HEPATITIS B-CONTAINING VACCINATION #7 TYPE CODE" label(NISTEENPUF09$XHEPBTY8) <- "HEPATITIS B-CONTAINING VACCINATION #8 TYPE CODE" label(NISTEENPUF09$XHEPBTY9) <- "HEPATITIS B-CONTAINING VACCINATION #9 TYPE CODE" label(NISTEENPUF09$XMCVTY1) <- "MEASLES-CONTAINING VACCINATION #1 TYPE CODE" label(NISTEENPUF09$XMCVTY2) <- "MEASLES-CONTAINING VACCINATION #2 TYPE CODE" label(NISTEENPUF09$XMCVTY3) <- "MEASLES-CONTAINING VACCINATION #3 TYPE CODE" label(NISTEENPUF09$XMCVTY4) <- "MEASLES-CONTAINING VACCINATION #4 TYPE CODE" label(NISTEENPUF09$XMCVTY5) <- "MEASLES-CONTAINING VACCINATION #5 TYPE CODE" label(NISTEENPUF09$XMCVTY6) <- "MEASLES-CONTAINING VACCINATION #6 TYPE CODE" label(NISTEENPUF09$XMCVTY7) <- "MEASLES-CONTAINING VACCINATION #7 TYPE CODE" label(NISTEENPUF09$XMCVTY8) <- "MEASLES-CONTAINING VACCINATION #8 TYPE CODE" label(NISTEENPUF09$XMCVTY9) <- "MEASLES-CONTAINING VACCINATION #9 TYPE CODE" label(NISTEENPUF09$XMENTY1) <- "MENINGOCOCCAL-CONTAINING VACCINATION #1 TYPE CODE" label(NISTEENPUF09$XMENTY2) <- "MENINGOCOCCAL-CONTAINING VACCINATION #2 TYPE CODE" label(NISTEENPUF09$XMENTY3) <- "MENINGOCOCCAL-CONTAINING VACCINATION #3 TYPE CODE" label(NISTEENPUF09$XMENTY4) <- "MENINGOCOCCAL-CONTAINING VACCINATION #4 TYPE CODE" label(NISTEENPUF09$XMENTY5) <- "MENINGOCOCCAL-CONTAINING VACCINATION #5 TYPE CODE" label(NISTEENPUF09$XMENTY6) <- "MENINGOCOCCAL-CONTAINING VACCINATION #6 TYPE CODE" label(NISTEENPUF09$XMENTY7) <- "MENINGOCOCCAL-CONTAINING VACCINATION #7 TYPE CODE" label(NISTEENPUF09$XMENTY8) <- "MENINGOCOCCAL-CONTAINING VACCINATION #8 TYPE CODE" label(NISTEENPUF09$XMENTY9) <- "MENINGOCOCCAL-CONTAINING VACCINATION #9 TYPE CODE" label(NISTEENPUF09$XTDPTY1) <- "TD/TDAP-CONTAINING VACCINATION #1 TYPE CODE" label(NISTEENPUF09$XTDPTY2) <- "TD/TDAP-CONTAINING VACCINATION #2 TYPE CODE" label(NISTEENPUF09$XTDPTY3) <- "TD/TDAP-CONTAINING VACCINATION #3 TYPE CODE" label(NISTEENPUF09$XTDPTY4) <- "TD/TDAP-CONTAINING VACCINATION #4 TYPE CODE" label(NISTEENPUF09$XTDPTY5) <- "TD/TDAP-CONTAINING VACCINATION #5 TYPE CODE" label(NISTEENPUF09$XTDPTY6) <- "TD/TDAP-CONTAINING VACCINATION #6 TYPE CODE" label(NISTEENPUF09$XTDPTY7) <- "TD/TDAP-CONTAINING VACCINATION #7 TYPE CODE" label(NISTEENPUF09$XTDPTY8) <- "TD/TDAP-CONTAINING VACCINATION #8 TYPE CODE" label(NISTEENPUF09$XTDPTY9) <- "TD/TDAP-CONTAINING VACCINATION #9 TYPE CODE" label(NISTEENPUF09$XVRCTY1) <- "VARICELLA-CONTAINING VACCINATION #1 TYPE CODE" label(NISTEENPUF09$XVRCTY2) <- "VARICELLA-CONTAINING VACCINATION #2 TYPE CODE" label(NISTEENPUF09$XVRCTY3) <- "VARICELLA-CONTAINING VACCINATION #3 TYPE CODE" label(NISTEENPUF09$XVRCTY4) <- "VARICELLA-CONTAINING VACCINATION #4 TYPE CODE" label(NISTEENPUF09$XVRCTY5) <- "VARICELLA-CONTAINING VACCINATION #5 TYPE CODE" label(NISTEENPUF09$XVRCTY6) <- "VARICELLA-CONTAINING VACCINATION #6 TYPE CODE" label(NISTEENPUF09$XVRCTY7) <- "VARICELLA-CONTAINING VACCINATION #7 TYPE CODE" label(NISTEENPUF09$XVRCTY8) <- "VARICELLA-CONTAINING VACCINATION #8 TYPE CODE" label(NISTEENPUF09$XVRCTY9) <- "VARICELLA-CONTAINING VACCINATION #9 TYPE CODE" label(NISTEENPUF09$TIS_INS_1) <- "IS TEEN COVERED BY HEALTH INSURANCE PROVIDED THROUGH EMPLOYER OR UNION?" label(NISTEENPUF09$TIS_INS_11) <- "SINCE AGE 11, ANY TIME WHEN TEEN WAS NOT COVERED BY ANY HEALTH INSURANCE?" label(NISTEENPUF09$TIS_INS_2) <- "IS TEEN COVERED BY ANY MEDICAID PLAN?" label(NISTEENPUF09$TIS_INS_3) <- "IS TEEN COVERED BY S-CHIP?" label(NISTEENPUF09$TIS_INS_3A) <- "IS TEEN COVERED BY ANY MEDICAID PLAN OR S-CHIP?" label(NISTEENPUF09$TIS_INS_4_5) <- "IS TEEN COVERED BY INDIAN HEALTH SERVICE, MILITARY HEALTH CARE, TRICARE, CHAMPUS, OR CHAMP-VA?" label(NISTEENPUF09$TIS_INS_6) <- "IS TEEN COVERED BY ANY OTHER HEALTH INSURANCE OR HEALTH CARE PLAN?" label(NISTEENPUF09$VFC_I) <- "DERIVED: IS TEEN VFC ELIGIBLE?" ############################################################################ # Step 5: CREATE A PERMANENT R DATASET # ############################################################################ save(NISTEENPUF09, file=paste(PUF, "/NISTEENPUF09.RData", sep="")) ############################################################################ # Step 6: ASSIGN FORMATS # # FORMATS ARE APPLICABLE ONLY TO CATEGORICAL VARIABLES IN R # ############################################################################ NISTEENPUF09$LANGUAGE <- factor(NISTEENPUF09$LANGUAGE, levels=LANGUAGElevels, labels=LANGUAGElabels) NISTEENPUF09$ASTHMA <- factor(NISTEENPUF09$ASTHMA, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$CKUP_11_12 <- factor(NISTEENPUF09$CKUP_11_12, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$CPOX_HAD <- factor(NISTEENPUF09$CPOX_HAD, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HEPA_ANY_REC <- factor(NISTEENPUF09$HEPA_ANY_REC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HEPA_ANY_SC <- factor(NISTEENPUF09$HEPA_ANY_SC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HEPA_RECOM <- factor(NISTEENPUF09$HEPA_RECOM, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HEPB_ANY_REC <- factor(NISTEENPUF09$HEPB_ANY_REC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HEPB_ANY_SC <- factor(NISTEENPUF09$HEPB_ANY_SC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HEPB_SCH <- factor(NISTEENPUF09$HEPB_SCH, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_ANY_REC <- factor(NISTEENPUF09$HPVI_ANY_REC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_ANY_SC <- factor(NISTEENPUF09$HPVI_ANY_SC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_HEARD <- factor(NISTEENPUF09$HPVI_HEARD, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_KNOW <- factor(NISTEENPUF09$HPVI_KNOW, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_1 <- factor(NISTEENPUF09$HPVI_REAS_1, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_10 <- factor(NISTEENPUF09$HPVI_REAS_10, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_11 <- factor(NISTEENPUF09$HPVI_REAS_11, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_12 <- factor(NISTEENPUF09$HPVI_REAS_12, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_13 <- factor(NISTEENPUF09$HPVI_REAS_13, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_14 <- factor(NISTEENPUF09$HPVI_REAS_14, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_15 <- factor(NISTEENPUF09$HPVI_REAS_15, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_16 <- factor(NISTEENPUF09$HPVI_REAS_16, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_17 <- factor(NISTEENPUF09$HPVI_REAS_17, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_18 <- factor(NISTEENPUF09$HPVI_REAS_18, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_19 <- factor(NISTEENPUF09$HPVI_REAS_19, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_2 <- factor(NISTEENPUF09$HPVI_REAS_2, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_20 <- factor(NISTEENPUF09$HPVI_REAS_20, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_21 <- factor(NISTEENPUF09$HPVI_REAS_21, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_22 <- factor(NISTEENPUF09$HPVI_REAS_22, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_23 <- factor(NISTEENPUF09$HPVI_REAS_23, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_24 <- factor(NISTEENPUF09$HPVI_REAS_24, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_25 <- factor(NISTEENPUF09$HPVI_REAS_25, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_26 <- factor(NISTEENPUF09$HPVI_REAS_26, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_27 <- factor(NISTEENPUF09$HPVI_REAS_27, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_28 <- factor(NISTEENPUF09$HPVI_REAS_28, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_3 <- factor(NISTEENPUF09$HPVI_REAS_3, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_5 <- factor(NISTEENPUF09$HPVI_REAS_5, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_6 <- factor(NISTEENPUF09$HPVI_REAS_6, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_REAS_9 <- factor(NISTEENPUF09$HPVI_REAS_9, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$HPVI_RECOM <- factor(NISTEENPUF09$HPVI_RECOM, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$IMM_ANY <- factor(NISTEENPUF09$IMM_ANY, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MCV_ANY_REC <- factor(NISTEENPUF09$MCV_ANY_REC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MCV_ANY_SC <- factor(NISTEENPUF09$MCV_ANY_SC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_ANY_REC <- factor(NISTEENPUF09$MEN_ANY_REC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_ANY_SC <- factor(NISTEENPUF09$MEN_ANY_SC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_1 <- factor(NISTEENPUF09$MEN_REAS_1, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_10 <- factor(NISTEENPUF09$MEN_REAS_10, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_11 <- factor(NISTEENPUF09$MEN_REAS_11, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_12 <- factor(NISTEENPUF09$MEN_REAS_12, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_13 <- factor(NISTEENPUF09$MEN_REAS_13, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_14 <- factor(NISTEENPUF09$MEN_REAS_14, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_15 <- factor(NISTEENPUF09$MEN_REAS_15, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_16 <- factor(NISTEENPUF09$MEN_REAS_16, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_17 <- factor(NISTEENPUF09$MEN_REAS_17, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_18 <- factor(NISTEENPUF09$MEN_REAS_18, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_19 <- factor(NISTEENPUF09$MEN_REAS_19, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_2 <- factor(NISTEENPUF09$MEN_REAS_2, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_20 <- factor(NISTEENPUF09$MEN_REAS_20, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_21 <- factor(NISTEENPUF09$MEN_REAS_21, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_22 <- factor(NISTEENPUF09$MEN_REAS_22, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_23 <- factor(NISTEENPUF09$MEN_REAS_23, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_3 <- factor(NISTEENPUF09$MEN_REAS_3, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_4 <- factor(NISTEENPUF09$MEN_REAS_4, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_5 <- factor(NISTEENPUF09$MEN_REAS_5, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_6 <- factor(NISTEENPUF09$MEN_REAS_6, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_REAS_7 <- factor(NISTEENPUF09$MEN_REAS_7, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$MEN_RECOM <- factor(NISTEENPUF09$MEN_RECOM, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$RISK_EVER <- factor(NISTEENPUF09$RISK_EVER, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$RISK_HH <- factor(NISTEENPUF09$RISK_HH, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$RISK_NOW <- factor(NISTEENPUF09$RISK_NOW, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$SHOTCARD_ALL <- factor(NISTEENPUF09$SHOTCARD_ALL, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_ANY_REC <- factor(NISTEENPUF09$TET_ANY_REC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_ANY_SC <- factor(NISTEENPUF09$TET_ANY_SC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_PLACE_1 <- factor(NISTEENPUF09$TET_PLACE_1, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_PLACE_2 <- factor(NISTEENPUF09$TET_PLACE_2, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_PLACE_3 <- factor(NISTEENPUF09$TET_PLACE_3, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_PLACE_4 <- factor(NISTEENPUF09$TET_PLACE_4, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_PLACE_5 <- factor(NISTEENPUF09$TET_PLACE_5, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_PLACE_6 <- factor(NISTEENPUF09$TET_PLACE_6, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_PLACE_7 <- factor(NISTEENPUF09$TET_PLACE_7, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_PLACE_8 <- factor(NISTEENPUF09$TET_PLACE_8, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_PLACE_9 <- factor(NISTEENPUF09$TET_PLACE_9, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_1 <- factor(NISTEENPUF09$TET_REAS_1, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_10 <- factor(NISTEENPUF09$TET_REAS_10, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_11 <- factor(NISTEENPUF09$TET_REAS_11, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_12 <- factor(NISTEENPUF09$TET_REAS_12, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_13 <- factor(NISTEENPUF09$TET_REAS_13, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_14 <- factor(NISTEENPUF09$TET_REAS_14, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_15 <- factor(NISTEENPUF09$TET_REAS_15, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_16 <- factor(NISTEENPUF09$TET_REAS_16, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_17 <- factor(NISTEENPUF09$TET_REAS_17, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_18 <- factor(NISTEENPUF09$TET_REAS_18, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_19 <- factor(NISTEENPUF09$TET_REAS_19, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_2 <- factor(NISTEENPUF09$TET_REAS_2, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_20 <- factor(NISTEENPUF09$TET_REAS_20, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_21 <- factor(NISTEENPUF09$TET_REAS_21, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_22 <- factor(NISTEENPUF09$TET_REAS_22, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_23 <- factor(NISTEENPUF09$TET_REAS_23, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_24 <- factor(NISTEENPUF09$TET_REAS_24, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_3 <- factor(NISTEENPUF09$TET_REAS_3, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_4 <- factor(NISTEENPUF09$TET_REAS_4, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_5 <- factor(NISTEENPUF09$TET_REAS_5, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_REAS_7 <- factor(NISTEENPUF09$TET_REAS_7, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TET_RECOM <- factor(NISTEENPUF09$TET_RECOM, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$VRC_ANY_REC <- factor(NISTEENPUF09$VRC_ANY_REC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$VRC_ANY_SC <- factor(NISTEENPUF09$VRC_ANY_SC, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$I_HISP_K <- factor(NISTEENPUF09$I_HISP_K, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TIS_INS_1 <- factor(NISTEENPUF09$TIS_INS_1, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TIS_INS_11 <- factor(NISTEENPUF09$TIS_INS_11, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TIS_INS_2 <- factor(NISTEENPUF09$TIS_INS_2, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TIS_INS_3 <- factor(NISTEENPUF09$TIS_INS_3, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TIS_INS_3A <- factor(NISTEENPUF09$TIS_INS_3A, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TIS_INS_4_5 <- factor(NISTEENPUF09$TIS_INS_4_5, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$TIS_INS_6 <- factor(NISTEENPUF09$TIS_INS_6, levels=YNDKRFlevels, labels=YNDKRFlabels) NISTEENPUF09$CKUP_LAST <- factor(NISTEENPUF09$CKUP_LAST, levels=CKUPLASTlevels, labels=CKUPLASTlabels) NISTEENPUF09$CPOX_AGER <- factor(NISTEENPUF09$CPOX_AGER, levels=CPOX_Rlevels, labels=CPOX_Rlabels) NISTEENPUF09$HEPA_NUM_REC <- factor(NISTEENPUF09$HEPA_NUM_REC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$HEPA_NUM_SC <- factor(NISTEENPUF09$HEPA_NUM_SC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$HEPA_NUM_TOT <- factor(NISTEENPUF09$HEPA_NUM_TOT, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$HEPB_NUM_REC <- factor(NISTEENPUF09$HEPB_NUM_REC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$HEPB_NUM_SC <- factor(NISTEENPUF09$HEPB_NUM_SC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$HEPB_NUM_TOT <- factor(NISTEENPUF09$HEPB_NUM_TOT, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$HPVI_NUM_REC <- factor(NISTEENPUF09$HPVI_NUM_REC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$HPVI_NUM_SC <- factor(NISTEENPUF09$HPVI_NUM_SC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$HPVI_NUM_TOT <- factor(NISTEENPUF09$HPVI_NUM_TOT, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$MCV_NUM_REC <- factor(NISTEENPUF09$MCV_NUM_REC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$MCV_NUM_SC <- factor(NISTEENPUF09$MCV_NUM_SC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$MCV_NUM_TOT <- factor(NISTEENPUF09$MCV_NUM_TOT, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$MEN_NUM_REC <- factor(NISTEENPUF09$MEN_NUM_REC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$MEN_NUM_SC <- factor(NISTEENPUF09$MEN_NUM_SC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$MEN_NUM_TOT <- factor(NISTEENPUF09$MEN_NUM_TOT, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$TET_NUM_SC <- factor(NISTEENPUF09$TET_NUM_SC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$VRC_NUM_REC <- factor(NISTEENPUF09$VRC_NUM_REC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$VRC_NUM_SC <- factor(NISTEENPUF09$VRC_NUM_SC, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$VRC_NUM_TOT <- factor(NISTEENPUF09$VRC_NUM_TOT, levels=HHCOUNTlevels, labels=HHCOUNTlabels) NISTEENPUF09$SHOTCARD <- factor(NISTEENPUF09$SHOTCARD, levels=SHOTCARDlevels, labels=SHOTCARDlabels) NISTEENPUF09$TET_LAST_TYPE <- factor(NISTEENPUF09$TET_LAST_TYPE, levels=TETTYPElevels, labels=TETTYPElabels) NISTEENPUF09$TET_TYPE1 <- factor(NISTEENPUF09$TET_TYPE1, levels=TETTYPElevels, labels=TETTYPElabels) NISTEENPUF09$TET_TYPE2 <- factor(NISTEENPUF09$TET_TYPE2, levels=TETTYPElevels, labels=TETTYPElabels) NISTEENPUF09$TET_TYPE3 <- factor(NISTEENPUF09$TET_TYPE3, levels=TETTYPElevels, labels=TETTYPElabels) NISTEENPUF09$TET_TYPE4 <- factor(NISTEENPUF09$TET_TYPE4, levels=TETTYPElevels, labels=TETTYPElabels) NISTEENPUF09$TET_TYPE5 <- factor(NISTEENPUF09$TET_TYPE5, levels=TETTYPElevels, labels=TETTYPElabels) NISTEENPUF09$TET_TYPE6 <- factor(NISTEENPUF09$TET_TYPE6, levels=TETTYPElevels, labels=TETTYPElabels) NISTEENPUF09$TET_TYPE7 <- factor(NISTEENPUF09$TET_TYPE7, levels=TETTYPElevels, labels=TETTYPElabels) NISTEENPUF09$TET_TYPE8 <- factor(NISTEENPUF09$TET_TYPE8, levels=TETTYPElevels, labels=TETTYPElabels) NISTEENPUF09$INCPOV1 <- factor(NISTEENPUF09$INCPOV1, levels=INCPOVlevels, labels=INCPOVlabels) NISTEENPUF09$MOBIL_I <- factor(NISTEENPUF09$MOBIL_I, levels=MOBILlevels, labels=MOBILlabels) NISTEENPUF09$NUM_PHONE <- factor(NISTEENPUF09$NUM_PHONE, levels=NUM_PHONlevels, labels=NUM_PHONlabels) NISTEENPUF09$NUM_CELLS_HH <- factor(NISTEENPUF09$NUM_CELLS_HH, levels=NUM_PHONlevels, labels=NUM_PHONlabels) NISTEENPUF09$NUM_CELLS_PARENTS <- factor(NISTEENPUF09$NUM_CELLS_PARENTS, levels=NUM_PHONlevels, labels=NUM_PHONlabels) NISTEENPUF09$SEX <- factor(NISTEENPUF09$SEX, levels=SEXlevels, labels=SEXlabels) NISTEENPUF09$PDAT <- factor(NISTEENPUF09$PDAT, levels=ADEQlevels, labels=ADEQlabels) NISTEENPUF09$D7 <- factor(NISTEENPUF09$D7, levels=CONSENTlevels, labels=CONSENTlabels) NISTEENPUF09$XFLUTY1 <- factor(NISTEENPUF09$XFLUTY1, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XFLUTY2 <- factor(NISTEENPUF09$XFLUTY2, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XFLUTY3 <- factor(NISTEENPUF09$XFLUTY3, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XFLUTY4 <- factor(NISTEENPUF09$XFLUTY4, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XFLUTY5 <- factor(NISTEENPUF09$XFLUTY5, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XFLUTY6 <- factor(NISTEENPUF09$XFLUTY6, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XFLUTY7 <- factor(NISTEENPUF09$XFLUTY7, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XFLUTY8 <- factor(NISTEENPUF09$XFLUTY8, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XFLUTY9 <- factor(NISTEENPUF09$XFLUTY9, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPATY1 <- factor(NISTEENPUF09$XHEPATY1, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPATY2 <- factor(NISTEENPUF09$XHEPATY2, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPATY3 <- factor(NISTEENPUF09$XHEPATY3, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPATY4 <- factor(NISTEENPUF09$XHEPATY4, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPATY5 <- factor(NISTEENPUF09$XHEPATY5, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPATY6 <- factor(NISTEENPUF09$XHEPATY6, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPATY7 <- factor(NISTEENPUF09$XHEPATY7, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPATY8 <- factor(NISTEENPUF09$XHEPATY8, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPATY9 <- factor(NISTEENPUF09$XHEPATY9, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPBTY1 <- factor(NISTEENPUF09$XHEPBTY1, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPBTY2 <- factor(NISTEENPUF09$XHEPBTY2, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPBTY3 <- factor(NISTEENPUF09$XHEPBTY3, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPBTY4 <- factor(NISTEENPUF09$XHEPBTY4, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPBTY5 <- factor(NISTEENPUF09$XHEPBTY5, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPBTY6 <- factor(NISTEENPUF09$XHEPBTY6, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPBTY7 <- factor(NISTEENPUF09$XHEPBTY7, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPBTY8 <- factor(NISTEENPUF09$XHEPBTY8, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XHEPBTY9 <- factor(NISTEENPUF09$XHEPBTY9, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMCVTY1 <- factor(NISTEENPUF09$XMCVTY1, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMCVTY2 <- factor(NISTEENPUF09$XMCVTY2, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMCVTY3 <- factor(NISTEENPUF09$XMCVTY3, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMCVTY4 <- factor(NISTEENPUF09$XMCVTY4, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMCVTY5 <- factor(NISTEENPUF09$XMCVTY5, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMCVTY6 <- factor(NISTEENPUF09$XMCVTY6, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMCVTY7 <- factor(NISTEENPUF09$XMCVTY7, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMCVTY8 <- factor(NISTEENPUF09$XMCVTY8, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMCVTY9 <- factor(NISTEENPUF09$XMCVTY9, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMENTY1 <- factor(NISTEENPUF09$XMENTY1, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMENTY2 <- factor(NISTEENPUF09$XMENTY2, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMENTY3 <- factor(NISTEENPUF09$XMENTY3, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMENTY4 <- factor(NISTEENPUF09$XMENTY4, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMENTY5 <- factor(NISTEENPUF09$XMENTY5, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMENTY6 <- factor(NISTEENPUF09$XMENTY6, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMENTY7 <- factor(NISTEENPUF09$XMENTY7, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMENTY8 <- factor(NISTEENPUF09$XMENTY8, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XMENTY9 <- factor(NISTEENPUF09$XMENTY9, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XTDPTY1 <- factor(NISTEENPUF09$XTDPTY1, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XTDPTY2 <- factor(NISTEENPUF09$XTDPTY2, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XTDPTY3 <- factor(NISTEENPUF09$XTDPTY3, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XTDPTY4 <- factor(NISTEENPUF09$XTDPTY4, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XTDPTY5 <- factor(NISTEENPUF09$XTDPTY5, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XTDPTY6 <- factor(NISTEENPUF09$XTDPTY6, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XTDPTY7 <- factor(NISTEENPUF09$XTDPTY7, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XTDPTY8 <- factor(NISTEENPUF09$XTDPTY8, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XTDPTY9 <- factor(NISTEENPUF09$XTDPTY9, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XVRCTY1 <- factor(NISTEENPUF09$XVRCTY1, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XVRCTY2 <- factor(NISTEENPUF09$XVRCTY2, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XVRCTY3 <- factor(NISTEENPUF09$XVRCTY3, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XVRCTY4 <- factor(NISTEENPUF09$XVRCTY4, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XVRCTY5 <- factor(NISTEENPUF09$XVRCTY5, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XVRCTY6 <- factor(NISTEENPUF09$XVRCTY6, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XVRCTY7 <- factor(NISTEENPUF09$XVRCTY7, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XVRCTY8 <- factor(NISTEENPUF09$XVRCTY8, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$XVRCTY9 <- factor(NISTEENPUF09$XVRCTY9, levels=TYPElevels, labels=TYPElabels) NISTEENPUF09$VRC_HIST <- factor(NISTEENPUF09$VRC_HIST, levels=YESMISSlevels, labels=YESMISSlabels) NISTEENPUF09$P_U131321 <- factor(NISTEENPUF09$P_U131321, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U1313212 <- factor(NISTEENPUF09$P_U1313212, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U13FLU0708 <- factor(NISTEENPUF09$P_U13FLU0708, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U13FLU0809 <- factor(NISTEENPUF09$P_U13FLU0809, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U13FLU0910 <- factor(NISTEENPUF09$P_U13FLU0910, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U13HEPA <- factor(NISTEENPUF09$P_U13HEPA, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U13HEPB <- factor(NISTEENPUF09$P_U13HEPB, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U13HPV <- factor(NISTEENPUF09$P_U13HPV, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U13MCV <- factor(NISTEENPUF09$P_U13MCV, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U13MEN <- factor(NISTEENPUF09$P_U13MEN, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U13MMR <- factor(NISTEENPUF09$P_U13MMR, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U13PPS <- factor(NISTEENPUF09$P_U13PPS, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U13TD <- factor(NISTEENPUF09$P_U13TD, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_U13TDAP <- factor(NISTEENPUF09$P_U13TDAP, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTD1321 <- factor(NISTEENPUF09$P_UTD1321, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTD13212 <- factor(NISTEENPUF09$P_UTD13212, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTDFLU0708 <- factor(NISTEENPUF09$P_UTDFLU0708, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTDFLU0809 <- factor(NISTEENPUF09$P_UTDFLU0809, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTDFLU0910 <- factor(NISTEENPUF09$P_UTDFLU0910, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTDHEPA <- factor(NISTEENPUF09$P_UTDHEPA, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTDHEPB <- factor(NISTEENPUF09$P_UTDHEPB, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTDHPV <- factor(NISTEENPUF09$P_UTDHPV, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTDMCV <- factor(NISTEENPUF09$P_UTDMCV, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTDMEN <- factor(NISTEENPUF09$P_UTDMEN, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTDMMR <- factor(NISTEENPUF09$P_UTDMMR, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTDPPS <- factor(NISTEENPUF09$P_UTDPPS, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTDTD <- factor(NISTEENPUF09$P_UTDTD, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$P_UTDTDAP <- factor(NISTEENPUF09$P_UTDTDAP, levels=UTDlevels, labels=UTDlabels) NISTEENPUF09$CEN_REG <- factor(NISTEENPUF09$CEN_REG, levels=CENREGlevels, labels=CENREGlabels) NISTEENPUF09$STATE <- factor(NISTEENPUF09$STATE, levels=STATElevels, labels=STATElabels) NISTEENPUF09$EDUC1 <- factor(NISTEENPUF09$EDUC1, levels=EDUC4_Mlevels, labels=EDUC4_Mlabels) NISTEENPUF09$FACILITY <- factor(NISTEENPUF09$FACILITY, levels=FACILSUMlevels, labels=FACILSUMlabels) NISTEENPUF09$REGISTRY <- factor(NISTEENPUF09$REGISTRY, levels=REGISTRYlevels, labels=REGISTRYlabels) NISTEENPUF09$VFC_ORDER <- factor(NISTEENPUF09$VFC_ORDER, levels=REGISTRYlevels, labels=REGISTRYlabels) NISTEENPUF09$AGEGRP_M_I <- factor(NISTEENPUF09$AGEGRP_M_I, levels=AGEGRP_Mlevels, labels=AGEGRP_Mlabels) NISTEENPUF09$VISITS <- factor(NISTEENPUF09$VISITS, levels=HVSTSlevels, labels=HVSTSlabels) NISTEENPUF09$P_U13VRC <- factor(NISTEENPUF09$P_U13VRC, levels=UTDVRClevels, labels=UTDVRClabels) NISTEENPUF09$P_U13VRC2 <- factor(NISTEENPUF09$P_U13VRC2, levels=UTDVRClevels, labels=UTDVRClabels) NISTEENPUF09$P_UTDVRC <- factor(NISTEENPUF09$P_UTDVRC, levels=UTDVRClevels, labels=UTDVRClabels) NISTEENPUF09$P_UTDVRC2 <- factor(NISTEENPUF09$P_UTDVRC2, levels=UTDVRClevels, labels=UTDVRClabels) NISTEENPUF09$RENT_OWN <- factor(NISTEENPUF09$RENT_OWN, levels=RENTOWNlevels, labels=RENTOWNlabels) NISTEENPUF09$HEPA_AGE_SC1 <- factor(NISTEENPUF09$HEPA_AGE_SC1, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPA_AGE_SC2 <- factor(NISTEENPUF09$HEPA_AGE_SC2, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPA_AGE_SC3 <- factor(NISTEENPUF09$HEPA_AGE_SC3, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPA_AGE_SC4 <- factor(NISTEENPUF09$HEPA_AGE_SC4, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPA_AGE_SC5 <- factor(NISTEENPUF09$HEPA_AGE_SC5, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPA_AGE_SC6 <- factor(NISTEENPUF09$HEPA_AGE_SC6, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPA_AGE_SC7 <- factor(NISTEENPUF09$HEPA_AGE_SC7, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPA_AGE_SC8 <- factor(NISTEENPUF09$HEPA_AGE_SC8, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPB_AGE_SC1 <- factor(NISTEENPUF09$HEPB_AGE_SC1, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPB_AGE_SC2 <- factor(NISTEENPUF09$HEPB_AGE_SC2, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPB_AGE_SC3 <- factor(NISTEENPUF09$HEPB_AGE_SC3, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPB_AGE_SC4 <- factor(NISTEENPUF09$HEPB_AGE_SC4, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPB_AGE_SC5 <- factor(NISTEENPUF09$HEPB_AGE_SC5, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPB_AGE_SC6 <- factor(NISTEENPUF09$HEPB_AGE_SC6, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPB_AGE_SC7 <- factor(NISTEENPUF09$HEPB_AGE_SC7, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HEPB_AGE_SC8 <- factor(NISTEENPUF09$HEPB_AGE_SC8, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HPVI_AGE_SC1 <- factor(NISTEENPUF09$HPVI_AGE_SC1, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HPVI_AGE_SC2 <- factor(NISTEENPUF09$HPVI_AGE_SC2, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HPVI_AGE_SC3 <- factor(NISTEENPUF09$HPVI_AGE_SC3, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HPVI_AGE_SC4 <- factor(NISTEENPUF09$HPVI_AGE_SC4, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HPVI_AGE_SC5 <- factor(NISTEENPUF09$HPVI_AGE_SC5, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HPVI_AGE_SC6 <- factor(NISTEENPUF09$HPVI_AGE_SC6, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HPVI_AGE_SC7 <- factor(NISTEENPUF09$HPVI_AGE_SC7, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$HPVI_AGE_SC8 <- factor(NISTEENPUF09$HPVI_AGE_SC8, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MCV_AGE_SC1 <- factor(NISTEENPUF09$MCV_AGE_SC1, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MCV_AGE_SC2 <- factor(NISTEENPUF09$MCV_AGE_SC2, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MCV_AGE_SC3 <- factor(NISTEENPUF09$MCV_AGE_SC3, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MCV_AGE_SC4 <- factor(NISTEENPUF09$MCV_AGE_SC4, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MCV_AGE_SC5 <- factor(NISTEENPUF09$MCV_AGE_SC5, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MCV_AGE_SC6 <- factor(NISTEENPUF09$MCV_AGE_SC6, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MCV_AGE_SC7 <- factor(NISTEENPUF09$MCV_AGE_SC7, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MCV_AGE_SC8 <- factor(NISTEENPUF09$MCV_AGE_SC8, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MEN_AGE_SC1 <- factor(NISTEENPUF09$MEN_AGE_SC1, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MEN_AGE_SC2 <- factor(NISTEENPUF09$MEN_AGE_SC2, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MEN_AGE_SC3 <- factor(NISTEENPUF09$MEN_AGE_SC3, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MEN_AGE_SC4 <- factor(NISTEENPUF09$MEN_AGE_SC4, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MEN_AGE_SC5 <- factor(NISTEENPUF09$MEN_AGE_SC5, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MEN_AGE_SC6 <- factor(NISTEENPUF09$MEN_AGE_SC6, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MEN_AGE_SC7 <- factor(NISTEENPUF09$MEN_AGE_SC7, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$MEN_AGE_SC8 <- factor(NISTEENPUF09$MEN_AGE_SC8, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$TET_AGE_SC1 <- factor(NISTEENPUF09$TET_AGE_SC1, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$TET_AGE_SC2 <- factor(NISTEENPUF09$TET_AGE_SC2, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$TET_AGE_SC3 <- factor(NISTEENPUF09$TET_AGE_SC3, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$TET_AGE_SC4 <- factor(NISTEENPUF09$TET_AGE_SC4, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$TET_AGE_SC5 <- factor(NISTEENPUF09$TET_AGE_SC5, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$TET_AGE_SC6 <- factor(NISTEENPUF09$TET_AGE_SC6, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$TET_AGE_SC7 <- factor(NISTEENPUF09$TET_AGE_SC7, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$TET_AGE_SC8 <- factor(NISTEENPUF09$TET_AGE_SC8, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$VRC_AGE_SC1 <- factor(NISTEENPUF09$VRC_AGE_SC1, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$VRC_AGE_SC2 <- factor(NISTEENPUF09$VRC_AGE_SC2, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$VRC_AGE_SC3 <- factor(NISTEENPUF09$VRC_AGE_SC3, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$VRC_AGE_SC4 <- factor(NISTEENPUF09$VRC_AGE_SC4, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$VRC_AGE_SC5 <- factor(NISTEENPUF09$VRC_AGE_SC5, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$VRC_AGE_SC6 <- factor(NISTEENPUF09$VRC_AGE_SC6, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$VRC_AGE_SC7 <- factor(NISTEENPUF09$VRC_AGE_SC7, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$VRC_AGE_SC8 <- factor(NISTEENPUF09$VRC_AGE_SC8, levels=AGEATSHOTlevels, labels=AGEATSHOTlabels) NISTEENPUF09$FLU_MONTH1 <- factor(NISTEENPUF09$FLU_MONTH1, levels=MONTHFlevels, labels=MONTHFlabels) NISTEENPUF09$FLU_MONTH2 <- factor(NISTEENPUF09$FLU_MONTH2, levels=MONTHFlevels, labels=MONTHFlabels) NISTEENPUF09$FLU_MONTH3 <- factor(NISTEENPUF09$FLU_MONTH3, levels=MONTHFlevels, labels=MONTHFlabels) NISTEENPUF09$FLU_MONTH4 <- factor(NISTEENPUF09$FLU_MONTH4, levels=MONTHFlevels, labels=MONTHFlabels) NISTEENPUF09$FLU_MONTH5 <- factor(NISTEENPUF09$FLU_MONTH5, levels=MONTHFlevels, labels=MONTHFlabels) NISTEENPUF09$FLU_MONTH6 <- factor(NISTEENPUF09$FLU_MONTH6, levels=MONTHFlevels, labels=MONTHFlabels) NISTEENPUF09$FLU_MONTH7 <- factor(NISTEENPUF09$FLU_MONTH7, levels=MONTHFlevels, labels=MONTHFlabels) NISTEENPUF09$FLU_MONTH8 <- factor(NISTEENPUF09$FLU_MONTH8, levels=MONTHFlevels, labels=MONTHFlabels) NISTEENPUF09$FLU_MONTH9 <- factor(NISTEENPUF09$FLU_MONTH9, levels=MONTHFlevels, labels=MONTHFlabels) NISTEENPUF09$FLU_YEAR1 <- factor(NISTEENPUF09$FLU_YEAR1, levels=YEARFlevels, labels=YEARFlabels) NISTEENPUF09$FLU_YEAR2 <- factor(NISTEENPUF09$FLU_YEAR2, levels=YEARFlevels, labels=YEARFlabels) NISTEENPUF09$FLU_YEAR3 <- factor(NISTEENPUF09$FLU_YEAR3, levels=YEARFlevels, labels=YEARFlabels) NISTEENPUF09$FLU_YEAR4 <- factor(NISTEENPUF09$FLU_YEAR4, levels=YEARFlevels, labels=YEARFlabels) NISTEENPUF09$FLU_YEAR5 <- factor(NISTEENPUF09$FLU_YEAR5, levels=YEARFlevels, labels=YEARFlabels) NISTEENPUF09$FLU_YEAR6 <- factor(NISTEENPUF09$FLU_YEAR6, levels=YEARFlevels, labels=YEARFlabels) NISTEENPUF09$FLU_YEAR7 <- factor(NISTEENPUF09$FLU_YEAR7, levels=YEARFlevels, labels=YEARFlabels) NISTEENPUF09$FLU_YEAR8 <- factor(NISTEENPUF09$FLU_YEAR8, levels=YEARFlevels, labels=YEARFlabels) NISTEENPUF09$FLU_YEAR9 <- factor(NISTEENPUF09$FLU_YEAR9, levels=YEARFlevels, labels=YEARFlabels) NISTEENPUF09$CHILDNM <- factor(NISTEENPUF09$CHILDNM, levels=CHILDNMFlevels, labels=CHILDNMFlabels) NISTEENPUF09$NOSCHOOLR <- factor(NISTEENPUF09$NOSCHOOLR, levels=NOSCHRlevels, labels=NOSCHRlabels) NISTEENPUF09$EDUC_TR <- factor(NISTEENPUF09$EDUC_TR, levels=EDUC_TRlevels, labels=EDUC_TRlabels) NISTEENPUF09$C1R <- factor(NISTEENPUF09$C1R, levels=C1Rlevels, labels=C1Rlabels) NISTEENPUF09$RACE_K <- factor(NISTEENPUF09$RACE_K, levels=RACE_PUFlevels, labels=RACE_PUFlabels) NISTEENPUF09$RACEETHK <- factor(NISTEENPUF09$RACEETHK, levels=RACEETHKlevels, labels=RACEETHKlabels) NISTEENPUF09$C5R <- factor(NISTEENPUF09$C5R, levels=C5Rlevels, labels=C5Rlabels) NISTEENPUF09$INCQ298A <- factor(NISTEENPUF09$INCQ298A, levels=INCQ298Alevels, labels=INCQ298Alabels) NISTEENPUF09$D6R <- factor(NISTEENPUF09$D6R, levels=D6Rlevels, labels=D6Rlabels) NISTEENPUF09$NUM_PROVR <- factor(NISTEENPUF09$NUM_PROVR, levels=D6Rlevels, labels=D6Rlabels) NISTEENPUF09$N_PRVR <- factor(NISTEENPUF09$N_PRVR, levels=D6Rlevels, labels=D6Rlabels) NISTEENPUF09$ESTIAPT09 <- factor(NISTEENPUF09$ESTIAPT09, levels=ESTIAPT09Flevels, labels=ESTIAPT09Flabels) NISTEENPUF09$VFC_I <- factor(NISTEENPUF09$VFC_I, levels=INS_STATlevels, labels=INS_STATlabels) NISTEENPUF09$MARITAL2 <- factor(NISTEENPUF09$MARITAL2, levels=MAR_PUF2_levels, labels=MAR_PUF2_labels) ########################################################################## # STEP 7: CONTENTS AND STATISTICAL ESTIMATES(FREQUENCY) EXAMPLE # ########################################################################## #---CONTENTS---# NISTEENPUF09.CONTENTS <- contents(NISTEENPUF09)$contents print(NISTEENPUF09.CONTENTS) #IN CASE THAT THE R CONSOLE CANNOT DISPLAY WHOLE CONTENTS, #YOU CAN SAVE CONTENTS INTO A FILE #write.table(NISTEENPUF09.CONTENTS, file=paste(PUF,"/file-name",sep="")) #---UNWEIGHTED FREQUENCY---# unwt_freq <- function(UNWT.VAR){#FUNCTION TO PRINT UNWEIGHTED FREQUENCIES unwt.tab <- wtd.table(UNWT.VAR, weights= NULL, type='table') unwtd.freq <- data.frame(cbind( unwt.tab, round(unwt.tab/sum(unwt.tab)*100,2), cumsum(unwt.tab), cumsum(round(unwt.tab/sum(unwt.tab)*100,2)))) names(unwtd.freq) <- c("Frequency", "Percent", "Cumulative Frequency", "Cumulative Percent") unwtd.title <- paste('2009 NIS-TEEN', 'UNWEIGHTED FREQUENCIES', label(UNWT.VAR), sep="\n") label(unwtd.freq) <- unwtd.title print(unwtd.freq) } UNWT.VAR <- NISTEENPUF09$AGE #INPUT A VARIABLE OF INTEREST unwt_freq(UNWT.VAR) #---WEIGHTED FREQUENCY---# WT <- NISTEENPUF09$RDDWT #INPUT A WEIGHT VARIABLE WT.VAR <- NISTEENPUF09$AGE #INPUT A VARIABLE OF INTEREST wt.tab <- wtd.table(WT.VAR, weights= WT, type='table') wtd.freq <- data.frame(cbind( wt.tab, round(wt.tab/sum(wt.tab)*100,2), cumsum(wt.tab), cumsum(round(wt.tab/sum(wt.tab)*100,2)))) names(wtd.freq) <- c("Frequency", "Percent", "Cumulative Frequency", "Cumulative Percent") wtd.title <- paste('2009 NIS-TEEN PUBLIC USE FILE', 'WEIGHTED FREQUENCIES (EXCLUDING U.S. VIRGIN ISLANDS)', label(WT.VAR), sep="\n") label(wtd.freq) <- wtd.title print(wtd.freq)