# -----------------------------------------------------------------------------
# R programming statements for h244 data
#
# This file contains programming statements needed to import the ASCII data 
# file (.dat) into R. The R programming language has the capability to produce
# appropriate standard errors for estimates from a survey with a complex sample 
# design such as the Medical Expenditure Panel Survey (MEPS).
# 
# The input file is the ASCII data file (h244.dat) supplied in this PUF 
# release, which can be extracted from the .zip file supplied at the MEPS 
# website: https://meps.ahrq.gov/mepsweb/data_stats/download_data_files.jsp
#
# This code imports the MEPS data into R as a data frame called 'h244'.
#  
# Note that additional packages are needed to successfully run this code. To 
# install these packages, run the 'install.packages' function (shown below). 
# Once installed, the packages can be called using the 'library' function. 
# Packages only need to be installed once, but they must be called using the 
# 'library' function every time a new R session is started.
#
# Two options are available to run this code:
#
#  1. Copy and paste the code into an interactive R session. 
#
#     The user must first download the ASCII (.dat) file from the MEPS website
#     and save it to a local directory, which must be defined in the 
#     'meps_path' variable below. In this example, the local directory is  
#     called "C:/MEPS". Note that the path structure will differ on Mac and PC.  
# 
#
#  2. Call this code directly from an interactive R session. 
#
#     (a) If the ASCII (.dat) file has already been downloaded from the MEPS  
#         website and saved to a local directory, the following code can be run 
#         (after re-defining the 'meps_path' variable to point to the location 
#         of the h244.dat file.)
#
#           meps_path <- "C:/MEPS/h244.dat"  
#           source("https://meps.ahrq.gov/mepsweb/data_stats/download_data/pufs/h244/h244ru.txt")
#           head(h244) # view data
#
#
#     (b) Alternatively, the ASCII (.dat) file can be downloaded directly from
#         the MEPS website. The following code can be used to download and 
#         import the h244 data into R without having to manually download, 
#         unzip, and store the file on your local computer.
#
#           url <- "https://meps.ahrq.gov/mepsweb/data_files/pufs/h244dat.zip"
#           download.file(url, temp <- tempfile())
#
#           meps_path <- unzip(temp, exdir = tempdir())
#           source("https://meps.ahrq.gov/mepsweb/data_stats/download_data/pufs/h244/h244ru.txt")
#
#           unlink(temp)  # Unlink to delete temporary file
#
#           head(h244) # view data
#
# -----------------------------------------------------------------------------


# DEFINE 'meps_path' -----------------------------------------------------------
# 'meps_path' should point to the file path of the ASCII file (h244.dat) 
# Here, the 'exists' function checks whether meps_path is already defined. This
# feature is useful if calling this file from an external source.

if(!exists("meps_path")) 
  meps_path = "C:/MEPS/h244.dat"  


# INSTALL PACKAGES ------------------------------------------------------------
# Uncomment and run this portion if packages are not yet installed
#
# install.packages("readr")


# LOAD PACKAGES ---------------------------------------------------------------
# Run this for every new R session

library(readr)


# DATA FILE INFO --------------------------------------------------------------

# Define start and end positions to read fixed-width file 

pos_start <- 
  c(1, 8, 11, 21, 23, 24, 25, 29, 30, 31, 32, 33, 34, 35, 36,
    38, 40, 42, 44, 46, 48, 50, 52, 54, 56, 58, 60, 62, 64, 66,
    68, 70, 72, 74, 76, 79, 82, 84, 86, 88, 90, 92, 94, 96, 98,
    100, 102, 104, 106, 108, 110, 112, 114, 116, 118, 120, 122,
    124, 126, 128, 130, 132, 134, 136, 138, 140, 142, 144, 146,
    148, 150, 152, 154, 157, 160, 163, 166, 169, 172, 175, 177,
    179, 180, 182, 184, 186, 188, 190, 192, 194, 196, 198, 200,
    202, 204, 206, 208, 210, 212, 214, 216, 218, 220, 224, 228,
    232, 236, 240, 242, 244, 246, 248, 250, 254, 258, 262, 266,
    270, 272, 274, 278, 282, 284, 286, 288, 290, 291, 293, 295,
    297, 299, 301, 303, 305, 307, 309, 311, 312, 314, 316, 318,
    320, 322, 324, 326, 328, 330, 332, 334, 336, 338, 340, 342,
    344, 346, 348, 350, 352, 354, 356, 358, 360, 364, 365, 366,
    368, 369, 370, 371, 372, 373, 374, 376, 378, 380, 382, 384,
    386, 388, 391, 394, 397, 400, 403, 406, 409, 412, 415, 418,
    421, 424, 427, 430, 432, 434, 436, 438, 440, 442, 444, 446,
    448, 450, 452, 454, 456, 458, 460, 462, 464, 466, 468, 470,
    472, 474, 476, 478, 480, 482, 485, 488, 491, 494, 497, 500,
    503, 506, 509, 512, 514, 516, 518, 520, 522, 524, 526, 528,
    530, 532, 534, 536, 538, 540, 542, 544, 546, 548, 550, 552,
    554, 556, 558, 560, 562, 564, 566, 568, 570, 572, 574, 576,
    578, 580, 582, 584, 586, 588, 590, 592, 594, 596, 599, 601,
    603, 605, 607, 609, 611, 613, 615, 617, 619, 621, 623, 625,
    627, 629, 631, 633, 635, 637, 639, 641, 643, 645, 647, 649,
    651, 653, 655, 657, 659, 661, 663, 665, 667, 669, 671, 673,
    675, 677, 679, 681, 684, 687, 689, 691, 693, 695, 697, 699,
    701, 703, 705, 707, 709, 711, 713, 715, 717, 719, 721, 723,
    725, 727, 729, 731, 733, 735, 737, 739, 741, 743, 745, 747,
    749, 751, 753, 756, 760, 762, 764, 766, 768, 770, 772, 774,
    776, 779, 781, 784, 786, 789, 791, 794, 796, 799, 801, 804,
    806, 809, 811, 814, 816, 818, 820, 822, 824, 826, 828, 830,
    832, 834, 836, 838, 840, 842, 844, 846, 848, 850, 852, 854,
    856, 858, 860, 862, 864, 866, 868, 871, 874, 876, 878, 880,
    882, 884, 886, 888, 890, 892, 894, 896, 898, 900, 902, 904,
    906, 908, 910, 912, 914, 916, 918, 920, 922, 924, 926, 928,
    930, 932, 934, 936, 938, 940, 942, 947, 949, 951, 953, 955,
    957, 959, 961, 963, 965, 967, 969, 971, 973, 975, 977, 979,
    981, 983, 985, 987, 989, 991, 993, 995, 997, 999, 1001,
    1003, 1005, 1007, 1009, 1011, 1013, 1015, 1017, 1019, 1021,
    1023, 1025, 1027, 1029, 1031, 1033, 1035, 1037, 1039, 1041,
    1043, 1045, 1048, 1051, 1054, 1057, 1060, 1063, 1066, 1069,
    1072, 1075, 1078, 1081, 1084, 1087, 1090, 1093, 1096, 1099,
    1102, 1105, 1108, 1111, 1114, 1117, 1120, 1123, 1126, 1129,
    1132, 1135, 1138, 1141, 1144, 1147, 1150, 1153, 1156, 1159,
    1162, 1165, 1168, 1171, 1174, 1177, 1180, 1183, 1186, 1189,
    1192, 1195, 1198, 1201, 1204, 1207, 1210, 1213, 1216, 1219,
    1222, 1225, 1228, 1231, 1234, 1237, 1240, 1243, 1246, 1249,
    1252, 1255, 1258, 1261, 1264, 1267, 1270, 1273, 1276, 1279,
    1282, 1285, 1288, 1291, 1294, 1297, 1300, 1303, 1306, 1309,
    1312, 1315, 1318, 1321, 1324, 1327, 1330, 1333, 1336, 1339,
    1342, 1345, 1348, 1351, 1354, 1356, 1359, 1361, 1364, 1367,
    1370, 1372, 1375, 1378, 1380, 1383, 1386, 1389, 1392, 1395,
    1397, 1400, 1402, 1405, 1411, 1417, 1423, 1429, 1431, 1433,
    1436, 1439, 1443, 1447, 1449, 1451, 1456, 1458, 1460, 1462,
    1464, 1467, 1470, 1473, 1476, 1479, 1482, 1485, 1488, 1491,
    1494, 1497, 1500, 1503, 1506, 1509, 1512, 1515, 1518, 1521,
    1524, 1527, 1530, 1533, 1536, 1539, 1542, 1545, 1548, 1551,
    1554, 1557, 1560, 1563, 1566, 1569, 1572, 1575, 1578, 1581,
    1584, 1587, 1590, 1593, 1596, 1599, 1602, 1605, 1608, 1611,
    1614, 1617, 1620, 1622, 1624, 1626, 1628, 1630, 1632, 1634,
    1636, 1638, 1640, 1643, 1646, 1649, 1652, 1654, 1657, 1660,
    1663, 1666, 1669, 1672, 1675, 1678, 1681, 1684, 1687, 1690,
    1693, 1696, 1699, 1702, 1705, 1708, 1711, 1714, 1717, 1720,
    1723, 1726, 1729, 1732, 1735, 1738, 1741, 1744, 1747, 1750,
    1753, 1756, 1759, 1762, 1765, 1768, 1771, 1774, 1777, 1780,
    1783, 1786, 1789, 1792, 1795, 1798, 1801, 1804, 1807, 1810,
    1813, 1816, 1819, 1822, 1825, 1828, 1831, 1834, 1837, 1840,
    1843, 1847, 1850, 1853, 1856, 1859, 1862, 1865, 1868, 1870,
    1872, 1874, 1876, 1878, 1880, 1882, 1884, 1886, 1888, 1890,
    1892, 1894, 1896, 1898, 1900, 1902, 1904, 1906, 1908, 1910,
    1912, 1914, 1916, 1918, 1920, 1922, 1924, 1926, 1928, 1930,
    1932, 1934, 1936, 1938, 1940, 1942, 1944, 1946, 1948, 1950,
    1952, 1954, 1956, 1958, 1960, 1962, 1964, 1966, 1968, 1970,
    1972, 1974, 1976, 1978, 1980, 1982, 1984, 1986, 1988, 1990,
    1992, 1994, 1996, 1998, 2000, 2002, 2004, 2006, 2008, 2010,
    2012, 2014, 2016, 2018, 2020, 2022, 2025, 2028, 2031, 2034,
    2037, 2039, 2041, 2044, 2047, 2050, 2053, 2056, 2058, 2060,
    2066, 2072, 2078, 2084, 2090, 2092, 2094, 2095, 2097, 2099,
    2102, 2105, 2108, 2111, 2114, 2117, 2120, 2123, 2126, 2132,
    2138, 2144, 2150, 2153, 2156, 2159, 2162, 2165, 2168, 2171,
    2174, 2177, 2180, 2183, 2186, 2189, 2192, 2195, 2198, 2201,
    2204, 2207, 2210, 2213, 2216, 2219, 2222, 2225, 2228, 2231,
    2234, 2237, 2240, 2243, 2246, 2249, 2252, 2255, 2258, 2261,
    2264, 2267, 2270, 2273, 2276, 2279, 2282, 2285, 2288, 2291,
    2294, 2297, 2300, 2302, 2304, 2307, 2309, 2311, 2314, 2317,
    2320, 2323, 2325, 2327, 2329, 2331, 2334, 2337, 2340, 2343,
    2346, 2350, 2354, 2358, 2362, 2366, 2369, 2372, 2375, 2378,
    2381, 2384, 2387, 2390, 2393, 2396, 2399, 2402, 2405, 2408,
    2411, 2414, 2417, 2420, 2423, 2426, 2429, 2432, 2435, 2438,
    2441, 2444, 2447, 2450, 2453, 2456, 2459, 2462, 2465, 2468,
    2471, 2474, 2477, 2480, 2483, 2486, 2489, 2492, 2495, 2498,
    2501, 2504, 2507, 2510, 2513, 2516, 2519, 2522, 2524, 2526,
    2528, 2530, 2532, 2534, 2536, 2538, 2540, 2542, 2545, 2548,
    2551, 2554, 2557, 2559, 2561, 2563, 2565, 2567, 2569, 2571,
    2573, 2575, 2577, 2579, 2581, 2583, 2585, 2587, 2590, 2593,
    2596, 2599, 2602, 2604, 2606, 2608, 2610, 2612, 2614, 2616,
    2618, 2620, 2622, 2624, 2626, 2628, 2630, 2632, 2638, 2644,
    2650, 2656, 2662, 2664, 2666, 2668, 2670, 2672, 2674, 2676,
    2678, 2680, 2682, 2684, 2686, 2688, 2690, 2692, 2694, 2696,
    2698, 2700, 2702, 2704, 2706, 2708, 2710, 2712, 2714, 2716,
    2718, 2720, 2722, 2724, 2726, 2728, 2730, 2732, 2734, 2736,
    2738, 2740, 2742, 2744, 2746, 2748, 2750, 2752, 2755, 2758,
    2760, 2762, 2764, 2766, 2768, 2770, 2774, 2778, 2784, 2791,
    2797, 2804, 2806, 2808, 2815, 2823, 2829, 2835, 2837, 2839,
    2845, 2851, 2853, 2855, 2860, 2865, 2867, 2869, 2874, 2879,
    2881, 2883, 2888, 2893, 2895, 2897, 2902, 2907, 2909, 2911,
    2917, 2924, 2926, 2928, 2933, 2939, 2941, 2943, 2948, 2953,
    2955, 2957, 2963, 2970, 2972, 2974, 2979, 2984, 2986, 2988,
    2993, 2998, 3000, 3002, 3007, 3012, 3014, 3016, 3021, 3026,
    3028, 3030, 3035, 3040, 3042, 3044, 3049, 3054, 3056, 3058,
    3062, 3066, 3068, 3070, 3075, 3081, 3083, 3085, 3094, 3103,
    3105, 3107, 3109, 3111, 3113, 3115, 3117, 3119, 3121, 3123,
    3125, 3127, 3129, 3131, 3133, 3135, 3137, 3139, 3141, 3143,
    3145, 3147, 3149, 3151, 3153, 3155, 3157, 3159, 3161, 3163,
    3165, 3167, 3169, 3171, 3173, 3175, 3177, 3179, 3181, 3183,
    3185, 3187, 3189, 3191, 3193, 3195, 3197, 3199, 3201, 3203,
    3205, 3207, 3209, 3211, 3213, 3215, 3217, 3219, 3221, 3223,
    3225, 3227, 3229, 3231, 3233, 3235, 3237, 3239, 3241, 3243,
    3245, 3247, 3249, 3251, 3253, 3255, 3257, 3259, 3261, 3263,
    3265, 3267, 3269, 3271, 3273, 3275, 3277, 3279, 3281, 3283,
    3285, 3287, 3289, 3291, 3293, 3295, 3297, 3299, 3301, 3303,
    3305, 3307, 3309, 3311, 3313, 3315, 3317, 3319, 3321, 3323,
    3325, 3327, 3329, 3331, 3333, 3335, 3337, 3339, 3341, 3343,
    3345, 3347, 3349, 3351, 3353, 3355, 3357, 3359, 3361, 3363,
    3365, 3367, 3369, 3371, 3373, 3375, 3377, 3379, 3381, 3383,
    3385, 3387, 3389, 3391, 3393, 3395, 3397, 3399, 3401, 3403,
    3405, 3407, 3409, 3411, 3413, 3415, 3417, 3419, 3421, 3423,
    3425, 3427, 3429, 3431, 3433, 3435, 3437, 3439, 3441, 3443,
    3445, 3447, 3449, 3451, 3453, 3455, 3457, 3459, 3461, 3463,
    3465, 3467, 3469, 3471, 3473, 3475, 3477, 3479, 3481, 3483,
    3485, 3487, 3489, 3491, 3493, 3495, 3497, 3499, 3501, 3503,
    3505, 3507, 3509, 3511, 3513, 3515, 3517, 3519, 3521, 3523,
    3525, 3527, 3529, 3531, 3533, 3535, 3537, 3539, 3541, 3543,
    3545, 3547, 3549, 3551, 3553, 3555, 3557, 3559, 3561, 3563,
    3565, 3567, 3569, 3571, 3573, 3575, 3577, 3579, 3581, 3583,
    3585, 3587, 3589, 3591, 3593, 3595, 3597, 3599, 3601, 3603,
    3605, 3607, 3609, 3611, 3613, 3615, 3617, 3619, 3621, 3623,
    3625, 3627, 3629, 3631, 3633, 3635, 3637, 3639, 3641, 3643,
    3645, 3647, 3649, 3651, 3653, 3655, 3657, 3659, 3661, 3663,
    3665, 3667, 3669, 3671, 3673, 3675, 3677, 3679, 3681, 3683,
    3685, 3687, 3689, 3691, 3693, 3695, 3697, 3699, 3701, 3703,
    3705, 3707, 3709, 3711, 3713, 3715, 3717, 3719, 3721, 3723,
    3725, 3727, 3729, 3731, 3733, 3735, 3737, 3739, 3741, 3743,
    3745, 3747, 3749, 3751, 3753, 3755, 3757, 3759, 3761, 3763,
    3765, 3767, 3769, 3771, 3773, 3775, 3777, 3779, 3781, 3783,
    3785, 3787, 3789, 3791, 3793, 3795, 3797, 3799, 3801, 3803,
    3805, 3807, 3809, 3811, 3813, 3815, 3817, 3819, 3821, 3823,
    3825, 3827, 3829, 3831, 3833, 3835, 3837, 3839, 3841, 3843,
    3845, 3847, 3849, 3851, 3853, 3855, 3857, 3859, 3861, 3863,
    3865, 3867, 3869, 3871, 3873, 3875, 3877, 3879, 3881, 3883,
    3885, 3887, 3889, 3891, 3893, 3895, 3897, 3899, 3901, 3903,
    3905, 3907, 3909, 3911, 3913, 3915, 3917, 3919, 3921, 3923,
    3925, 3927, 3929, 3931, 3933, 3935, 3937, 3939, 3941, 3943,
    3945, 3947, 3949, 3951, 3953, 3955, 3957, 3959, 3961, 3963,
    3965, 3967, 3969, 3971, 3973, 3975, 3977, 3979, 3981, 3983,
    3985, 3987, 3989, 3991, 3993, 3995, 3997, 3999, 4001, 4003,
    4005, 4007, 4009, 4011, 4013, 4015, 4017, 4019, 4021, 4023,
    4025, 4027, 4029, 4031, 4033, 4035, 4037, 4039, 4041, 4043,
    4045, 4047, 4049, 4051, 4053, 4055, 4057, 4059, 4061, 4063,
    4065, 4067, 4069, 4071, 4073, 4075, 4077, 4079, 4081, 4083,
    4085, 4087, 4089, 4091, 4093, 4095, 4097, 4099, 4101, 4103,
    4105, 4107, 4109, 4111, 4113, 4115, 4117, 4119, 4121, 4123,
    4125, 4127, 4129, 4131, 4133, 4135, 4137, 4139, 4141, 4143,
    4145, 4147, 4149, 4151, 4153, 4155, 4157, 4159, 4161, 4163,
    4165, 4167, 4169, 4171, 4173, 4175, 4177, 4179, 4181, 4183,
    4185, 4187, 4189, 4191, 4193, 4195, 4197, 4199, 4201, 4203,
    4205, 4207, 4209, 4211, 4213, 4215, 4217, 4219, 4221, 4223,
    4225, 4227, 4229, 4231, 4233, 4235, 4237, 4239, 4241, 4243,
    4245, 4247, 4249, 4251, 4253, 4255, 4257, 4259, 4261, 4263,
    4265, 4267, 4269, 4271, 4273, 4275, 4277, 4279, 4281, 4283,
    4285, 4287, 4289, 4291, 4293, 4295, 4297, 4299, 4301, 4303,
    4305, 4307, 4309, 4311, 4313, 4315, 4317, 4319, 4321, 4323,
    4325, 4327, 4329, 4331, 4333, 4335, 4337, 4339, 4341, 4343,
    4345, 4347, 4349, 4351, 4353, 4355, 4357, 4359, 4361, 4363,
    4365, 4367, 4369, 4371, 4373, 4375, 4377, 4379, 4381, 4383,
    4385, 4387, 4389, 4391, 4393, 4395, 4397, 4399, 4401, 4403,
    4405, 4407, 4409, 4411, 4413, 4415, 4417, 4419, 4422, 4425,
    4428, 4431, 4434, 4437, 4440, 4443, 4446, 4449, 4452, 4455,
    4458, 4461, 4464, 4467, 4470, 4473, 4476, 4479, 4482, 4485,
    4488, 4491, 4494, 4497, 4500, 4503, 4506, 4509, 4512, 4515,
    4518, 4521, 4524, 4527, 4530, 4533, 4536, 4539, 4541, 4543,
    4546, 4549, 4553, 4557, 4559, 4561, 4563, 4565, 4567, 4569,
    4571, 4573, 4575, 4577, 4579, 4581, 4583, 4585, 4587, 4589,
    4591, 4593, 4595, 4597, 4599, 4601, 4603, 4605, 4607, 4609,
    4611, 4613, 4615, 4617, 4619, 4621, 4623, 4625, 4627, 4629,
    4631, 4633, 4635, 4637, 4639, 4641, 4643, 4645, 4647, 4649,
    4651, 4653, 4655, 4657, 4659, 4661, 4663, 4665, 4667, 4669,
    4671, 4673, 4675, 4677, 4679, 4681, 4683, 4685, 4687, 4689,
    4691, 4693, 4695, 4697, 4699, 4701, 4703, 4705, 4707, 4709,
    4711, 4713, 4715, 4717, 4719, 4721, 4723, 4725, 4727, 4729,
    4731, 4733, 4735, 4737, 4739, 4741, 4743, 4745, 4747, 4749,
    4751, 4753, 4755, 4757, 4759, 4761, 4763, 4765, 4767, 4769,
    4771, 4773, 4775, 4777, 4779, 4781, 4783, 4785, 4787, 4789,
    4791, 4793, 4795, 4797, 4799, 4801, 4803, 4805, 4807, 4809,
    4811, 4813, 4815, 4817, 4819, 4821, 4823, 4825, 4827, 4829,
    4831, 4833, 4835, 4837, 4839, 4841, 4843, 4845, 4847, 4849,
    4851, 4853, 4855, 4857, 4859, 4861, 4863, 4865, 4867, 4869,
    4871, 4873, 4875, 4877, 4879, 4881, 4883, 4885, 4887, 4889,
    4891, 4893, 4895, 4897, 4899, 4901, 4903, 4905, 4907, 4909,
    4911, 4913, 4915, 4917, 4919, 4921, 4923, 4925, 4927, 4929,
    4931, 4933, 4935, 4937, 4939, 4941, 4943, 4945, 4947, 4949,
    4951, 4953, 4955, 4957, 4959, 4961, 4963, 4965, 4967, 4969,
    4971, 4973, 4975, 4977, 4979, 4981, 4983, 4985, 4987, 4989,
    4991, 4993, 4995, 4997, 4999, 5001, 5003, 5005, 5007, 5009,
    5011, 5013, 5015, 5017, 5019, 5021, 5023, 5025, 5027, 5029,
    5031, 5033, 5035, 5037, 5039, 5041, 5043, 5045, 5047, 5049,
    5051, 5054, 5057, 5060, 5063, 5066, 5073, 5080, 5087, 5094,
    5099, 5105, 5111, 5117, 5124, 5131, 5137, 5143, 5149, 5155,
    5160, 5166, 5171, 5176, 5182, 5187, 5192, 5197, 5203, 5208,
    5214, 5220, 5226, 5231, 5234, 5237, 5244, 5251, 5257, 5263,
    5268, 5273, 5279, 5285, 5290, 5295, 5301, 5307, 5312, 5317,
    5322, 5327, 5331, 5336, 5342, 5346, 5351, 5356, 5362, 5367,
    5373, 5379, 5385, 5390, 5393, 5396, 5402, 5408, 5414, 5420,
    5425, 5430, 5436, 5442, 5447, 5452, 5458, 5463, 5468, 5473,
    5478, 5483, 5486, 5490, 5494, 5498, 5502, 5507, 5512, 5517,
    5523, 5528, 5533, 5538, 5541, 5544, 5550, 5556, 5562, 5568,
    5573, 5578, 5584, 5590, 5595, 5600, 5606, 5612, 5618, 5624,
    5629, 5634, 5638, 5641, 5645, 5648, 5653, 5658, 5663, 5667,
    5673, 5679, 5684, 5688, 5694, 5700, 5706, 5712, 5717, 5721,
    5727, 5733, 5738, 5743, 5749, 5755, 5761, 5767, 5772, 5777,
    5781, 5784, 5788, 5791, 5796, 5800, 5805, 5809, 5815, 5821,
    5826, 5830, 5835, 5840, 5846, 5852, 5857, 5862, 5867, 5872,
    5877, 5881, 5886, 5891, 5895, 5899, 5903, 5907, 5910, 5912,
    5914, 5917, 5922, 5926, 5930, 5934, 5939, 5944, 5948, 5952,
    5954, 5956, 5962, 5968, 5974, 5980, 5985, 5989, 5994, 6000,
    6005, 6010, 6016, 6022, 6027, 6032, 6037, 6042, 6046, 6049,
    6053, 6056, 6061, 6065, 6069, 6073, 6079, 6085, 6089, 6093,
    6098, 6103, 6109, 6115, 6120, 6125, 6129, 6134, 6139, 6143,
    6148, 6153, 6157, 6160, 6164, 6168, 6170, 6172, 6174, 6176,
    6180, 6184, 6187, 6191, 6196, 6201, 6204, 6208, 6210, 6212,
    6218, 6224, 6229, 6234, 6238, 6242, 6247, 6252, 6257, 6261,
    6266, 6271, 6275, 6279, 6283, 6287, 6291, 6295, 6299, 6302,
    6307, 6311, 6315, 6319, 6324, 6329, 6333, 6337, 6343, 6349,
    6354, 6359, 6363, 6367, 6372, 6377, 6381, 6385, 6390, 6395,
    6399, 6403, 6407, 6411, 6415, 6419, 6423, 6426, 6431, 6435,
    6439, 6443, 6448, 6453, 6457, 6461, 6466, 6470, 6475, 6480,
    6484, 6488, 6492, 6496, 6501, 6505, 6509, 6513, 6517, 6521,
    6524, 6527, 6529, 6532, 6534, 6536, 6539, 6542, 6545, 6548,
    6552, 6556, 6559, 6562, 6564, 6566, 6572, 6578, 6584, 6590,
    6595, 6601, 6607, 6613, 6618, 6623, 6629, 6635, 6640, 6645,
    6650, 6655, 6657, 6662, 6667, 6671, 6673, 6678, 6683, 6688,
    6694, 6700, 6705, 6710, 6716, 6722, 6728, 6734, 6739, 6745,
    6751, 6757, 6762, 6767, 6773, 6779, 6784, 6789, 6794, 6799,
    6801, 6806, 6811, 6815, 6817, 6822, 6827, 6831, 6837, 6843,
    6848, 6853, 6858, 6863, 6869, 6875, 6879, 6883, 6888, 6893,
    6897, 6902, 6907, 6912, 6916, 6920, 6924, 6928, 6930, 6932,
    6936, 6938, 6940, 6944, 6946, 6951, 6956, 6961, 6965, 6970,
    6972, 6975, 6977, 6979, 6984, 6989, 6994, 6999, 7004, 7009,
    7013, 7018, 7023, 7028, 7032, 7037, 7041, 7045, 7049, 7053,
    7057, 7061, 7064, 7067, 7069, 7071, 7075, 7078, 7082, 7087,
    7091, 7095, 7098, 7101, 7104, 7107, 7114, 7120, 7126, 7132,
    7135, 7139, 7144, 7149, 7155, 7161, 7167, 7173, 7178, 7183,
    7186, 7188, 7190, 7192, 7197, 7202, 7204, 7206, 7210, 7214,
    7220, 7226, 7231, 7236, 7239, 7242, 7247, 7253, 7258, 7263,
    7268, 7273, 7278, 7283, 7287, 7291, 7296, 7301, 7304, 7308,
    7311, 7315, 7317, 7319, 7321, 7323, 7325, 7327, 7331, 7335,
    7340, 7345, 7349, 7353, 7356, 7359, 7364, 7368, 7373, 7377,
    7381, 7385, 7388, 7391, 7396, 7399, 7403, 7407, 7411, 7415,
    7418, 7421, 7424, 7427, 7430, 7433, 7435, 7437, 7440, 7443,
    7447, 7451, 7454, 7457, 7462, 7468, 7473, 7478, 7483, 7488,
    7493, 7498, 7503, 7508, 7513, 7518, 7522, 7526, 7530, 7534,
    7537, 7541, 7545, 7548, 7552, 7556, 7561, 7565, 7570, 7575,
    7580, 7584, 7587, 7590, 7597, 7604, 7609, 7614, 7620, 7626,
    7633, 7640, 7646, 7652, 7658, 7663, 7668, 7674, 7679, 7684,
    7689, 7694, 7697, 7700, 7702, 7704, 7710, 7716, 7721, 7726,
    7727, 7731, 7744)

pos_end <- 
  c(7, 10, 20, 22, 23, 24, 28, 29, 30, 31, 32, 33, 34, 35, 37,
    39, 41, 43, 45, 47, 49, 51, 53, 55, 57, 59, 61, 63, 65, 67,
    69, 71, 73, 75, 78, 81, 83, 85, 87, 89, 91, 93, 95, 97, 99,
    101, 103, 105, 107, 109, 111, 113, 115, 117, 119, 121, 123,
    125, 127, 129, 131, 133, 135, 137, 139, 141, 143, 145, 147,
    149, 151, 153, 156, 159, 162, 165, 168, 171, 174, 176, 178,
    179, 181, 183, 185, 187, 189, 191, 193, 195, 197, 199, 201,
    203, 205, 207, 209, 211, 213, 215, 217, 219, 223, 227, 231,
    235, 239, 241, 243, 245, 247, 249, 253, 257, 261, 265, 269,
    271, 273, 277, 281, 283, 285, 287, 289, 290, 292, 294, 296,
    298, 300, 302, 304, 306, 308, 310, 311, 313, 315, 317, 319,
    321, 323, 325, 327, 329, 331, 333, 335, 337, 339, 341, 343,
    345, 347, 349, 351, 353, 355, 357, 359, 363, 364, 365, 367,
    368, 369, 370, 371, 372, 373, 375, 377, 379, 381, 383, 385,
    387, 390, 393, 396, 399, 402, 405, 408, 411, 414, 417, 420,
    423, 426, 429, 431, 433, 435, 437, 439, 441, 443, 445, 447,
    449, 451, 453, 455, 457, 459, 461, 463, 465, 467, 469, 471,
    473, 475, 477, 479, 481, 484, 487, 490, 493, 496, 499, 502,
    505, 508, 511, 513, 515, 517, 519, 521, 523, 525, 527, 529,
    531, 533, 535, 537, 539, 541, 543, 545, 547, 549, 551, 553,
    555, 557, 559, 561, 563, 565, 567, 569, 571, 573, 575, 577,
    579, 581, 583, 585, 587, 589, 591, 593, 595, 598, 600, 602,
    604, 606, 608, 610, 612, 614, 616, 618, 620, 622, 624, 626,
    628, 630, 632, 634, 636, 638, 640, 642, 644, 646, 648, 650,
    652, 654, 656, 658, 660, 662, 664, 666, 668, 670, 672, 674,
    676, 678, 680, 683, 686, 688, 690, 692, 694, 696, 698, 700,
    702, 704, 706, 708, 710, 712, 714, 716, 718, 720, 722, 724,
    726, 728, 730, 732, 734, 736, 738, 740, 742, 744, 746, 748,
    750, 752, 755, 759, 761, 763, 765, 767, 769, 771, 773, 775,
    778, 780, 783, 785, 788, 790, 793, 795, 798, 800, 803, 805,
    808, 810, 813, 815, 817, 819, 821, 823, 825, 827, 829, 831,
    833, 835, 837, 839, 841, 843, 845, 847, 849, 851, 853, 855,
    857, 859, 861, 863, 865, 867, 870, 873, 875, 877, 879, 881,
    883, 885, 887, 889, 891, 893, 895, 897, 899, 901, 903, 905,
    907, 909, 911, 913, 915, 917, 919, 921, 923, 925, 927, 929,
    931, 933, 935, 937, 939, 941, 946, 948, 950, 952, 954, 956,
    958, 960, 962, 964, 966, 968, 970, 972, 974, 976, 978, 980,
    982, 984, 986, 988, 990, 992, 994, 996, 998, 1000, 1002,
    1004, 1006, 1008, 1010, 1012, 1014, 1016, 1018, 1020, 1022,
    1024, 1026, 1028, 1030, 1032, 1034, 1036, 1038, 1040, 1042,
    1044, 1047, 1050, 1053, 1056, 1059, 1062, 1065, 1068, 1071,
    1074, 1077, 1080, 1083, 1086, 1089, 1092, 1095, 1098, 1101,
    1104, 1107, 1110, 1113, 1116, 1119, 1122, 1125, 1128, 1131,
    1134, 1137, 1140, 1143, 1146, 1149, 1152, 1155, 1158, 1161,
    1164, 1167, 1170, 1173, 1176, 1179, 1182, 1185, 1188, 1191,
    1194, 1197, 1200, 1203, 1206, 1209, 1212, 1215, 1218, 1221,
    1224, 1227, 1230, 1233, 1236, 1239, 1242, 1245, 1248, 1251,
    1254, 1257, 1260, 1263, 1266, 1269, 1272, 1275, 1278, 1281,
    1284, 1287, 1290, 1293, 1296, 1299, 1302, 1305, 1308, 1311,
    1314, 1317, 1320, 1323, 1326, 1329, 1332, 1335, 1338, 1341,
    1344, 1347, 1350, 1353, 1355, 1358, 1360, 1363, 1366, 1369,
    1371, 1374, 1377, 1379, 1382, 1385, 1388, 1391, 1394, 1396,
    1399, 1401, 1404, 1410, 1416, 1422, 1428, 1430, 1432, 1435,
    1438, 1442, 1446, 1448, 1450, 1455, 1457, 1459, 1461, 1463,
    1466, 1469, 1472, 1475, 1478, 1481, 1484, 1487, 1490, 1493,
    1496, 1499, 1502, 1505, 1508, 1511, 1514, 1517, 1520, 1523,
    1526, 1529, 1532, 1535, 1538, 1541, 1544, 1547, 1550, 1553,
    1556, 1559, 1562, 1565, 1568, 1571, 1574, 1577, 1580, 1583,
    1586, 1589, 1592, 1595, 1598, 1601, 1604, 1607, 1610, 1613,
    1616, 1619, 1621, 1623, 1625, 1627, 1629, 1631, 1633, 1635,
    1637, 1639, 1642, 1645, 1648, 1651, 1653, 1656, 1659, 1662,
    1665, 1668, 1671, 1674, 1677, 1680, 1683, 1686, 1689, 1692,
    1695, 1698, 1701, 1704, 1707, 1710, 1713, 1716, 1719, 1722,
    1725, 1728, 1731, 1734, 1737, 1740, 1743, 1746, 1749, 1752,
    1755, 1758, 1761, 1764, 1767, 1770, 1773, 1776, 1779, 1782,
    1785, 1788, 1791, 1794, 1797, 1800, 1803, 1806, 1809, 1812,
    1815, 1818, 1821, 1824, 1827, 1830, 1833, 1836, 1839, 1842,
    1846, 1849, 1852, 1855, 1858, 1861, 1864, 1867, 1869, 1871,
    1873, 1875, 1877, 1879, 1881, 1883, 1885, 1887, 1889, 1891,
    1893, 1895, 1897, 1899, 1901, 1903, 1905, 1907, 1909, 1911,
    1913, 1915, 1917, 1919, 1921, 1923, 1925, 1927, 1929, 1931,
    1933, 1935, 1937, 1939, 1941, 1943, 1945, 1947, 1949, 1951,
    1953, 1955, 1957, 1959, 1961, 1963, 1965, 1967, 1969, 1971,
    1973, 1975, 1977, 1979, 1981, 1983, 1985, 1987, 1989, 1991,
    1993, 1995, 1997, 1999, 2001, 2003, 2005, 2007, 2009, 2011,
    2013, 2015, 2017, 2019, 2021, 2024, 2027, 2030, 2033, 2036,
    2038, 2040, 2043, 2046, 2049, 2052, 2055, 2057, 2059, 2065,
    2071, 2077, 2083, 2089, 2091, 2093, 2094, 2096, 2098, 2101,
    2104, 2107, 2110, 2113, 2116, 2119, 2122, 2125, 2131, 2137,
    2143, 2149, 2152, 2155, 2158, 2161, 2164, 2167, 2170, 2173,
    2176, 2179, 2182, 2185, 2188, 2191, 2194, 2197, 2200, 2203,
    2206, 2209, 2212, 2215, 2218, 2221, 2224, 2227, 2230, 2233,
    2236, 2239, 2242, 2245, 2248, 2251, 2254, 2257, 2260, 2263,
    2266, 2269, 2272, 2275, 2278, 2281, 2284, 2287, 2290, 2293,
    2296, 2299, 2301, 2303, 2306, 2308, 2310, 2313, 2316, 2319,
    2322, 2324, 2326, 2328, 2330, 2333, 2336, 2339, 2342, 2345,
    2349, 2353, 2357, 2361, 2365, 2368, 2371, 2374, 2377, 2380,
    2383, 2386, 2389, 2392, 2395, 2398, 2401, 2404, 2407, 2410,
    2413, 2416, 2419, 2422, 2425, 2428, 2431, 2434, 2437, 2440,
    2443, 2446, 2449, 2452, 2455, 2458, 2461, 2464, 2467, 2470,
    2473, 2476, 2479, 2482, 2485, 2488, 2491, 2494, 2497, 2500,
    2503, 2506, 2509, 2512, 2515, 2518, 2521, 2523, 2525, 2527,
    2529, 2531, 2533, 2535, 2537, 2539, 2541, 2544, 2547, 2550,
    2553, 2556, 2558, 2560, 2562, 2564, 2566, 2568, 2570, 2572,
    2574, 2576, 2578, 2580, 2582, 2584, 2586, 2589, 2592, 2595,
    2598, 2601, 2603, 2605, 2607, 2609, 2611, 2613, 2615, 2617,
    2619, 2621, 2623, 2625, 2627, 2629, 2631, 2637, 2643, 2649,
    2655, 2661, 2663, 2665, 2667, 2669, 2671, 2673, 2675, 2677,
    2679, 2681, 2683, 2685, 2687, 2689, 2691, 2693, 2695, 2697,
    2699, 2701, 2703, 2705, 2707, 2709, 2711, 2713, 2715, 2717,
    2719, 2721, 2723, 2725, 2727, 2729, 2731, 2733, 2735, 2737,
    2739, 2741, 2743, 2745, 2747, 2749, 2751, 2754, 2757, 2759,
    2761, 2763, 2765, 2767, 2769, 2773, 2777, 2783, 2790, 2796,
    2803, 2805, 2807, 2814, 2822, 2828, 2834, 2836, 2838, 2844,
    2850, 2852, 2854, 2859, 2864, 2866, 2868, 2873, 2878, 2880,
    2882, 2887, 2892, 2894, 2896, 2901, 2906, 2908, 2910, 2916,
    2923, 2925, 2927, 2932, 2938, 2940, 2942, 2947, 2952, 2954,
    2956, 2962, 2969, 2971, 2973, 2978, 2983, 2985, 2987, 2992,
    2997, 2999, 3001, 3006, 3011, 3013, 3015, 3020, 3025, 3027,
    3029, 3034, 3039, 3041, 3043, 3048, 3053, 3055, 3057, 3061,
    3065, 3067, 3069, 3074, 3080, 3082, 3084, 3093, 3102, 3104,
    3106, 3108, 3110, 3112, 3114, 3116, 3118, 3120, 3122, 3124,
    3126, 3128, 3130, 3132, 3134, 3136, 3138, 3140, 3142, 3144,
    3146, 3148, 3150, 3152, 3154, 3156, 3158, 3160, 3162, 3164,
    3166, 3168, 3170, 3172, 3174, 3176, 3178, 3180, 3182, 3184,
    3186, 3188, 3190, 3192, 3194, 3196, 3198, 3200, 3202, 3204,
    3206, 3208, 3210, 3212, 3214, 3216, 3218, 3220, 3222, 3224,
    3226, 3228, 3230, 3232, 3234, 3236, 3238, 3240, 3242, 3244,
    3246, 3248, 3250, 3252, 3254, 3256, 3258, 3260, 3262, 3264,
    3266, 3268, 3270, 3272, 3274, 3276, 3278, 3280, 3282, 3284,
    3286, 3288, 3290, 3292, 3294, 3296, 3298, 3300, 3302, 3304,
    3306, 3308, 3310, 3312, 3314, 3316, 3318, 3320, 3322, 3324,
    3326, 3328, 3330, 3332, 3334, 3336, 3338, 3340, 3342, 3344,
    3346, 3348, 3350, 3352, 3354, 3356, 3358, 3360, 3362, 3364,
    3366, 3368, 3370, 3372, 3374, 3376, 3378, 3380, 3382, 3384,
    3386, 3388, 3390, 3392, 3394, 3396, 3398, 3400, 3402, 3404,
    3406, 3408, 3410, 3412, 3414, 3416, 3418, 3420, 3422, 3424,
    3426, 3428, 3430, 3432, 3434, 3436, 3438, 3440, 3442, 3444,
    3446, 3448, 3450, 3452, 3454, 3456, 3458, 3460, 3462, 3464,
    3466, 3468, 3470, 3472, 3474, 3476, 3478, 3480, 3482, 3484,
    3486, 3488, 3490, 3492, 3494, 3496, 3498, 3500, 3502, 3504,
    3506, 3508, 3510, 3512, 3514, 3516, 3518, 3520, 3522, 3524,
    3526, 3528, 3530, 3532, 3534, 3536, 3538, 3540, 3542, 3544,
    3546, 3548, 3550, 3552, 3554, 3556, 3558, 3560, 3562, 3564,
    3566, 3568, 3570, 3572, 3574, 3576, 3578, 3580, 3582, 3584,
    3586, 3588, 3590, 3592, 3594, 3596, 3598, 3600, 3602, 3604,
    3606, 3608, 3610, 3612, 3614, 3616, 3618, 3620, 3622, 3624,
    3626, 3628, 3630, 3632, 3634, 3636, 3638, 3640, 3642, 3644,
    3646, 3648, 3650, 3652, 3654, 3656, 3658, 3660, 3662, 3664,
    3666, 3668, 3670, 3672, 3674, 3676, 3678, 3680, 3682, 3684,
    3686, 3688, 3690, 3692, 3694, 3696, 3698, 3700, 3702, 3704,
    3706, 3708, 3710, 3712, 3714, 3716, 3718, 3720, 3722, 3724,
    3726, 3728, 3730, 3732, 3734, 3736, 3738, 3740, 3742, 3744,
    3746, 3748, 3750, 3752, 3754, 3756, 3758, 3760, 3762, 3764,
    3766, 3768, 3770, 3772, 3774, 3776, 3778, 3780, 3782, 3784,
    3786, 3788, 3790, 3792, 3794, 3796, 3798, 3800, 3802, 3804,
    3806, 3808, 3810, 3812, 3814, 3816, 3818, 3820, 3822, 3824,
    3826, 3828, 3830, 3832, 3834, 3836, 3838, 3840, 3842, 3844,
    3846, 3848, 3850, 3852, 3854, 3856, 3858, 3860, 3862, 3864,
    3866, 3868, 3870, 3872, 3874, 3876, 3878, 3880, 3882, 3884,
    3886, 3888, 3890, 3892, 3894, 3896, 3898, 3900, 3902, 3904,
    3906, 3908, 3910, 3912, 3914, 3916, 3918, 3920, 3922, 3924,
    3926, 3928, 3930, 3932, 3934, 3936, 3938, 3940, 3942, 3944,
    3946, 3948, 3950, 3952, 3954, 3956, 3958, 3960, 3962, 3964,
    3966, 3968, 3970, 3972, 3974, 3976, 3978, 3980, 3982, 3984,
    3986, 3988, 3990, 3992, 3994, 3996, 3998, 4000, 4002, 4004,
    4006, 4008, 4010, 4012, 4014, 4016, 4018, 4020, 4022, 4024,
    4026, 4028, 4030, 4032, 4034, 4036, 4038, 4040, 4042, 4044,
    4046, 4048, 4050, 4052, 4054, 4056, 4058, 4060, 4062, 4064,
    4066, 4068, 4070, 4072, 4074, 4076, 4078, 4080, 4082, 4084,
    4086, 4088, 4090, 4092, 4094, 4096, 4098, 4100, 4102, 4104,
    4106, 4108, 4110, 4112, 4114, 4116, 4118, 4120, 4122, 4124,
    4126, 4128, 4130, 4132, 4134, 4136, 4138, 4140, 4142, 4144,
    4146, 4148, 4150, 4152, 4154, 4156, 4158, 4160, 4162, 4164,
    4166, 4168, 4170, 4172, 4174, 4176, 4178, 4180, 4182, 4184,
    4186, 4188, 4190, 4192, 4194, 4196, 4198, 4200, 4202, 4204,
    4206, 4208, 4210, 4212, 4214, 4216, 4218, 4220, 4222, 4224,
    4226, 4228, 4230, 4232, 4234, 4236, 4238, 4240, 4242, 4244,
    4246, 4248, 4250, 4252, 4254, 4256, 4258, 4260, 4262, 4264,
    4266, 4268, 4270, 4272, 4274, 4276, 4278, 4280, 4282, 4284,
    4286, 4288, 4290, 4292, 4294, 4296, 4298, 4300, 4302, 4304,
    4306, 4308, 4310, 4312, 4314, 4316, 4318, 4320, 4322, 4324,
    4326, 4328, 4330, 4332, 4334, 4336, 4338, 4340, 4342, 4344,
    4346, 4348, 4350, 4352, 4354, 4356, 4358, 4360, 4362, 4364,
    4366, 4368, 4370, 4372, 4374, 4376, 4378, 4380, 4382, 4384,
    4386, 4388, 4390, 4392, 4394, 4396, 4398, 4400, 4402, 4404,
    4406, 4408, 4410, 4412, 4414, 4416, 4418, 4421, 4424, 4427,
    4430, 4433, 4436, 4439, 4442, 4445, 4448, 4451, 4454, 4457,
    4460, 4463, 4466, 4469, 4472, 4475, 4478, 4481, 4484, 4487,
    4490, 4493, 4496, 4499, 4502, 4505, 4508, 4511, 4514, 4517,
    4520, 4523, 4526, 4529, 4532, 4535, 4538, 4540, 4542, 4545,
    4548, 4552, 4556, 4558, 4560, 4562, 4564, 4566, 4568, 4570,
    4572, 4574, 4576, 4578, 4580, 4582, 4584, 4586, 4588, 4590,
    4592, 4594, 4596, 4598, 4600, 4602, 4604, 4606, 4608, 4610,
    4612, 4614, 4616, 4618, 4620, 4622, 4624, 4626, 4628, 4630,
    4632, 4634, 4636, 4638, 4640, 4642, 4644, 4646, 4648, 4650,
    4652, 4654, 4656, 4658, 4660, 4662, 4664, 4666, 4668, 4670,
    4672, 4674, 4676, 4678, 4680, 4682, 4684, 4686, 4688, 4690,
    4692, 4694, 4696, 4698, 4700, 4702, 4704, 4706, 4708, 4710,
    4712, 4714, 4716, 4718, 4720, 4722, 4724, 4726, 4728, 4730,
    4732, 4734, 4736, 4738, 4740, 4742, 4744, 4746, 4748, 4750,
    4752, 4754, 4756, 4758, 4760, 4762, 4764, 4766, 4768, 4770,
    4772, 4774, 4776, 4778, 4780, 4782, 4784, 4786, 4788, 4790,
    4792, 4794, 4796, 4798, 4800, 4802, 4804, 4806, 4808, 4810,
    4812, 4814, 4816, 4818, 4820, 4822, 4824, 4826, 4828, 4830,
    4832, 4834, 4836, 4838, 4840, 4842, 4844, 4846, 4848, 4850,
    4852, 4854, 4856, 4858, 4860, 4862, 4864, 4866, 4868, 4870,
    4872, 4874, 4876, 4878, 4880, 4882, 4884, 4886, 4888, 4890,
    4892, 4894, 4896, 4898, 4900, 4902, 4904, 4906, 4908, 4910,
    4912, 4914, 4916, 4918, 4920, 4922, 4924, 4926, 4928, 4930,
    4932, 4934, 4936, 4938, 4940, 4942, 4944, 4946, 4948, 4950,
    4952, 4954, 4956, 4958, 4960, 4962, 4964, 4966, 4968, 4970,
    4972, 4974, 4976, 4978, 4980, 4982, 4984, 4986, 4988, 4990,
    4992, 4994, 4996, 4998, 5000, 5002, 5004, 5006, 5008, 5010,
    5012, 5014, 5016, 5018, 5020, 5022, 5024, 5026, 5028, 5030,
    5032, 5034, 5036, 5038, 5040, 5042, 5044, 5046, 5048, 5050,
    5053, 5056, 5059, 5062, 5065, 5072, 5079, 5086, 5093, 5098,
    5104, 5110, 5116, 5123, 5130, 5136, 5142, 5148, 5154, 5159,
    5165, 5170, 5175, 5181, 5186, 5191, 5196, 5202, 5207, 5213,
    5219, 5225, 5230, 5233, 5236, 5243, 5250, 5256, 5262, 5267,
    5272, 5278, 5284, 5289, 5294, 5300, 5306, 5311, 5316, 5321,
    5326, 5330, 5335, 5341, 5345, 5350, 5355, 5361, 5366, 5372,
    5378, 5384, 5389, 5392, 5395, 5401, 5407, 5413, 5419, 5424,
    5429, 5435, 5441, 5446, 5451, 5457, 5462, 5467, 5472, 5477,
    5482, 5485, 5489, 5493, 5497, 5501, 5506, 5511, 5516, 5522,
    5527, 5532, 5537, 5540, 5543, 5549, 5555, 5561, 5567, 5572,
    5577, 5583, 5589, 5594, 5599, 5605, 5611, 5617, 5623, 5628,
    5633, 5637, 5640, 5644, 5647, 5652, 5657, 5662, 5666, 5672,
    5678, 5683, 5687, 5693, 5699, 5705, 5711, 5716, 5720, 5726,
    5732, 5737, 5742, 5748, 5754, 5760, 5766, 5771, 5776, 5780,
    5783, 5787, 5790, 5795, 5799, 5804, 5808, 5814, 5820, 5825,
    5829, 5834, 5839, 5845, 5851, 5856, 5861, 5866, 5871, 5876,
    5880, 5885, 5890, 5894, 5898, 5902, 5906, 5909, 5911, 5913,
    5916, 5921, 5925, 5929, 5933, 5938, 5943, 5947, 5951, 5953,
    5955, 5961, 5967, 5973, 5979, 5984, 5988, 5993, 5999, 6004,
    6009, 6015, 6021, 6026, 6031, 6036, 6041, 6045, 6048, 6052,
    6055, 6060, 6064, 6068, 6072, 6078, 6084, 6088, 6092, 6097,
    6102, 6108, 6114, 6119, 6124, 6128, 6133, 6138, 6142, 6147,
    6152, 6156, 6159, 6163, 6167, 6169, 6171, 6173, 6175, 6179,
    6183, 6186, 6190, 6195, 6200, 6203, 6207, 6209, 6211, 6217,
    6223, 6228, 6233, 6237, 6241, 6246, 6251, 6256, 6260, 6265,
    6270, 6274, 6278, 6282, 6286, 6290, 6294, 6298, 6301, 6306,
    6310, 6314, 6318, 6323, 6328, 6332, 6336, 6342, 6348, 6353,
    6358, 6362, 6366, 6371, 6376, 6380, 6384, 6389, 6394, 6398,
    6402, 6406, 6410, 6414, 6418, 6422, 6425, 6430, 6434, 6438,
    6442, 6447, 6452, 6456, 6460, 6465, 6469, 6474, 6479, 6483,
    6487, 6491, 6495, 6500, 6504, 6508, 6512, 6516, 6520, 6523,
    6526, 6528, 6531, 6533, 6535, 6538, 6541, 6544, 6547, 6551,
    6555, 6558, 6561, 6563, 6565, 6571, 6577, 6583, 6589, 6594,
    6600, 6606, 6612, 6617, 6622, 6628, 6634, 6639, 6644, 6649,
    6654, 6656, 6661, 6666, 6670, 6672, 6677, 6682, 6687, 6693,
    6699, 6704, 6709, 6715, 6721, 6727, 6733, 6738, 6744, 6750,
    6756, 6761, 6766, 6772, 6778, 6783, 6788, 6793, 6798, 6800,
    6805, 6810, 6814, 6816, 6821, 6826, 6830, 6836, 6842, 6847,
    6852, 6857, 6862, 6868, 6874, 6878, 6882, 6887, 6892, 6896,
    6901, 6906, 6911, 6915, 6919, 6923, 6927, 6929, 6931, 6935,
    6937, 6939, 6943, 6945, 6950, 6955, 6960, 6964, 6969, 6971,
    6974, 6976, 6978, 6983, 6988, 6993, 6998, 7003, 7008, 7012,
    7017, 7022, 7027, 7031, 7036, 7040, 7044, 7048, 7052, 7056,
    7060, 7063, 7066, 7068, 7070, 7074, 7077, 7081, 7086, 7090,
    7094, 7097, 7100, 7103, 7106, 7113, 7119, 7125, 7131, 7134,
    7138, 7143, 7148, 7154, 7160, 7166, 7172, 7177, 7182, 7185,
    7187, 7189, 7191, 7196, 7201, 7203, 7205, 7209, 7213, 7219,
    7225, 7230, 7235, 7238, 7241, 7246, 7252, 7257, 7262, 7267,
    7272, 7277, 7282, 7286, 7290, 7295, 7300, 7303, 7307, 7310,
    7314, 7316, 7318, 7320, 7322, 7324, 7326, 7330, 7334, 7339,
    7344, 7348, 7352, 7355, 7358, 7363, 7367, 7372, 7376, 7380,
    7384, 7387, 7390, 7395, 7398, 7402, 7406, 7410, 7414, 7417,
    7420, 7423, 7426, 7429, 7432, 7434, 7436, 7439, 7442, 7446,
    7450, 7453, 7456, 7461, 7467, 7472, 7477, 7482, 7487, 7492,
    7497, 7502, 7507, 7512, 7517, 7521, 7525, 7529, 7533, 7536,
    7540, 7544, 7547, 7551, 7555, 7560, 7564, 7569, 7574, 7579,
    7583, 7586, 7589, 7596, 7603, 7608, 7613, 7619, 7625, 7632,
    7639, 7645, 7651, 7657, 7662, 7667, 7673, 7678, 7683, 7688,
    7693, 7696, 7699, 7701, 7703, 7709, 7715, 7720, 7725, 7726,
    7730, 7743, 7756)

# Define variable names and types ('c' = character, 'n' = 'numeric') 

var_names <- 
  c("DUID", "PID", "DUPERSID", "PANEL", "YEARIND", "SAQRDS24",
    "DATAYEARY2", "ALL5RDS", "DIED", "INST", "MILITARY",
    "ENTRSRVY", "LEFTUS", "OTHER", "FAMID1", "FAMID2",
    "FAMID3", "FAMID4", "FAMID5", "FAMIDY1", "FAMIDY2",
    "FAMIDYR1", "FAMIDYR2", "CPSFAMY1", "CPSFAMY2", "FCSZY1",
    "FCSZY2", "FCRPY1", "FCRPY2", "RULETR1", "RULETR2",
    "RULETR3", "RULETR4", "RULETR5", "RULETRY1", "RULETRY2",
    "RUSIZE1", "RUSIZE2", "RUSIZE3", "RUSIZE4", "RUSIZE5",
    "RUSIZEY1", "RUSIZEY2", "RUCLAS1", "RUCLAS2", "RUCLAS3",
    "RUCLAS4", "RUCLAS5", "RUCLASY1", "RUCLASY2", "FAMSZE1",
    "FAMSZE2", "FAMSZE3", "FAMSZE4", "FAMSZE5", "FAMSZEY1",
    "FAMSZEY2", "FMRSY1", "FMRSY2", "FAMSY1", "FAMSY2",
    "FAMSZYR1", "FAMSZYR2", "FAMRFPY1", "FAMRFPY2", "REGION1",
    "REGION2", "REGION3", "REGION4", "REGION5", "REGIONY1",
    "REGIONY2", "REFPRS1", "REFPRS2", "REFPRS3", "REFPRS4",
    "REFPRS5", "REFPRSY1", "REFPRSY2", "RESP1", "RESP2",
    "RESP3", "RESP4", "RESP5", "RESPY1", "RESPY2", "PROXY1",
    "PROXY2", "PROXY3", "PROXY4", "PROXY5", "PROXYY1",
    "PROXYY2", "INTVLANG", "INTVTYPE3", "INTVTYPE4",
    "INTVTYPE5", "BEGRFM1", "BEGRFM2", "BEGRFM3", "BEGRFM4",
    "BEGRFM5", "BEGRFY1", "BEGRFY2", "BEGRFY3", "BEGRFY4",
    "BEGRFY5", "ENDRFM1", "ENDRFM2", "ENDRFM3", "ENDRFM4",
    "ENDRFM5", "ENDRFY1", "ENDRFY2", "ENDRFY3", "ENDRFY4",
    "ENDRFY5", "ENDRFMY1", "ENDRFMY2", "ENDRFYY1", "ENDRFYY2",
    "KEYNESY1", "KEYNESY2", "INSCOP1", "INSCOP2", "INSCOP3",
    "INSCOP4", "INSCOP5", "INSCOPY1", "INSCOPY2", "INSCY1",
    "INSCY2", "INSCPYR1", "INSCPYR2", "ELGRND1", "ELGRND2",
    "ELGRND3", "ELGRND4", "ELGRND5", "ELGRNDY1", "ELGRNDY2",
    "PSTATS1", "PSTATS2", "PSTATS3", "PSTATS4", "PSTATS5",
    "RURSLT1", "RURSLT2", "RURSLT3", "RURSLT4", "RURSLT5",
    "AGE1X", "AGE2X", "AGE3X", "AGE4X", "AGE5X", "AGEY1X",
    "AGEY2X", "AGELSTY1", "AGELSTY2", "DOBMM", "DOBYY", "SEX",
    "RACEV1X", "RACEV2X", "RACEAX", "RACEBX", "RACEWX",
    "RACETHX", "HISPANX", "HISPNCAT", "MARRY1X", "MARRY2X",
    "MARRY3X", "MARRY4X", "MARRY5X", "MARRYY1X", "MARRYY2X",
    "SPOUID1", "SPOUID2", "SPOUID3", "SPOUID4", "SPOUID5",
    "SPOUIDY1", "SPOUIDY2", "SPOUIN1", "SPOUIN2", "SPOUIN3",
    "SPOUIN4", "SPOUIN5", "SPOUINY1", "SPOUINY2", "EDUCYR",
    "HIDEG", "FTSTU1X", "FTSTU2X", "FTSTU3X", "FTSTU4X",
    "FTSTU5X", "FTSTUY1X", "FTSTUY2X", "ACTDTY1", "ACTDTY2",
    "ACTDTY3", "ACTDTY4", "ACTDTY5", "REFRL1X", "REFRL2X",
    "REFRL3X", "REFRL4X", "REFRL5X", "REFRLY1X", "REFRLY2X",
    "OTHLGSPK", "WHTLGSPK", "HWELLSPK", "BORNUSA", "YRSINUS",
    "MOPID1X", "MOPID2X", "MOPID3X", "MOPID4X", "MOPID5X",
    "DAPID1X", "DAPID2X", "DAPID3X", "DAPID4X", "DAPID5X",
    "RTHLTH1", "RTHLTH2", "RTHLTH3", "RTHLTH4", "RTHLTH5",
    "MNHLTH1", "MNHLTH2", "MNHLTH3", "MNHLTH4", "MNHLTH5",
    "HIBPDXY1", "HIBPDXY2", "HIBPAGY1", "HIBPAGY2", "BPMLDXY1",
    "BPMLDXY2", "CHDDXY1", "CHDDXY2", "CHDAGY1", "CHDAGY2",
    "ANGIDXY1", "ANGIDXY2", "ANGIAGY1", "ANGIAGY2", "MIDXY1",
    "MIDXY2", "MIAGY1", "MIAGY2", "OHRTDXY1", "OHRTDXY2",
    "OHRTAGY1", "OHRTAGY2", "OHRTTPY1", "OHRTTPY2", "STRKDXY1",
    "STRKDXY2", "STRKAGY1", "STRKAGY2", "EMPHDXY1", "EMPHDXY2",
    "EMPHAGY1", "EMPHAGY2", "CHBRON1", "CHBRON3", "CHOLDXY1",
    "CHOLDXY2", "CHOLAGY1", "CHOLAGY2", "CANCERY1", "CANCERY2",
    "CABLADY1", "CABLADY2", "CABREAY1", "CABREAY2", "CACERVY1",
    "CACERVY2", "CACOLOY1", "CACOLOY2", "CALUNGY1", "CALUNGY2",
    "CALYMPY1", "CALYMPY2", "CAMELAY1", "CAMELAY2", "CAOTHEY1",
    "CAOTHEY2", "CAPROSY1", "CAPROSY2", "CASKNMY1", "CASKNMY2",
    "CASKDKY1", "CASKDKY2", "CAUTERY1", "CAUTERY2",
    "DIABDXY1_M18", "DIABDXY2_M18", "DIABAGY1", "DIABAGY2",
    "JTPAIN1_M18", "JTPAIN3_M18", "ARTHDXY1", "ARTHDXY2",
    "ARTHTPY1", "ARTHTPY2", "ARTHAGY1", "ARTHAGY2", "ASTHDXY1",
    "ASTHDXY2", "ASTHAGY1", "ASTHAGY2", "ASSTIL1", "ASSTIL3",
    "ASATAK1", "ASATAK3", "ASTHEP1", "ASTHEP3", "ASACUT1",
    "ASACUT3", "ASMRCN1", "ASMRCN3", "ASPREV1", "ASPREV3",
    "ASDALY1", "ASDALY3", "ASPKFL1", "ASPKFL3", "ASEVFL1",
    "ASEVFL3", "ASWNFL1", "ASWNFL3", "ADHDADY1", "ADHDADY2",
    "ADHDAGY1", "ADHDAGY2", "COVIDEVER5", "LCEVER5",
    "COVSYMNOW5", "COVREDABIL5", "COVID12MO5", "COVMNTHX5",
    "COVYRDX5", "IADLHP1", "IADLHP3", "ADLHLP1", "ADLHLP3",
    "AIDHLP1", "AIDHLP3", "WLKLIM1", "WLKLIM3", "LFTDIF1",
    "LFTDIF3", "STPDIF1", "STPDIF3", "WLKDIF1", "WLKDIF3",
    "MILDIF1", "MILDIF3", "STNDIF1", "STNDIF3", "BENDIF1",
    "BENDIF3", "RCHDIF1", "RCHDIF3", "FNGRDF1", "FNGRDF3",
    "ACTLIM1", "ACTLIM3", "WRKLIM1", "WRKLIM3", "HSELIM1",
    "HSELIM3", "SCHLIM1", "SCHLIM3", "UNABLE1", "UNABLE3",
    "SOCLIM1", "SOCLIM3", "COGLIM1", "COGLIM3", "DFHEAR2",
    "DFHEAR4", "DFSEE2", "DFSEE4", "DFCOG2", "DFCOG4",
    "DFWLKC2", "DFWLKC4", "DFDRSB2", "DFDRSB4", "DFERND2",
    "DFERND4", "ANYLMIY1", "ANYLMIY2", "CHPMED2", "CHPMED4",
    "CHPMHB2", "CHPMHB4", "CHPMCN2", "CHPMCN4", "CHSERV2",
    "CHSERV4", "CHSRHB2", "CHSRHB4", "CHSRCN2", "CHSRCN4",
    "CHLIMI2", "CHLIMI4", "CHLIHB2", "CHLIHB4", "CHLICO2",
    "CHLICO4", "CHTHER2", "CHTHER4", "CHTHHB2", "CHTHHB4",
    "CHTHCO2", "CHTHCO4", "CHCOUN2", "CHCOUN4", "CHEMPB2",
    "CHEMPB4", "CSHCN2", "CSHCN4", "MESHGT4", "WHNHGT4",
    "MESWGT4", "WHNWGT4", "CHBMIX4", "MESVIS4", "EATHLT4",
    "WHNEAT4", "PHYSCL4", "WHNPHY4", "SAFEST4", "WHNSAF4",
    "BOOST4", "WHNBST4", "LAPBLT4", "WHNLAP4", "HELMET4",
    "WHNHEL4", "NOSMOK4", "WHNSMK4", "TIMALN4", "GETTRB2",
    "MOMPRO2", "DADPRO2", "UNHAP2", "SCHLBH2", "HAVFUN2",
    "ADUPRO2", "NERVAF2", "SIBPRO2", "KIDPRO2", "SPRPRO2",
    "SCHPRO2", "HOMEBH2", "CHILCR2", "CHILWW2", "CHRTCR2",
    "CHRTWW2", "CHAPPT2", "CHLIST2", "CHEXPL2", "CHRESP2",
    "CHPRTM2", "CHHECR2", "CHSPEC2_M18", "CHEYRE2_M18",
    "LSTETH3", "LSTETH5", "PHYEXE3", "PHYEXE5", "OFTSMK3",
    "OFTSMK5", "SAQELIY1", "SAQELIY2", "ADPROX2", "ADPROX4",
    "ADSEX4", "ADAGE4", "ADGENH2", "ADGENH4", "ADDAYA2",
    "ADDAYA4", "ADCLIM2", "ADCLIM4", "ADACLS2", "ADACLS4",
    "ADWKLM2", "ADWKLM4", "ADEMLS2", "ADEMLS4", "ADMWCF2",
    "ADMWCF4", "ADPAIN2", "ADPAIN4", "ADPCFL2", "ADPCFL4",
    "ADENGY2", "ADENGY4", "ADPRST2", "ADPRST4", "ADSOCA2",
    "ADSOCA4", "ADCOMPAN4", "ADLEFTOUT4", "ADISOL4", "ADNERV2",
    "ADNERV4", "ADHOPE2", "ADHOPE4", "ADREST2", "ADREST4",
    "ADSAD2", "ADSAD4", "ADEFRT2", "ADEFRT4", "ADWRTH2",
    "ADWRTH4", "K6SUM2", "K6SUM4", "ADINTR2", "ADINTR4",
    "ADDPRS2", "ADDPRS4", "PHQ22", "PHQ24", "ADSLEEP4",
    "ADDAYEXER4", "ADMINSEXER4", "ADASKALC4", "ADNUMDRK4",
    "ADRNK54_M20", "ADRNK44_M20", "ADOFTALC4", "ADSTAL4",
    "ADMNTRT4", "ADUNABTRT4", "ADPROBTRT4", "ADTRTEXP4",
    "ADLATERENT4", "ADLATEUTIL4", "ADMISSCCLN4", "ADDEBT4",
    "ADUNEXPEXP4", "ADBRTC4", "ADMDVT4", "ADFLST4", "ADWGHD4",
    "ADWTAD4", "ADTBAC4", "ADOFTB4", "ADQTTB4", "ADQTMD4",
    "ADQTHP4", "ADMOOD4", "ADBPCK4", "ADCHLC4", "ADPNEU4",
    "ADSHNG4", "ADNOAP4", "ADDSCU4", "ADCOLN4", "ADCLNS4",
    "ADSGMD4", "ADBLDS4", "ADPROS4", "ADPSAG4", "ADUTRM4",
    "ADPAP4", "ADPAPG4", "ADOSTP4", "ADBNDN4", "ADBRST4",
    "ADMMGR4", "ADINSA2", "ADINSB2", "ADRISK2", "ADOVER2",
    "ADILCR2", "ADILWW2", "ADRTCR2", "ADRTWW2", "ADAPPT2",
    "ADHECR2", "ADINST2", "ADEZUN2", "ADTLHW2", "ADFFRM2",
    "ADFHLP2", "ADEXPL2", "ADLIST2", "ADRESP2", "ADPRTM2",
    "ADSMOK2", "ADNSMK2", "ADSPCL2", "ADSNSP2", "VPCS2",
    "VPCS4", "VMCS2", "VMCS4", "VRFLAG2", "VRFLAG4", "ADCMPM2",
    "ADCMPM4", "ADCMPY2", "ADCMPY4", "ADLANG2", "ADLANG4",
    "ADBMI4", "DCSELIY1", "DCSELIY2", "DSDIA3", "DSDIA5",
    "DSA1C3", "DSA1C5", "DSFTY0R3", "DSFTY1R3", "DSFTY1R5",
    "DSFTY2R3", "DSFTY2R5", "DSFTY3R5", "DSFBY0R3", "DSFBY1R5",
    "DSFTNV3", "DSFTNV5", "DSEYY0R3", "DSEYY1R3", "DSEYY1R5",
    "DSEYY2R3", "DSEYY2R5", "DSEYY3R5", "DSEBY0R3", "DSEBY1R5",
    "DSEYNV3", "DSEYNV5", "DSCHY0R3", "DSCHY1R3", "DSCHY1R5",
    "DSCHY2R3", "DSCHY2R5", "DSCHY3R5", "DSCBY0R3", "DSCBY1R5",
    "DSCHNV3", "DSCHNV5", "DSFLY0R3", "DSFLY1R3", "DSFLY1R5",
    "DSFLY2R3", "DSFLY2R5", "DSFLY3R5", "DSVBY0R3", "DSVBY1R5",
    "DSFLNV3", "DSFLNV5", "DSKIDN3", "DSKIDN5", "DSEYPR3",
    "DSEYPR5", "DSDIET3", "DSDIET5", "DSMED3", "DSMED5",
    "DSINSU3", "DSINSU5", "DSCPCP3", "DSCPCP5", "DSCNPC3",
    "DSCNPC5", "DSCPHN3", "DSCPHN5", "DSCINT3", "DSCINT5",
    "DSCGRP3", "DSCGRP5", "DSCONF3", "DSCONF5", "DSPRX3",
    "DSPRX5", "SDOHELIG1", "SDLIFE1", "SDHOME1", "SDMEDCARE1",
    "SDPARKS1", "SDHLTHFOOD1", "SDSFCRIME1", "SDPUBTRANS1",
    "SDAFRDHOME1", "SDNOTRANS1", "SDLATERENT1", "SDLATEUTIL1",
    "SDSHUTUTIL1", "SDPROBPEST1", "SDPROBMOLD1", "SDPROBLEAD1",
    "SDPROBHEAT1", "SDPROBCOOK1", "SDPROBSMKDE1",
    "SDPROBLEAKS1", "SDPROBNONE1", "SDWRRYFD1", "SDNOFOOD1",
    "SDPAYBASICS1", "SDUNEXPEXP1", "SDMISSCCLN1", "SDDEBT1",
    "SDDAYEXER1", "SDMINSEXER1", "SDSTRESS1", "SDFAMILY1",
    "SDFRIENDS1", "SDCOMM1", "SDTLKPHN1", "SDGETTGT1",
    "SDCHURCH1", "SDCLUBORG1", "SDCOMPAN1", "SDLEFTOUT1",
    "SDISOL1", "SDENICPROD1", "SDDSCRMDR1", "SDDSCRMWRK1",
    "SDDSCRMJOB1", "SDDSCRMHS1", "SDDSCRMPOL1", "SDDSCRMPUB1",
    "SDDSCRMSTR1", "SDPHYSHURT1", "SDINSULT1", "SDTHRHARM1",
    "SDSCREAM1", "SDHMDEPR1", "SDHMALC1", "SDHMDRG1",
    "SDHMJAIL1", "SDHMDIV1", "SDHMBEAT1", "SDHURTCHLD1",
    "SDINSCHLD1", "SDTCHCHLD1", "SDTCHADLT1", "SDFRCSXCH1",
    "SDCMPM1", "SDCMPY1", "SDPROX1", "DDNWRKY1", "DDNWRKY2",
    "OTHDYSY1", "OTHDYSY2", "OTHNDDY1", "OTHNDDY2", "ACCELI2",
    "ACCELI4", "HAVEUS2", "HAVEUS4", "PRACTP2", "PRACTP4",
    "YNOUSC2_M18", "YNOUSC4_M18", "PROVTY2_M18", "PROVTY4_M18",
    "PLCTYP2", "PLCTYP4", "TMTKUS2", "TMTKUS4", "TYPEPE2",
    "TYPEPE4", "LOCATN2", "LOCATN4", "HSPLAP2", "HSPLAP4",
    "WHITPR2", "WHITPR4", "BLCKPR2", "BLCKPR4", "ASIANP2",
    "ASIANP4", "NATAMP2", "NATAMP4", "PACISP2", "PACISP4",
    "OTHRCP2", "OTHRCP4", "GENDRP2", "GENDRP4", "PHNREG2",
    "PHNREG4", "OFFHOU2", "OFFHOU4", "AFTHOU2", "AFTHOU4",
    "TREATM2", "TREATM4", "DECIDE2", "DECIDE4", "EXPLOP2",
    "EXPLOP4", "PRVSPK2", "PRVSPK4", "DLAYCA2", "DLAYCA4",
    "AFRDCA2", "AFRDCA4", "DLAYDN2", "DLAYDN4", "AFRDDN2",
    "AFRDDN4", "DLAYPM2", "DLAYPM4", "AFRDPM2", "AFRDPM4",
    "CVDLAYCA1", "CVDLAYCA2", "CVDLAYCA3", "CVDLAYDN1",
    "CVDLAYDN2", "CVDLAYDN3", "CVDLAYPM1", "CVDLAYPM2",
    "CVDLAYPM3", "CVVACCINE2", "CVVACCINE3", "COVAXEVR3",
    "COVAXEVR4", "COVAXEVR5", "BOOSTERSHOT3", "BOOSTERSHOT4",
    "COVAXNEW5", "EMPST1", "EMPST2", "EMPST3", "EMPST4",
    "EMPST5", "RNDFLG1", "RNDFLG3", "MORJOB1", "MORJOB2",
    "MORJOB3", "MORJOB4", "MORJOB5", "EVRWRKY1", "EVRWRKY2",
    "HRWG1X", "HRWG2X", "HRWG3X", "HRWG4X", "HRWG5X",
    "HRWGIM1", "HRWGIM2", "HRWGIM3", "HRWGIM4", "HRWGIM5",
    "HRHOW1", "HRHOW2", "HRHOW3", "HRHOW4", "HRHOW5",
    "DIFFWG2", "DIFFWG3", "DIFFWG4", "DIFFWG5", "NHRWG2",
    "NHRWG3", "NHRWG4", "NHRWG5", "HOUR1", "HOUR2", "HOUR3",
    "HOUR4", "HOUR5", "TEMPJB1", "TEMPJB2", "TEMPJB3",
    "TEMPJB4", "TEMPJB5", "SSNLJB1", "SSNLJB2", "SSNLJB3",
    "SSNLJB4", "SSNLJB5", "SELFCM1", "SELFCM2", "SELFCM3",
    "SELFCM4", "SELFCM5", "DISVW1X", "DISVW2X", "DISVW3X",
    "DISVW4X", "DISVW5X", "CHOIC1", "CHOIC2", "CHOIC3",
    "CHOIC4", "CHOIC5", "INDCAT1", "INDCAT2", "INDCAT3",
    "INDCAT4", "INDCAT5", "NUMEMP1", "NUMEMP2", "NUMEMP3",
    "NUMEMP4", "NUMEMP5", "MORE1", "MORE2", "MORE3", "MORE4",
    "MORE5", "UNION1", "UNION2", "UNION3", "UNION4", "UNION5",
    "NWK1", "NWK2", "NWK3", "NWK4", "NWK5", "CHGJ12", "CHGJ23",
    "CHGJ34", "CHGJ45", "YCHJ12", "YCHJ23", "YCHJ34", "YCHJ45",
    "STJBMM1", "STJBMM2", "STJBMM3", "STJBMM4", "STJBMM5",
    "STJBYY1", "STJBYY2", "STJBYY3", "STJBYY4", "STJBYY5",
    "EVRETIY1", "EVRETIY2", "OCCCAT1", "OCCCAT2", "OCCCAT3",
    "OCCCAT4", "OCCCAT5", "PAYVAC1", "PAYVAC2", "PAYVAC3",
    "PAYVAC4", "PAYVAC5", "SICPAY1", "SICPAY2", "SICPAY3",
    "SICPAY4", "SICPAY5", "PAYDR1", "PAYDR2", "PAYDR3",
    "PAYDR4", "PAYDR5", "RETPLN1", "RETPLN2", "RETPLN3",
    "RETPLN4", "RETPLN5", "BSNTY1", "BSNTY2", "BSNTY3",
    "BSNTY4", "BSNTY5", "JOBORG1", "JOBORG2", "JOBORG3",
    "JOBORG4", "JOBORG5", "HELD1X", "HELD2X", "HELD3X",
    "HELD4X", "HELD5X", "OFFER1X", "OFFER2X", "OFFER3X",
    "OFFER4X", "OFFER5X", "OFREMP1", "OFREMP2", "OFREMP3",
    "OFREMP4", "OFREMP5", "EMPST1H", "EMPST2H", "EMPST3H",
    "EMPST4H", "EMPST5H", "SLFCM1H", "SLFCM2H", "SLFCM3H",
    "SLFCM4H", "SLFCM5H", "NMEMP1H", "NMEMP2H", "NMEMP3H",
    "NMEMP4H", "NMEMP5H", "MORE1H", "MORE2H", "MORE3H",
    "MORE4H", "MORE5H", "INDCT1H", "INDCT2H", "INDCT3H",
    "INDCT4H", "INDCT5H", "OCCCT1H", "OCCCT2H", "OCCCT3H",
    "OCCCT4H", "OCCCT5H", "HOUR1H", "HOUR2H", "HOUR3H",
    "HOUR4H", "HOUR5H", "JBORG1H", "JBORG2H", "JBORG3H",
    "JBORG4H", "JBORG5H", "UNION1H", "UNION2H", "UNION3H",
    "UNION4H", "UNION5H", "BSNTY1H", "BSNTY2H", "BSNTY3H",
    "BSNTY4H", "BSNTY5H", "HRWG1H", "HRWG2H", "HRWG3H",
    "HRWG4H", "HRWG5H", "CMJHLD1", "CMJHLD2", "CMJHLD3",
    "CMJHLD4", "CMJHLD5", "OFFER1H", "OFFER2H", "OFFER3H",
    "OFFER4H", "OFFER5H", "OFEMP1H", "OFEMP2H", "OFEMP3H",
    "OFEMP4H", "OFEMP5H", "PYVAC1H", "PYVAC2H", "PYVAC3H",
    "PYVAC4H", "PYVAC5H", "SCPAY1H", "SCPAY2H", "SCPAY3H",
    "SCPAY4H", "SCPAY5H", "PAYDR1H", "PAYDR2H", "PAYDR3H",
    "PAYDR4H", "PAYDR5H", "RTPLN1H", "RTPLN2H", "RTPLN3H",
    "RTPLN4H", "RTPLN5H", "FILEDRY1", "FILEDRY2", "WILFILY1",
    "WILFILY2", "FLSTATY1", "FLSTATY2", "FILERY1", "FILERY2",
    "JTINRUY1", "JTINRUY2", "JNTPIDY1", "JNTPIDY2", "TAXFRMY1",
    "TAXFRMY2", "FOODSTY1", "FOODSTY2", "FOODMNY1", "FOODMNY2",
    "FOODVLY1", "FOODVLY2", "TTLPY1X", "TTLPY2X", "FAMINCY1",
    "FAMINCY2", "POVCATY1", "POVCATY2", "POVLEVY1", "POVLEVY2",
    "WAGEPY1X", "WAGEPY2X", "WAGIMPY1", "WAGIMPY2", "BUSNPY1X",
    "BUSNPY2X", "BUSIMPY1", "BUSIMPY2", "UNEMPY1X", "UNEMPY2X",
    "UNEIMPY1", "UNEIMPY2", "WCMPPY1X", "WCMPPY2X", "WCPIMPY1",
    "WCPIMPY2", "INTRPY1X", "INTRPY2X", "INTIMPY1", "INTIMPY2",
    "DIVDPY1X", "DIVDPY2X", "DIVIMPY1", "DIVIMPY2", "SALEPY1X",
    "SALEPY2X", "SALIMPY1", "SALIMPY2", "PENSPY1X", "PENSPY2X",
    "PENIMPY1", "PENIMPY2", "SSECPY1X", "SSECPY2X", "SSCIMPY1",
    "SSCIMPY2", "TRSTPY1X", "TRSTPY2X", "TRTIMPY1", "TRTIMPY2",
    "VETSPY1X", "VETSPY2X", "VETIMPY1", "VETIMPY2", "IRASPY1X",
    "IRASPY2X", "IRAIMPY1", "IRAIMPY2", "ALIMPY1X", "ALIMPY2X",
    "ALIIMPY1", "ALIIMPY2", "CHLDPY1X", "CHLDPY2X", "CHLIMPY1",
    "CHLIMPY2", "CASHPY1X", "CASHPY2X", "CSHIMPY1", "CSHIMPY2",
    "SSIPY1X", "SSIPY2X", "SSIIMPY1", "SSIIMPY2", "PUBPY1X",
    "PUBPY2X", "PUBIMPY1", "PUBIMPY2", "OTHRPY1X", "OTHRPY2X",
    "OTHIMPY1", "OTHIMPY2", "HIEUIDY1", "HIEUIDY2", "TRIJAY1X",
    "TRIJAY2X", "TRIFEY1X", "TRIFEY2X", "TRIMAY1X", "TRIMAY2X",
    "TRIAPY1X", "TRIAPY2X", "TRIMYY1X", "TRIMYY2X", "TRIJUY1X",
    "TRIJUY2X", "TRIJLY1X", "TRIJLY2X", "TRIAUY1X", "TRIAUY2X",
    "TRISEY1X", "TRISEY2X", "TRIOCY1X", "TRIOCY2X", "TRINOY1X",
    "TRINOY2X", "TRIDEY1X", "TRIDEY2X", "MCRJAY1", "MCRJAY2",
    "MCRFEY1", "MCRFEY2", "MCRMAY1", "MCRMAY2", "MCRAPY1",
    "MCRAPY2", "MCRMYY1", "MCRMYY2", "MCRJUY1", "MCRJUY2",
    "MCRJLY1", "MCRJLY2", "MCRAUY1", "MCRAUY2", "MCRSEY1",
    "MCRSEY2", "MCROCY1", "MCROCY2", "MCRNOY1", "MCRNOY2",
    "MCRDEY1", "MCRDEY2", "MCRJAY1X", "MCRJAY2X", "MCRFEY1X",
    "MCRFEY2X", "MCRMAY1X", "MCRMAY2X", "MCRAPY1X", "MCRAPY2X",
    "MCRMYY1X", "MCRMYY2X", "MCRJUY1X", "MCRJUY2X", "MCRJLY1X",
    "MCRJLY2X", "MCRAUY1X", "MCRAUY2X", "MCRSEY1X", "MCRSEY2X",
    "MCROCY1X", "MCROCY2X", "MCRNOY1X", "MCRNOY2X", "MCRDEY1X",
    "MCRDEY2X", "MCDJAY1", "MCDJAY2", "MCDFEY1", "MCDFEY2",
    "MCDMAY1", "MCDMAY2", "MCDAPY1", "MCDAPY2", "MCDMYY1",
    "MCDMYY2", "MCDJUY1", "MCDJUY2", "MCDJLY1", "MCDJLY2",
    "MCDAUY1", "MCDAUY2", "MCDSEY1", "MCDSEY2", "MCDOCY1",
    "MCDOCY2", "MCDNOY1", "MCDNOY2", "MCDDEY1", "MCDDEY2",
    "MCDJAY1X", "MCDJAY2X", "MCDFEY1X", "MCDFEY2X", "MCDMAY1X",
    "MCDMAY2X", "MCDAPY1X", "MCDAPY2X", "MCDMYY1X", "MCDMYY2X",
    "MCDJUY1X", "MCDJUY2X", "MCDJLY1X", "MCDJLY2X", "MCDAUY1X",
    "MCDAUY2X", "MCDSEY1X", "MCDSEY2X", "MCDOCY1X", "MCDOCY2X",
    "MCDNOY1X", "MCDNOY2X", "MCDDEY1X", "MCDDEY2X", "GVAJAY1",
    "GVAJAY2", "GVAFEY1", "GVAFEY2", "GVAMAY1", "GVAMAY2",
    "GVAAPY1", "GVAAPY2", "GVAMYY1", "GVAMYY2", "GVAJUY1",
    "GVAJUY2", "GVAJLY1", "GVAJLY2", "GVAAUY1", "GVAAUY2",
    "GVASEY1", "GVASEY2", "GVAOCY1", "GVAOCY2", "GVANOY1",
    "GVANOY2", "GVADEY1", "GVADEY2", "GVBJAY1", "GVBJAY2",
    "GVBFEY1", "GVBFEY2", "GVBMAY1", "GVBMAY2", "GVBAPY1",
    "GVBAPY2", "GVBMYY1", "GVBMYY2", "GVBJUY1", "GVBJUY2",
    "GVBJLY1", "GVBJLY2", "GVBAUY1", "GVBAUY2", "GVBSEY1",
    "GVBSEY2", "GVBOCY1", "GVBOCY2", "GVBNOY1", "GVBNOY2",
    "GVBDEY1", "GVBDEY2", "GVCJAY1", "GVCJAY2", "GVCFEY1",
    "GVCFEY2", "GVCMAY1", "GVCMAY2", "GVCAPY1", "GVCAPY2",
    "GVCMYY1", "GVCMYY2", "GVCJUY1", "GVCJUY2", "GVCJLY1",
    "GVCJLY2", "GVCAUY1", "GVCAUY2", "GVCSEY1", "GVCSEY2",
    "GVCOCY1", "GVCOCY2", "GVCNOY1", "GVCNOY2", "GVCDEY1",
    "GVCDEY2", "VAPJAY1", "VAPJAY2", "VAPFEY1", "VAPFEY2",
    "VAPMAY1", "VAPMAY2", "VAPAPY1", "VAPAPY2", "VAPMYY1",
    "VAPMYY2", "VAPJUY1", "VAPJUY2", "VAPJLY1", "VAPJLY2",
    "VAPAUY1", "VAPAUY2", "VAPSEY1", "VAPSEY2", "VAPOCY1",
    "VAPOCY2", "VAPNOY1", "VAPNOY2", "VAPDEY1", "VAPDEY2",
    "IHSJAY1", "IHSJAY2", "IHSFEY1", "IHSFEY2", "IHSMAY1",
    "IHSMAY2", "IHSAPY1", "IHSAPY2", "IHSMYY1", "IHSMYY2",
    "IHSJUY1", "IHSJUY2", "IHSJLY1", "IHSJLY2", "IHSAUY1",
    "IHSAUY2", "IHSSEY1", "IHSSEY2", "IHSOCY1", "IHSOCY2",
    "IHSNOY1", "IHSNOY2", "IHSDEY1", "IHSDEY2", "PUBJAY1X",
    "PUBJAY2X", "PUBFEY1X", "PUBFEY2X", "PUBMAY1X", "PUBMAY2X",
    "PUBAPY1X", "PUBAPY2X", "PUBMYY1X", "PUBMYY2X", "PUBJUY1X",
    "PUBJUY2X", "PUBJLY1X", "PUBJLY2X", "PUBAUY1X", "PUBAUY2X",
    "PUBSEY1X", "PUBSEY2X", "PUBOCY1X", "PUBOCY2X", "PUBNOY1X",
    "PUBNOY2X", "PUBDEY1X", "PUBDEY2X", "PEGJAY1", "PEGJAY2",
    "PEGFEY1", "PEGFEY2", "PEGMAY1", "PEGMAY2", "PEGAPY1",
    "PEGAPY2", "PEGMYY1", "PEGMYY2", "PEGJUY1", "PEGJUY2",
    "PEGJLY1", "PEGJLY2", "PEGAUY1", "PEGAUY2", "PEGSEY1",
    "PEGSEY2", "PEGOCY1", "PEGOCY2", "PEGNOY1", "PEGNOY2",
    "PEGDEY1", "PEGDEY2", "PDKJAY1", "PDKJAY2", "PDKFEY1",
    "PDKFEY2", "PDKMAY1", "PDKMAY2", "PDKAPY1", "PDKAPY2",
    "PDKMYY1", "PDKMYY2", "PDKJUY1", "PDKJUY2", "PDKJLY1",
    "PDKJLY2", "PDKAUY1", "PDKAUY2", "PDKSEY1", "PDKSEY2",
    "PDKOCY1", "PDKOCY2", "PDKNOY1", "PDKNOY2", "PDKDEY1",
    "PDKDEY2", "PNGJAY1", "PNGJAY2", "PNGFEY1", "PNGFEY2",
    "PNGMAY1", "PNGMAY2", "PNGAPY1", "PNGAPY2", "PNGMYY1",
    "PNGMYY2", "PNGJUY1", "PNGJUY2", "PNGJLY1", "PNGJLY2",
    "PNGAUY1", "PNGAUY2", "PNGSEY1", "PNGSEY2", "PNGOCY1",
    "PNGOCY2", "PNGNOY1", "PNGNOY2", "PNGDEY1", "PNGDEY2",
    "POGJAY1", "POGJAY2", "POGFEY1", "POGFEY2", "POGMAY1",
    "POGMAY2", "POGAPY1", "POGAPY2", "POGMYY1", "POGMYY2",
    "POGJUY1", "POGJUY2", "POGJLY1", "POGJLY2", "POGAUY1",
    "POGAUY2", "POGSEY1", "POGSEY2", "POGOCY1", "POGOCY2",
    "POGNOY1", "POGNOY2", "POGDEY1", "POGDEY2", "POEJAY1",
    "POEJAY2", "POEFEY1", "POEFEY2", "POEMAY1", "POEMAY2",
    "POEAPY1", "POEAPY2", "POEMYY1", "POEMYY2", "POEJUY1",
    "POEJUY2", "POEJLY1", "POEJLY2", "POEAUY1", "POEAUY2",
    "POESEY1", "POESEY2", "POEOCY1", "POEOCY2", "POENOY1",
    "POENOY2", "POEDEY1", "POEDEY2", "PNEJAY1", "PNEJAY2",
    "PNEFEY1", "PNEFEY2", "PNEMAY1", "PNEMAY2", "PNEAPY1",
    "PNEAPY2", "PNEMYY1", "PNEMYY2", "PNEJUY1", "PNEJUY2",
    "PNEJLY1", "PNEJLY2", "PNEAUY1", "PNEAUY2", "PNESEY1",
    "PNESEY2", "PNEOCY1", "PNEOCY2", "PNENOY1", "PNENOY2",
    "PNEDEY1", "PNEDEY2", "PRXJAY1", "PRXJAY2", "PRXFEY1",
    "PRXFEY2", "PRXMAY1", "PRXMAY2", "PRXAPY1", "PRXAPY2",
    "PRXMYY1", "PRXMYY2", "PRXJUY1", "PRXJUY2", "PRXJLY1",
    "PRXJLY2", "PRXAUY1", "PRXAUY2", "PRXSEY1", "PRXSEY2",
    "PRXOCY1", "PRXOCY2", "PRXNOY1", "PRXNOY2", "PRXDEY1",
    "PRXDEY2", "PRIJAY1", "PRIJAY2", "PRIFEY1", "PRIFEY2",
    "PRIMAY1", "PRIMAY2", "PRIAPY1", "PRIAPY2", "PRIMYY1",
    "PRIMYY2", "PRIJUY1", "PRIJUY2", "PRIJLY1", "PRIJLY2",
    "PRIAUY1", "PRIAUY2", "PRISEY1", "PRISEY2", "PRIOCY1",
    "PRIOCY2", "PRINOY1", "PRINOY2", "PRIDEY1", "PRIDEY2",
    "HPEJAY1", "HPEJAY2", "HPEFEY1", "HPEFEY2", "HPEMAY1",
    "HPEMAY2", "HPEAPY1", "HPEAPY2", "HPEMYY1", "HPEMYY2",
    "HPEJUY1", "HPEJUY2", "HPEJLY1", "HPEJLY2", "HPEAUY1",
    "HPEAUY2", "HPESEY1", "HPESEY2", "HPEOCY1", "HPEOCY2",
    "HPENOY1", "HPENOY2", "HPEDEY1", "HPEDEY2", "HPDJAY1",
    "HPDJAY2", "HPDFEY1", "HPDFEY2", "HPDMAY1", "HPDMAY2",
    "HPDAPY1", "HPDAPY2", "HPDMYY1", "HPDMYY2", "HPDJUY1",
    "HPDJUY2", "HPDJLY1", "HPDJLY2", "HPDAUY1", "HPDAUY2",
    "HPDSEY1", "HPDSEY2", "HPDOCY1", "HPDOCY2", "HPDNOY1",
    "HPDNOY2", "HPDDEY1", "HPDDEY2", "HPNJAY1", "HPNJAY2",
    "HPNFEY1", "HPNFEY2", "HPNMAY1", "HPNMAY2", "HPNAPY1",
    "HPNAPY2", "HPNMYY1", "HPNMYY2", "HPNJUY1", "HPNJUY2",
    "HPNJLY1", "HPNJLY2", "HPNAUY1", "HPNAUY2", "HPNSEY1",
    "HPNSEY2", "HPNOCY1", "HPNOCY2", "HPNNOY1", "HPNNOY2",
    "HPNDEY1", "HPNDEY2", "HPOJAY1", "HPOJAY2", "HPOFEY1",
    "HPOFEY2", "HPOMAY1", "HPOMAY2", "HPOAPY1", "HPOAPY2",
    "HPOMYY1", "HPOMYY2", "HPOJUY1", "HPOJUY2", "HPOJLY1",
    "HPOJLY2", "HPOAUY1", "HPOAUY2", "HPOSEY1", "HPOSEY2",
    "HPOOCY1", "HPOOCY2", "HPONOY1", "HPONOY2", "HPODEY1",
    "HPODEY2", "HPXJAY1", "HPXJAY2", "HPXFEY1", "HPXFEY2",
    "HPXMAY1", "HPXMAY2", "HPXAPY1", "HPXAPY2", "HPXMYY1",
    "HPXMYY2", "HPXJUY1", "HPXJUY2", "HPXJLY1", "HPXJLY2",
    "HPXAUY1", "HPXAUY2", "HPXSEY1", "HPXSEY2", "HPXOCY1",
    "HPXOCY2", "HPXNOY1", "HPXNOY2", "HPXDEY1", "HPXDEY2",
    "HPRJAY1", "HPRJAY2", "HPRFEY1", "HPRFEY2", "HPRMAY1",
    "HPRMAY2", "HPRAPY1", "HPRAPY2", "HPRMYY1", "HPRMYY2",
    "HPRJUY1", "HPRJUY2", "HPRJLY1", "HPRJLY2", "HPRAUY1",
    "HPRAUY2", "HPRSEY1", "HPRSEY2", "HPROCY1", "HPROCY2",
    "HPRNOY1", "HPRNOY2", "HPRDEY1", "HPRDEY2", "INSJAY1X",
    "INSJAY2X", "INSFEY1X", "INSFEY2X", "INSMAY1X", "INSMAY2X",
    "INSAPY1X", "INSAPY2X", "INSMYY1X", "INSMYY2X", "INSJUY1X",
    "INSJUY2X", "INSJLY1X", "INSJLY2X", "INSAUY1X", "INSAUY2X",
    "INSSEY1X", "INSSEY2X", "INSOCY1X", "INSOCY2X", "INSNOY1X",
    "INSNOY2X", "INSDEY1X", "INSDEY2X", "PRVEVY1", "PRVEVY2",
    "TRIEVY1", "TRIEVY2", "MCREVY1", "MCREVY2", "MCDEVY1",
    "MCDEVY2", "VAEVY1", "VAEVY2", "GVAEVY1", "GVAEVY2",
    "GVBEVY1", "GVBEVY2", "GVCEVY1", "GVCEVY2", "UNINSY1",
    "UNINSY2", "INSCOVY1", "INSCOVY2", "INSURCY1", "INSURCY2",
    "TRICH1X", "TRICH2X", "TRICH3X", "TRICH4X", "TRICHY1X",
    "TRICHY2X", "TRI1X", "TRI2X", "TRI3X", "TRI4X", "TRIY1X",
    "TRIY2X", "MCRPHDY2", "MCRPD1", "MCRPD2", "MCRPD3",
    "MCRPD4", "MCRPDY1", "MCRPDY2", "MCRPD1X", "MCRPD2X",
    "MCRPD3X", "MCRPD4X", "MCRPDY1X", "MCRPDY2X", "MCRPB1",
    "MCRPB2", "MCRPBY1", "MCRPHO1", "MCRPHO2", "MCRPHO3",
    "MCRPHO4", "MCRPHOY1", "MCRPHOY2", "MCDHMO1", "MCDHMO2",
    "MCDHMO3", "MCDHMO4", "MCDHMOY1", "MCDHMOY2", "MCDMC1",
    "MCDMC2", "MCDMC3", "MCDMC4", "MCDMCY1", "MCDMCY2",
    "PRVHMO1", "PRVHMO2", "PRVHMO3", "PRVHMO4", "PRVHMOY1",
    "PRVHMOY2", "FSAGT1", "FSAGT3", "HASFSA1", "HASFSA3",
    "PFSAMT1", "PFSAMT3", "PREVCOVR", "MORECOVR", "TRICR1X",
    "TRICR2X", "TRICR3X", "TRICR4X", "TRICR5X", "TRICRY1X",
    "TRICRY2X", "TRIAT1X", "TRIAT2X", "TRIAT3X", "TRIAT4X",
    "TRIAT5X", "TRIATY1X", "TRIATY2X", "MCAID1", "MCAID2",
    "MCAID3", "MCAID4", "MCAID5", "MCAIDY1", "MCAIDY2",
    "MCAID1X", "MCAID2X", "MCAID3X", "MCAID4X", "MCAID5X",
    "MCAIDY1X", "MCAIDY2X", "MCARE1", "MCARE2", "MCARE3",
    "MCARE4", "MCARE5", "MCAREY1", "MCAREY2", "MCARE1X",
    "MCARE2X", "MCARE3X", "MCARE4X", "MCARE5X", "MCAREY1X",
    "MCAREY2X", "MCDAT1X", "MCDAT2X", "MCDAT3X", "MCDAT4X",
    "MCDAT5X", "MCDATY1X", "MCDATY2X", "GOVTA1", "GOVTA2",
    "GOVTA3", "GOVTA4", "GOVTA5", "GOVTAY1", "GOVTAY2",
    "GOVAAT1", "GOVAAT2", "GOVAAT3", "GOVAAT4", "GOVAAT5",
    "GOVAATY1", "GOVAATY2", "GOVTB1", "GOVTB2", "GOVTB3",
    "GOVTB4", "GOVTB5", "GOVTBY1", "GOVTBY2", "GOVBAT1",
    "GOVBAT2", "GOVBAT3", "GOVBAT4", "GOVBAT5", "GOVBATY1",
    "GOVBATY2", "GOVTC1", "GOVTC2", "GOVTC3", "GOVTC4",
    "GOVTC5", "GOVTCY1", "GOVTCY2", "GOVCAT1", "GOVCAT2",
    "GOVCAT3", "GOVCAT4", "GOVCAT5", "GOVCATY1", "GOVCATY2",
    "VAPROG1", "VAPROG2", "VAPROG3", "VAPROG4", "VAPROG5",
    "VAPROGY1", "VAPROGY2", "VAPRAT1", "VAPRAT2", "VAPRAT3",
    "VAPRAT4", "VAPRAT5", "VAPRATY1", "VAPRATY2", "IHS1",
    "IHS2", "IHS3", "IHS4", "IHS5", "IHSY1", "IHSY2", "IHSAT1",
    "IHSAT2", "IHSAT3", "IHSAT4", "IHSAT5", "IHSATY1",
    "IHSATY2", "PRIDK1", "PRIDK2", "PRIDK3", "PRIDK4",
    "PRIDK5", "PRIDKY1", "PRIDKY2", "PRIEU1", "PRIEU2",
    "PRIEU3", "PRIEU4", "PRIEU5", "PRIEUY1", "PRIEUY2",
    "PRING1", "PRING2", "PRING3", "PRING4", "PRING5",
    "PRINGY1", "PRINGY2", "PRIOG1", "PRIOG2", "PRIOG3",
    "PRIOG4", "PRIOG5", "PRIOGY1", "PRIOGY2", "PRINEO1",
    "PRINEO2", "PRINEO3", "PRINEO4", "PRINEO5", "PRINEOY1",
    "PRINEOY2", "PRIEUO1", "PRIEUO2", "PRIEUO3", "PRIEUO4",
    "PRIEUO5", "PRIEUOY1", "PRIEUOY2", "PRSTX1", "PRSTX2",
    "PRSTX3", "PRSTX4", "PRSTX5", "PRSTXY1", "PRSTXY2",
    "PRIV1", "PRIV2", "PRIV3", "PRIV4", "PRIV5", "PRIVY1",
    "PRIVY2", "PRIVAT1", "PRIVAT2", "PRIVAT3", "PRIVAT4",
    "PRIVAT5", "PRIVATY1", "PRIVATY2", "PUB1X", "PUB2X",
    "PUB3X", "PUB4X", "PUB5X", "PUBY1X", "PUBY2X", "PUBAT1X",
    "PUBAT2X", "PUBAT3X", "PUBAT4X", "PUBAT5X", "PUBATY1X",
    "PUBATY2X", "VERFLG1", "VERFLG2", "VERFLG3", "VERFLG4",
    "VERFLGY1", "VERFLGY2", "INS1X", "INS2X", "INS3X", "INS4X",
    "INS5X", "INSY1X", "INSY2X", "INSAT1X", "INSAT2X",
    "INSAT3X", "INSAT4X", "INSAT5X", "INSATY1X", "INSATY2X",
    "DENTIN1", "DENTIN2", "DENTIN3", "DENTIN4", "DENTIN5_M23",
    "DNTINS1", "DNTINS3", "DNTINSY1", "DNTINSY2_M23",
    "PMEDIN1", "PMEDIN2", "PMEDIN3", "PMEDIN4", "PMEDIN5",
    "PMDINS1", "PMDINS3", "PMDINSY1", "PMDINSY2", "PROBPY2",
    "PROBPY4", "CRFMPY2", "CRFMPY4", "PYUNBL2", "PYUNBL4",
    "PMEDUP1", "PMEDUP2", "PMEDUP3", "PMEDUP4", "PMEDUP5",
    "PMEDPY1", "PMEDPY2", "PMEDPY3", "PMEDPY4", "PMEDPY5",
    "TOTTCHY1", "TOTTCHY2", "TOTEXPY1", "TOTEXPY2", "TOTSLFY1",
    "TOTSLFY2", "TOTMCRY1", "TOTMCRY2", "TOTMCDY1", "TOTMCDY2",
    "TOTPRVY1", "TOTPRVY2", "TOTVAY1", "TOTVAY2", "TOTTRIY1",
    "TOTTRIY2", "TOTOFDY1", "TOTOFDY2", "TOTSTLY1", "TOTSTLY2",
    "TOTWCPY1", "TOTWCPY2", "TOTOSRY1", "TOTOSRY2", "TOTPTRY1",
    "TOTPTRY2", "TOTOTHY1", "TOTOTHY2", "OBTOTVY1", "OBTOTVY2",
    "OBVTCHY1", "OBVTCHY2", "OBVEXPY1", "OBVEXPY2", "OBVSLFY1",
    "OBVSLFY2", "OBVMCRY1", "OBVMCRY2", "OBVMCDY1", "OBVMCDY2",
    "OBVPRVY1", "OBVPRVY2", "OBVVAY1", "OBVVAY2", "OBVTRIY1",
    "OBVTRIY2", "OBVOFDY1", "OBVOFDY2", "OBVSTLY1", "OBVSTLY2",
    "OBVWCPY1", "OBVWCPY2", "OBVOSRY1", "OBVOSRY2", "OBVPTRY1",
    "OBVPTRY2", "OBVOTHY1", "OBVOTHY2", "OBDRVY1", "OBDRVY2",
    "OBDTCHY1", "OBDTCHY2", "OBDEXPY1", "OBDEXPY2", "OBDSLFY1",
    "OBDSLFY2", "OBDMCRY1", "OBDMCRY2", "OBDMCDY1", "OBDMCDY2",
    "OBDPRVY1", "OBDPRVY2", "OBDVAY1", "OBDVAY2", "OBDTRIY1",
    "OBDTRIY2", "OBDOFDY1", "OBDOFDY2", "OBDSTLY1", "OBDSTLY2",
    "OBDWCPY1", "OBDWCPY2", "OBDOSRY1", "OBDOSRY2", "OBDPTRY1",
    "OBDPTRY2", "OBDOTHY1", "OBDOTHY2", "OPTOTVY1", "OPTOTVY2",
    "OPTTCHY1", "OPTTCHY2", "OPTEXPY1", "OPTEXPY2", "OPTSLFY1",
    "OPTSLFY2", "OPTMCRY1", "OPTMCRY2", "OPTMCDY1", "OPTMCDY2",
    "OPTPRVY1", "OPTPRVY2", "OPTVAY1", "OPTVAY2", "OPTTRIY1",
    "OPTTRIY2", "OPTOFDY1", "OPTOFDY2", "OPTSTLY1", "OPTSTLY2",
    "OPTWCPY1", "OPTWCPY2", "OPTOSRY1", "OPTOSRY2", "OPTPTRY1",
    "OPTPTRY2", "OPTOTHY1", "OPTOTHY2", "OPFTCHY1", "OPFTCHY2",
    "OPFEXPY1", "OPFEXPY2", "OPFSLFY1", "OPFSLFY2", "OPFMCRY1",
    "OPFMCRY2", "OPFMCDY1", "OPFMCDY2", "OPFPRVY1", "OPFPRVY2",
    "OPFVAY1", "OPFVAY2", "OPFTRIY1", "OPFTRIY2", "OPFOFDY1",
    "OPFOFDY2", "OPFSTLY1", "OPFSTLY2", "OPFWCPY1", "OPFWCPY2",
    "OPFOSRY1", "OPFOSRY2", "OPFPTRY1", "OPFPTRY2", "OPFOTHY1",
    "OPFOTHY2", "OPDEXPY1", "OPDEXPY2", "OPDTCHY1", "OPDTCHY2",
    "OPDSLFY1", "OPDSLFY2", "OPDMCRY1", "OPDMCRY2", "OPDMCDY1",
    "OPDMCDY2", "OPDPRVY1", "OPDPRVY2", "OPDVAY1", "OPDVAY2",
    "OPDTRIY1", "OPDTRIY2", "OPDOFDY1", "OPDOFDY2", "OPDSTLY1",
    "OPDSTLY2", "OPDWCPY1", "OPDWCPY2", "OPDOSRY1", "OPDOSRY2",
    "OPDPTRY1", "OPDPTRY2", "OPDOTHY1", "OPDOTHY2", "OPDRVY1",
    "OPDRVY2", "OPVTCHY1", "OPVTCHY2", "OPVEXPY1", "OPVEXPY2",
    "OPVSLFY1", "OPVSLFY2", "OPVMCRY1", "OPVMCRY2", "OPVMCDY1",
    "OPVMCDY2", "OPVPRVY1", "OPVPRVY2", "OPVVAY1", "OPVVAY2",
    "OPVTRIY1", "OPVTRIY2", "OPVOFDY1", "OPVOFDY2", "OPVSTLY1",
    "OPVSTLY2", "OPVWCPY1", "OPVWCPY2", "OPVOSRY1", "OPVOSRY2",
    "OPVPTRY1", "OPVPTRY2", "OPVOTHY1", "OPVOTHY2", "OPSEXPY1",
    "OPSEXPY2", "OPSTCHY1", "OPSTCHY2", "OPSSLFY1", "OPSSLFY2",
    "OPSMCRY1", "OPSMCRY2", "OPSMCDY1", "OPSMCDY2", "OPSPRVY1",
    "OPSPRVY2", "OPSVAY1", "OPSVAY2", "OPSTRIY1", "OPSTRIY2",
    "OPSOFDY1", "OPSOFDY2", "OPSSTLY1", "OPSSTLY2", "OPSWCPY1",
    "OPSWCPY2", "OPSOSRY1", "OPSOSRY2", "OPSPTRY1", "OPSPTRY2",
    "OPSOTHY1", "OPSOTHY2", "ERTOTY1", "ERTOTY2", "ERTTCHY1",
    "ERTTCHY2", "ERTEXPY1", "ERTEXPY2", "ERTSLFY1", "ERTSLFY2",
    "ERTMCRY1", "ERTMCRY2", "ERTMCDY1", "ERTMCDY2", "ERTPRVY1",
    "ERTPRVY2", "ERTVAY1", "ERTVAY2", "ERTTRIY1", "ERTTRIY2",
    "ERTOFDY1", "ERTOFDY2", "ERTSTLY1", "ERTSTLY2", "ERTWCPY1",
    "ERTWCPY2", "ERTOSRY1", "ERTOSRY2", "ERTPTRY1", "ERTPTRY2",
    "ERTOTHY1", "ERTOTHY2", "ERFTCHY1", "ERFTCHY2", "ERFEXPY1",
    "ERFEXPY2", "ERFSLFY1", "ERFSLFY2", "ERFMCRY1", "ERFMCRY2",
    "ERFMCDY1", "ERFMCDY2", "ERFPRVY1", "ERFPRVY2", "ERFVAY1",
    "ERFVAY2", "ERFTRIY1", "ERFTRIY2", "ERFOFDY1", "ERFOFDY2",
    "ERFSTLY1", "ERFSTLY2", "ERFWCPY1", "ERFWCPY2", "ERFOSRY1",
    "ERFOSRY2", "ERFPTRY1", "ERFPTRY2", "ERFOTHY1", "ERFOTHY2",
    "ERDEXPY1", "ERDEXPY2", "ERDTCHY1", "ERDTCHY2", "ERDSLFY1",
    "ERDSLFY2", "ERDMCRY1", "ERDMCRY2", "ERDMCDY1", "ERDMCDY2",
    "ERDPRVY1", "ERDPRVY2", "ERDVAY1", "ERDVAY2", "ERDTRIY1",
    "ERDTRIY2", "ERDOFDY1", "ERDOFDY2", "ERDSTLY1", "ERDSTLY2",
    "ERDWCPY1", "ERDWCPY2", "ERDOSRY1", "ERDOSRY2", "ERDPTRY1",
    "ERDPTRY2", "ERDOTHY1", "ERDOTHY2", "IPDISY1", "IPDISY2",
    "IPTEXPY1", "IPTEXPY2", "IPTTCHY1", "IPTTCHY2", "IPTSLFY1",
    "IPTSLFY2", "IPTMCRY1", "IPTMCRY2", "IPTMCDY1", "IPTMCDY2",
    "IPTPRVY1", "IPTPRVY2", "IPTVAY1", "IPTVAY2", "IPTTRIY1",
    "IPTTRIY2", "IPTOFDY1", "IPTOFDY2", "IPTSTLY1", "IPTSTLY2",
    "IPTWCPY1", "IPTWCPY2", "IPTOSRY1", "IPTOSRY2", "IPTPTRY1",
    "IPTPTRY2", "IPTOTHY1", "IPTOTHY2", "IPFEXPY1", "IPFEXPY2",
    "IPFTCHY1", "IPFTCHY2", "IPFSLFY1", "IPFSLFY2", "IPFMCRY1",
    "IPFMCRY2", "IPFMCDY1", "IPFMCDY2", "IPFPRVY1", "IPFPRVY2",
    "IPFVAY1", "IPFVAY2", "IPFTRIY1", "IPFTRIY2", "IPFOFDY1",
    "IPFOFDY2", "IPFSTLY1", "IPFSTLY2", "IPFWCPY1", "IPFWCPY2",
    "IPFOSRY1", "IPFOSRY2", "IPFPTRY1", "IPFPTRY2", "IPFOTHY1",
    "IPFOTHY2", "IPDEXPY1", "IPDEXPY2", "IPDTCHY1", "IPDTCHY2",
    "IPDSLFY1", "IPDSLFY2", "IPDMCRY1", "IPDMCRY2", "IPDMCDY1",
    "IPDMCDY2", "IPDPRVY1", "IPDPRVY2", "IPDVAY1", "IPDVAY2",
    "IPDTRIY1", "IPDTRIY2", "IPDOFDY1", "IPDOFDY2", "IPDSTLY1",
    "IPDSTLY2", "IPDWCPY1", "IPDWCPY2", "IPDOSRY1", "IPDOSRY2",
    "IPDPTRY1", "IPDPTRY2", "IPDOTHY1", "IPDOTHY2", "IPNGTDY1",
    "IPNGTDY2", "DVTOTY1", "DVTOTY2", "DVTTCHY1", "DVTTCHY2",
    "DVTEXPY1", "DVTEXPY2", "DVTSLFY1", "DVTSLFY2", "DVTMCRY1",
    "DVTMCRY2", "DVTMCDY1", "DVTMCDY2", "DVTPRVY1", "DVTPRVY2",
    "DVTVAY1", "DVTVAY2", "DVTTRIY1", "DVTTRIY2", "DVTOFDY1",
    "DVTOFDY2", "DVTSTLY1", "DVTSTLY2", "DVTWCPY1", "DVTWCPY2",
    "DVTOSRY1", "DVTOSRY2", "DVTPTRY1", "DVTPTRY2", "DVTOTHY1",
    "DVTOTHY2", "HHTOTDY1", "HHTOTDY2", "HHAGDY1", "HHAGDY2",
    "HHATCHY1", "HHATCHY2", "HHAEXPY1", "HHAEXPY2", "HHASLFY1",
    "HHASLFY2", "HHAMCRY1", "HHAMCRY2", "HHAMCDY1", "HHAMCDY2",
    "HHAPRVY1", "HHAPRVY2", "HHAVAY1", "HHAVAY2", "HHATRIY1",
    "HHATRIY2", "HHAOFDY1", "HHAOFDY2", "HHASTLY1", "HHASTLY2",
    "HHAWCPY1", "HHAWCPY2", "HHAOSRY1", "HHAOSRY2", "HHAPTRY1",
    "HHAPTRY2", "HHAOTHY1", "HHAOTHY2", "HHINDDY1", "HHINDDY2",
    "HHNTCHY1", "HHNTCHY2", "HHNEXPY1", "HHNEXPY2", "HHNSLFY1",
    "HHNSLFY2", "HHNMCDY1", "HHNMCDY2", "HHNMCRY1", "HHNMCRY2",
    "HHNPRVY1", "HHNPRVY2", "HHNVAY1", "HHNVAY2", "HHNTRIY1",
    "HHNTRIY2", "HHNOFDY1", "HHNOFDY2", "HHNSTLY1", "HHNSTLY2",
    "HHNWCPY1", "HHNWCPY2", "HHNOSRY1", "HHNOSRY2", "HHNPTRY1",
    "HHNPTRY2", "HHNOTHY1", "HHNOTHY2", "HHINFDY1", "HHINFDY2",
    "VISEXPY1", "VISEXPY2", "VISTCHY1", "VISTCHY2", "VISSLFY1",
    "VISSLFY2", "VISMCRY1", "VISMCRY2", "VISMCDY1", "VISMCDY2",
    "VISPRVY1", "VISPRVY2", "VISVAY1", "VISVAY2", "VISTRIY1",
    "VISTRIY2", "VISOFDY1", "VISOFDY2", "VISSTLY1", "VISSTLY2",
    "VISWCPY1", "VISWCPY2", "VISOSRY1", "VISOSRY2", "VISPTRY1",
    "VISPTRY2", "VISOTHY1", "VISOTHY2", "OTHTCHY1", "OTHTCHY2",
    "OTHEXPY1", "OTHEXPY2", "OTHSLFY1", "OTHSLFY2", "OTHMCRY1",
    "OTHMCRY2", "OTHMCDY1", "OTHMCDY2", "OTHPRVY1", "OTHPRVY2",
    "OTHVAY1", "OTHVAY2", "OTHTRIY1", "OTHTRIY2", "OTHOFDY1",
    "OTHOFDY2", "OTHSTLY1", "OTHSTLY2", "OTHWCPY1", "OTHWCPY2",
    "OTHOSRY1", "OTHOSRY2", "OTHPTRY1", "OTHPTRY2", "OTHOTHY1",
    "OTHOTHY2", "RXTOTY1", "RXTOTY2", "RXEXPY1", "RXEXPY2",
    "RXSLFY1", "RXSLFY2", "RXMCRY1", "RXMCRY2", "RXMCDY1",
    "RXMCDY2", "RXPRVY1", "RXPRVY2", "RXVAY1", "RXVAY2",
    "RXTRIY1", "RXTRIY2", "RXOFDY1", "RXOFDY2", "RXSTLY1",
    "RXSTLY2", "RXWCPY1", "RXWCPY2", "RXOSRY1", "RXOSRY2",
    "RXPTRY1", "RXPTRY2", "RXOTHY1", "RXOTHY2", "VARPSU",
    "VARSTR", "LONGWT", "LSAQWT")

var_types <- 
  c("n", "n", "c", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "c", "c", "c", "c", "c", "c", "c", "c", "c", "c",
    "c", "n", "n", "n", "n", "c", "c", "c", "c", "c", "c", "c",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "c", "c", "c", "c", "c", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "c", "c", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n", "n",
    "n")

var_types <- setNames(var_types, var_names)

# IMPORT ASCII (.dat) file ----------------------------------------------------

h244 <- read_fwf(
  meps_path,
  col_positions = 
    fwf_positions(
      start = pos_start, 
      end   = pos_end, 
      col_names = var_names),
  col_types = var_types)


# OPTIONAL: save as .Rdata file for easier loading ----------------------------
# Run this to save a permanent .Rdata file in the local working directory
#
# save(h244, file = "h244.Rdata")

# -----------------------------------------------------------------------------
# NOTES:
# 
#  1. This program has been tested on R version 3.6.0
#
#  2. This program will create a temporary data frame in R called 'h244'.
#     You must run the 'save' command to permanently save the data to a local
#     folder
# -----------------------------------------------------------------------------