ajdamico / asdfree

analyze survey data for free
http://asdfree.com/
GNU General Public License v3.0
612 stars 449 forks source link

two handshake failures nychvs and uspums #250

Closed ajdamico closed 7 years ago

ajdamico commented 7 years ago

R version 3.4.0 (2017-04-21) -- "You Stupid Darkness" Copyright (C) 2017 The R Foundation for Statistical Computing Platform: x86_64-w64-mingw32/x64 (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details.

Natural language support but running in an English locale

R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R.

devtools::install_github("ajdamico/lodown") Downloading GitHub repo ajdamico/lodown@master from URL https://api.github.com/repos/ajdamico/lodown/zipball/master Installing lodown "C:/PROGRA~1/R/R-34~1.0/bin/x64/R" --no-site-file --no-environ --no-save \ --no-restore --quiet CMD INSTALL \ "C:/Users/anthonyd/AppData/Local/Temp/RtmpEhyzMo/devtools39c8602b6695/ajdamico-lodown-f3680ff" \ --library="C:/Users/anthonyd/Documents/R/win-library/3.4" --install-tests

locally downloading nychvs

Downloading from URL

'https://www.census.gov/housing/nychvs/data/2005/lng05_occ02.dat'

to file

'C:\Users\anthonyd\AppData\Local\Temp\RtmpEhyzMo\file39c85fe3365'

lodown is now exiting unexpectedly. websites that host publicly-downloadable microdata change often and sometimes those changes cause this software to break. if the error call stack below appears to be a hiccup in your internet connection, then please verify your connectivity and retry the download. otherwise, please open a new issue at https://github.com/ajdamico/asdfree/issues with the contents of this error call stack and also the output of your sessionInfo().

[[1]] lodown::lodown("nychvs", output_dir = tempdir())

[[2]] withCallingHandlers(catalog <- load_fun(data_name = data_name, catalog, ...), error = function(e) { if (grepl("cannot allocate vector of size", e)) message(memory_note) else if (grepl("parameter must be specified", e)) message(parameter_note) else if (grepl("to install", e)) message(installation_note) else { message(unknown_error_note) print(sys.calls()) } })

[[3]] load_fun(data_name = data_name, catalog, ...)

[[4]] cachaca(catalog[i, "full_url"], tf, mode = "wb")

[[5]] rcurl_filesize(this_url)

[[6]] RCurl::getURL(url, nobody = 1L, header = 1L)

[[7]] curlPerform(curl = curl, .opts = opts, .encoding = .encoding)

[[8]] function (type, msg, asError = TRUE) { if (!is.character(type)) { i = match(type, CURLcodeValues) typeName = if (is.na(i)) character() else names(CURLcodeValues)[i] } typeName = gsub("^CURLE_", "", typeName) fun = (if (asError) stop else warning) fun(structure(list(message = msg, call = sys.call()), class = c(typeName, "GenericCurlError", "error", "condition"))) }(35L, "error:14077410:SSL routines:SSL23_GET_SERVER_HELLO:sslv3 alert handshake failure", TRUE)

[[9]] fun(structure(list(message = msg, call = sys.call()), class = c(typeName, "GenericCurlError", "error", "condition")))

[[10]] (function (e) { if (grepl("cannot allocate vector of size", e)) message(memory_note) else if (grepl("parameter must be specified", e)) message(parameter_note) else if (grepl("to install", e)) message(installation_note) else { message(unknown_error_note) print(sys.calls()) } })(list(message = "error:14077410:SSL routines:SSL23_GET_SERVERHELLO:sslv3 alert handshake failure", call = function (type, msg, asError = TRUE) { if (!is.character(type)) { i = match(type, CURLcodeValues) typeName = if (is.na(i)) character() else names(CURLcodeValues)[i] } typeName = gsub("^CURLE", "", typeName) fun = (if (asError) stop else warning) fun(structure(list(message = msg, call = sys.call()), class = c(typeName, "GenericCurlError", "error", "condition"))) }(35L, "error:14077410:SSL routines:SSL23_GET_SERVER_HELLO:sslv3 alert handshake failure", TRUE)))

Error in function (type, msg, asError = TRUE) : error:14077410:SSL routines:SSL23_GET_SERVER_HELLO:sslv3 alert handshake failure

ajdamico commented 7 years ago

R version 3.4.0 (2017-04-21) -- "You Stupid Darkness" Copyright (C) 2017 The R Foundation for Statistical Computing Platform: x86_64-w64-mingw32/x64 (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details.

Natural language support but running in an English locale

R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R.

lodown::lodown("uspums",output_dir=tempdir()) building catalog for uspums

locally downloading uspums

Downloading from URL

'https://www2.census.gov/census_1990/1990_PUMS_A/TOOLS/sas/PUMS.SAS'

to file

'C:\Users\anthonyd\AppData\Local\Temp\Rtmp6d8Vli\file171c6202307'

trying URL 'https://www2.census.gov/census_1990/1990_PUMS_A/TOOLS/sas/PUMS.SAS' Content type 'text/plain' length 8455 bytes downloaded 8455 bytes

Downloading from URL

'https://www2.census.gov/census_2000/datasets/PUMS/FivePercent/5%25_PUMS_record_layout.xls'

to file

'C:\Users\anthonyd\AppData\Local\Temp\Rtmp6d8Vli\file171c12285eba.xls'

trying URL 'https://www2.census.gov/census_2000/datasets/PUMS/FivePercent/5%25_PUMS_record_layout.xls' Content type 'application/vnd.ms-excel' length 440320 bytes (430 KB) downloaded 430 KB

Downloading from URL

'https://www2.census.gov/census_2010/12-Stateside_PUMS/2010%20PUMS%20Record%20Layout.xlsx'

to file

'C:\Users\anthonyd\AppData\Local\Temp\Rtmp6d8Vli\file171c3bf2792a.xlsx'

trying URL 'https://www2.census.gov/census_2010/12-Stateside_PUMS/2010%20PUMS%20Record%20Layout.xlsx' Content type 'application/vnd.openxmlformats-officedocument.spreadsheetml.sheet' length 43805 bytes (42 KB) downloaded 42 KB

Downloading from URL

'https://www2.census.gov/census_1990/pums_1990_b/PUMSBXCA.zip'

to file

'C:\Users\anthonyd\AppData\Local\Temp\Rtmp6d8Vli\file171c2a395920'

lodown is now exiting unexpectedly. websites that host publicly-downloadable microdata change often and sometimes those changes cause this software to break. if the error call stack below appears to be a hiccup in your internet connection, then please verify your connectivity and retry the download. otherwise, please open a new issue at https://github.com/ajdamico/asdfree/issues with the contents of this error call stack and also the output of your sessionInfo().

[[1]] lodown::lodown("uspums", output_dir = tempdir())

[[2]] withCallingHandlers(catalog <- load_fun(data_name = data_name, catalog, ...), error = function(e) { if (grepl("cannot allocate vector of size", e)) message(memory_note) else if (grepl("parameter must be specified", e)) message(parameter_note) else if (grepl("to install", e)) message(installation_note) else { message(unknown_error_note) print(sys.calls()) } })

[[3]] load_fun(data_name = data_name, catalog, ...)

[[4]] mapply(get.tsv, these_files, fileno = seq(length(these_files)), MoreArgs = list(zipped = unique_designs[i, "year"] == 1990, hh.stru = get(unique_designs[i, "hh_structure"]), person.stru = get(unique_designs[i, "person_structure"])))

[[5]] (function (fp, zipped, hh.stru, person.stru, fileno) { previous.warning.setting <- getOption("warn") previous.encoding <- getOption("encoding") on.exit(options(warn = previous.warning.setting)) on.exit(options(encoding = previous.encoding)) options(warn = 2) dlfile <- tempfile() txt_file <- tempfile() cachaca(fp, dlfile, mode = "wb") options(warn = previous.warning.setting) if (zipped) { tf_zip <- tempfile() tf_zip <- unzip_warn_fail(dlfile, exdir = tempdir()) txt_file <- tf_zip } else { file.copy(dlfile, txt_file) } tf.household <- tempfile() tf.person <- tempfile() incon <- file(txt_file, "r") outcon.household <- file(tf.household, "w") outcon.person <- file(tf.person, "w") line.num <- 0 while (length(line <- readLines(incon, 1, skipNul = TRUE)) > 0) { if (line.num > 1) { thisline.to.ascii <- try(line <- gsub("z", " ", line, fixed = TRUE), silent = TRUE) if (class(thisline.to.ascii) == "try-error") { line <- iconv(line, "", "ASCII", sub = " ") line <- gsub("z", " ", line, fixed = TRUE) } line <- gsub("m99", " 99", line, fixed = TRUE) line <- gsub("j", " ", line, fixed = TRUE) } line <- gsub("[^[:alnum:]///' ]", " ", line) line <- iconv(line, "", "ASCII", sub = " ") line <- gsub("P00083710210010540112000012110014100000028401800020193999910000000200000000000000000000000000000000000000p", "P0008371021001054011200001211001410000002840180002019399991000000020000000000000000000000000000000000000000", line, fixed = TRUE) line <- gsub("H000837 623180140050999900 90012801000002005122050000000531112111521", "H000837623180140050999900 90012801000002005122050000000531112111521", line, fixed = TRUE) if (substr(line, 1, 1) == "H") { writeLines(paste0(substr(line, 1, cumsum(abs(hh.stru$width))[nrow(hh.stru)]), stringr::str_pad(fileno, 10)), outcon.household) } if (substr(line, 1, 1) == "P") { writeLines(paste0(substr(line, 1, cumsum(abs(person.stru$width))[nrow(person.stru)]), stringr::strpad(fileno, 10)), outcon.person) } line.num <- line.num + 1 if (line.num%%10000 == 0) cat(" ", prettyNum(line.num, big.mark = ","), "census pums lines processed", "\r") } close(outcon.household) close(outcon.person) close(incon) hh.tsv <- tempfile() descr::fwf2csv(tf.household, hh.tsv, names = c(hh.stru$variable, "fileno"), begin = c(hh.stru$beg, hh.stru$end[nrow(hh.stru)] + 1), end = c(hh.stru$end, hh.stru$end[nrow(hh.stru)] + 10)) file.remove(tf.household) person.tsv <- tempfile() descr::fwf2csv(tf.person, person.tsv, names = c(person.stru$variable, "fileno"), begin = c(person.stru$beg, person.stru$end[nrow(person.stru)] + 1), end = c(person.stru$end, person.stru$end[nrow(person.stru)] + 10)) file.remove(tf.person) options(encoding = previous.encoding) c(hh.tsv, person.tsv) })(dots[[1L]][[1L]], fileno = dots[[2L]][[1L]], zipped = TRUE, hh.stru = list(varname = c("RECTYPE", "SERIALNO", "SAMPLE", "DIVISION", "STATE", "PUMA", "AREATYPE", "MSAPMSA", "PSA", "SUBSAMPL", "HOUSWGT", "PERSONS", "GQTYPE", NA, "UNITS1", "HUSFLAG", "PDSFLAG", "ROOMS", "TENURE", "ACREAGE", "COMMUSE", "VALUE", "RENT1", "MEALS", "VACANCY1", "VACANCY2", "VACANCY3", "VACANCY4", "YRMOVED", "BEDROOMS", "PLUMBING", "KITCHEN", "TELEPHON", "VEHICLES", "FUEL", "WATER", "SEWAGE", "YRBUILT", "CONDO", "ONEACRE", "AGSALES", "ELECCOST", "GASCOST", "WATRCOST", "FUELCOST", "PROPTAX", NA, "PROPINS", "MORTGAGE", "MORTGAG3", "TAXINCL", "INSINCL", "MORTGAG2", "MORTAMT2", "CONDOFEE", "MOBLHOME", "RFARM", "RGRENT", "RGRAPI", NA, "ROWNRCST", NA, "RNSMOCPI", "RRENTUNT", "RVALUNT", "RFAMINC", "RHHINC", "RWRKR89", "RHHLANG", "RLINGISO", "RHHFAMTP", "RNATADPT", "RSTPCHLD", "RFAMPERS", "RRELCHLD", "RNONREL", "R18UNDR", "R60OVER", "R65OVER", "RSUBFAM", "AUNITS1", "AROOMS", "ATENURE", "AACRES1", "ACOMMUSE", "AVALUE", "ARENT1", "AMEALS", "AVACNCY2", "AVACNCY3", "AVACNCY4", "AYRMOVED", "ABEDROOM", "APLUMBNG", "AKITCHEN", "APHONE", "AVEHICLE", "AFUEL", "AWATER", "ASEWER", "AYRBUILT", "ACONDO", "AONEACRE", "AAGSALES", "AELECCST", "AGASCST", "AWATRCST", "AFUELCST", "ATAXAMT", "AINSAMT", "AMORTG", "AMORTG3", "ATAXINCL", "AINSINCL", "AMORTG2", "AMRTAMT2", "ACNDOFEE", "AMOBLHME"), width = c(1, 7, 1, 1, 2, 5, 2, 4, 3, 2, 4, 2, 1, -3, 2, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 4, 4, 4, 4, 2, -3, 4, 1, 5, 1, 1, 1, 5, 4, 4, 1, 4, 2, -1, 4, -1, 3, 1, 1, 7, 7, 1, 1, 1, 2, 2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1), char = c(TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, TRUE, NA, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, TRUE, NA, FALSE, TRUE, FALSE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, TRUE, FALSE, TRUE, NA, FALSE, NA, FALSE, TRUE, TRUE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE ), divisor = c(1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, NA, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, NA, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, NA, 1, NA, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1), variable = c("rectype", "serialno", "sample", "division", "state", "puma", "areatype", "msapmsa", "psa", "subsampl", "houswgt", "persons", "gqtype", "blank1", "units1", "husflag", "pdsflag", "rooms", "tenure", "acreage", "commuse", "value", "rent1", "meals", "vacancy1", "vacancy2", "vacancy3", "vacancy4", "yrmoved", "bedrooms", "plumbing", "kitchen", "telephon", "vehicles", "fuel", "water", "sewage", "yrbuilt", "condo", "oneacre", "agsales", "eleccost", "gascost", "watrcost", "fuelcost", "proptax", "blank_2", "propins", "mortgage", "mortgag3", "taxincl", "insincl", "mortgag2", "mortamt2", "condofee", "moblhome", "rfarm", "rgrent", "rgrapi", "blank_3", "rownrcst", "blank_4", "rnsmocpi", "rrentunt", "rvalunt", "rfaminc", "rhhinc", "rwrkr89", "rhhlang", "rlingiso", "rhhfamtp", "rnatadpt", "rstpchld", "rfampers", "rrelchld", "rnonrel", "r18undr", "r60over", "r65over", "rsubfam", "aunits1", "arooms", "atenure", "aacres1", "acommuse", "avalue", "arent1", "ameals", "avacncy2", "avacncy3", "avacncy4", "ayrmoved", "abedroom", "aplumbng", "akitchen", "aphone", "avehicle", "afuel", "awater", "asewer", "ayrbuilt", "acondo", "aoneacre", "aagsales", "aeleccst", "agascst", "awatrcst", "afuelcst", "ataxamt", "ainsamt", "amortg", "amortg3", "ataxincl", "ainsincl", "amortg2", "amrtamt2", "acndofee", "amoblhme"), beg = c(1, 2, 9, 10, 11, 13, 18, 20, 24, 27, 29, 33, 35, 36, 39, 41, 42, 43, 44, 45, 46, 47, 49, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 73, 77, 81, 85, 87, 90, 94, 95, 100, 101, 102, 103, 108, 112, 116, 117, 121, 123, 124, 128, 129, 132, 133, 134, 141, 148, 149, 150, 151, 153, 155, 157, 159, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203), end = c(1, 8, 9, 10, 12, 17, 19, 23, 26, 28, 32, 34, 35, 38, 40, 41, 42, 43, 44, 45, 46, 48, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 72, 76, 80, 84, 86, 89, 93, 94, 99, 100, 101, 102, 107, 111, 115, 116, 120, 122, 123, 127, 128, 131, 132, 133, 140, 147, 148, 149, 150, 152, 154, 156, 158, 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203)), person.stru = list(varname = c("RECTYPE", "SERIALNO", "RELAT1", "SEX", "RACE", "AGE", "MARITAL", "PWGT1", NA, "REMPLPAR", "RPOB", "RSPOUSE", "ROWNCHLD", "RAGECHLD", "RRELCHL2", "RELAT2", "SUBFAM2", "SUBFAM1", "HISPANIC", "POVERTY", "POB", "CITIZEN", "IMMIGR", "SCHOOL", "YEARSCH", "ANCSTRY1", "ANCSTRY2", "MOBILITY", "MIGRSTAT", "MIGPUMA", "LANG1", "LANG2", "ENGLISH", "MILITARY", "RVETSERV", "SEPT80", "MAY75880", "VIETNAM", "FEB55", "KOREAN", "WWII", NA, "OTHRSERV", "YRSSERV", "DISABL1", "DISABL2", "MOBILLIM", "PERSCARE", "FERTIL", NA, "RLABOR", "WORKLWK", "HOURS", "POWSTATE", "POWPUMA", "MEANS", "RIDERS", "DEPART", "TRAVTIME", "TMPABSNT", "LOOKING", "AVAIL", "YEARWRK", "INDUSTRY", "OCCUP", "CLASS", "WORK89", "WEEK89", "HOUR89", "REARNING", "RPINCOME", "INCOME1", "INCOME2", "INCOME3", "INCOME4", "INCOME5", "INCOME6", "INCOME7", "INCOME8", "AAUGMENT", "ARELAT1", "ASEX", "ARACE", "AAGE", "AMARITAL", "AHISPAN", "ABIRTHPL", "ACITIZEN", "AIMMIGR", "ASCHOOL", "AYEARSCH", "AANCSTR1", "AANCSTR2", "AMOBLTY", "AMIGSTAT", "ALANG1", "ALANG2", "AENGLISH", "AVETS1", "ASERVPER", "AYRSSERV", "ADISABL1", "ADISABL2", "AMOBLLIM", "APERCARE", "AFERTIL", "ALABOR", "AHOURS", "APOWST", "AMEANS", "ARIDERS", "ADEPART", "ATRANTME", "ALSTWRK", "AINDUSTR", "AOCCUP", "ACLASS", "AWORK89", "AWKS89", "AHOUR89", "AINCOME1", "AINCOME2", "AINCOME3", "AINCOME4", "AINCOME5", "AINCOME6", "AINCOME7", "AINCOME8"), width = c(1, 7, 2, 1, 3, 2, 1, 4, -4, 3, 2, 1, 1, 1, 1, 1, 1, 1, 3, 3, 3, 1, 2, 1, 2, 3, 3, 1, 2, 5, 1, 3, 1, 1, 2, 1, 1, 1, 1, 1, 1, -1, 1, 2, 1, 1, 1, 1, 1, -1, 1, 1, 2, 2, 5, 2, 1, 4, 2, 1, 1, 1, 1, 3, 3, 1, 1, 2, 2, 6, 6, 6, 6, 6, 6, 5, 5, 5, 5, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1), char = c(TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, TRUE, FALSE, NA, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, NA, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, NA, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE), divisor = c(1, 1, 1, 1, 1, 1, 1, 1, NA, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, NA, 1, 1, 1, 1, 1, 1, 1, NA, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1), variable = c("rectype", "serialno", "relat1", "sex", "race", "age", "marital", "pwgt1", "blank_1", "remplpar", "rpob", "rspouse", "rownchld", "ragechld", "rrelchl2", "relat2", "subfam2", "subfam1", "hispanic", "poverty", "pob", "citizen", "immigr", "school", "yearsch", "ancstry1", "ancstry2", "mobility", "migrstat", "migpuma", "lang1", "lang2", "english", "military", "rvetserv", "sept80", "may75880", "vietnam", "feb55", "korean", "wwii", "blank_2", "othrserv", "yrsserv", "disabl1", "disabl2", "mobillim", "perscare", "fertil", "blank_3", "rlabor", "worklwk", "hours", "powstate", "powpuma", "means", "riders", "depart", "travtime", "tmpabsnt", "looking", "avail", "yearwrk", "industry", "occup", "class", "work89", "week89", "hour89", "rearning", "rpincome", "income1", "income2", "income3", "income4", "income5", "income6", "income7", "income8", "aaugment", "arelat1", "asex", "arace", "aage", "amarital", "ahispan", "abirthpl", "acitizen", "aimmigr", "aschool", "ayearsch", "aancstr1", "aancstr2", "amoblty", "amigstat", "alang1", "alang2", "aenglish", "avets1", "aservper", "ayrsserv", "adisabl1", "adisabl2", "amobllim", "apercare", "afertil", "alabor", "ahours", "apowst", "ameans", "ariders", "adepart", "atrantme", "alstwrk", "aindustr", "aoccup", "aclass", "awork89", "awks89", "ahour89", "aincome1", "aincome2", "aincome3", "aincome4", "aincome5", "aincome6", "aincome7", "aincome8"), beg = c(1, 2, 9, 11, 12, 15, 17, 18, 22, 26, 29, 31, 32, 33, 34, 35, 36, 37, 38, 41, 44, 47, 48, 50, 51, 53, 56, 59, 60, 62, 67, 68, 71, 72, 73, 75, 76, 77, 78, 79, 80, 81, 82, 83, 85, 86, 87, 88, 89, 90, 91, 92, 93, 95, 97, 102, 104, 105, 109, 111, 112, 113, 114, 115, 118, 121, 122, 123, 125, 127, 133, 139, 145, 151, 157, 163, 168, 173, 178, 183, 184, 185, 186, 187, 188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229, 230, 231), end = c(1, 8, 10, 11, 14, 16, 17, 21, 25, 28, 30, 31, 32, 33, 34, 35, 36, 37, 40, 43, 46, 47, 49, 50, 52, 55, 58, 59, 61, 66, 67, 70, 71, 72, 74, 75, 76, 77, 78, 79, 80, 81, 82, 84, 85, 86, 87, 88, 89, 90, 91, 92, 94, 96, 101, 103, 104, 108, 110, 111, 112, 113, 114, 117, 120, 121, 122, 124, 126, 132, 138, 144, 150, 156, 162, 167, 172, 177, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229, 230, 231)))

[[6]] cachaca(fp, dlfile, mode = "wb")

[[7]] rcurl_filesize(this_url)

[[8]] RCurl::getURL(url, nobody = 1L, header = 1L)

[[9]] curlPerform(curl = curl, .opts = opts, .encoding = .encoding)

[[10]] function (type, msg, asError = TRUE) { if (!is.character(type)) { i = match(type, CURLcodeValues) typeName = if (is.na(i)) character() else names(CURLcodeValues)[i] } typeName = gsub("^CURLE_", "", typeName) fun = (if (asError) stop else warning) fun(structure(list(message = msg, call = sys.call()), class = c(typeName, "GenericCurlError", "error", "condition"))) }(35L, "error:14077410:SSL routines:SSL23_GET_SERVER_HELLO:sslv3 alert handshake failure", TRUE)

[[11]] fun(structure(list(message = msg, call = sys.call()), class = c(typeName, "GenericCurlError", "error", "condition")))

[[12]] (function (e) { if (grepl("cannot allocate vector of size", e)) message(memory_note) else if (grepl("parameter must be specified", e)) message(parameter_note) else if (grepl("to install", e)) message(installation_note) else { message(unknown_error_note) print(sys.calls()) } })(list(message = "error:14077410:SSL routines:SSL23_GET_SERVERHELLO:sslv3 alert handshake failure", call = function (type, msg, asError = TRUE) { if (!is.character(type)) { i = match(type, CURLcodeValues) typeName = if (is.na(i)) character() else names(CURLcodeValues)[i] } typeName = gsub("^CURLE", "", typeName) fun = (if (asError) stop else warning) fun(structure(list(message = msg, call = sys.call()), class = c(typeName, "GenericCurlError", "error", "condition"))) }(35L, "error:14077410:SSL routines:SSL23_GET_SERVER_HELLO:sslv3 alert handshake failure", TRUE)))

Error in function (type, msg, asError = TRUE) : error:14077410:SSL routines:SSL23_GET_SERVER_HELLO:sslv3 alert handshake failure