2017-08-01 21:44:46 
2017-08-01 21:44:46 R version 3.4.0 (2017-04-21) -- "You Stupid Darkness"
2017-08-01 21:44:46 Copyright (C) 2017 The R Foundation for Statistical Computing
2017-08-01 21:44:46 Platform: x86_64-w64-mingw32/x64 (64-bit)
2017-08-01 21:44:46 
2017-08-01 21:44:46 R is free software and comes with ABSOLUTELY NO WARRANTY.
2017-08-01 21:44:46 You are welcome to redistribute it under certain conditions.
2017-08-01 21:44:46 Type 'license()' or 'licence()' for distribution details.
2017-08-01 21:44:46 
2017-08-01 21:44:46   Natural language support but running in an English locale
2017-08-01 21:44:46 
2017-08-01 21:44:46 R is a collaborative project with many contributors.
2017-08-01 21:44:46 Type 'contributors()' for more information and
2017-08-01 21:44:46 'citation()' on how to cite R or R packages in publications.
2017-08-01 21:44:46 
2017-08-01 21:44:46 Type 'demo()' for some demos, 'help()' for on-line help, or
2017-08-01 21:44:46 'help.start()' for an HTML browser interface to help.
2017-08-01 21:44:46 Type 'q()' to quit R.
2017-08-01 21:44:46 
2017-08-01 21:44:46 > setwd( Sys.getenv( "RWD" ) )
2017-08-01 21:44:46 > 
2017-08-01 21:44:46 > machine_specific_replacements <- 
2017-08-01 21:44:46 + 	list( 
2017-08-01 21:44:46 + 		
2017-08-01 21:44:46 + 		# replace the folder path on macnix
2017-08-01 21:44:46 + 		c( 'path.expand( \"~\" ) , \"HRS\"' , paste0( '"' , getwd() , '"' ) ) ,
2017-08-01 21:44:46 + 		
2017-08-01 21:44:46 + 		# change other things in the script to be run
2017-08-01 21:44:46 + 		c( "hello" , "howdy" )
2017-08-01 21:44:46 + 		
2017-08-01 21:44:46 + 	)
2017-08-01 21:44:46 > 
2017-08-01 21:44:46 > source( lodown::syntaxtractor( "hrs" , replacements = machine_specific_replacements , setup_test = "setup" ) , echo = TRUE )
2017-08-01 21:44:46 <simpleWarning in file(con, "r"): cannot open URL 'https://github.com/ajdamico/asdfreebook/tree/master/': HTTP status was '429 Too Many Requests'>
2017-08-01 21:45:49 
2017-08-01 21:45:49 > library(lodown)
2017-08-01 21:45:49 
2017-08-01 21:45:49 > lodown("hrs", output_dir = file.path("e:/eanthony/r-wd/hrs-1501649007"), 
2017-08-01 21:45:49 +     your_username = "username", your_password = "password")
2017-08-01 21:45:49 building catalog for hrs
2017-08-01 21:45:49 
2017-08-01 21:45:52 locally downloading hrs
2017-08-01 21:45:52 
2017-08-01 21:45:53 
2017-08-01 21:45:53 
2017-08-01 21:45:53 lodown is now exiting unexpectedly.
2017-08-01 21:45:53 websites that host publicly-downloadable microdata change often and sometimes those changes cause this software to break.
2017-08-01 21:45:53 if the error call stack below appears to be a hiccup in your internet connection, then please verify your connectivity and retry the download.
2017-08-01 21:45:53 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()`.
2017-08-01 21:45:53 
2017-08-01 21:45:53 
2017-08-01 21:45:53 [[1]]
2017-08-01 21:45:53 source(lodown::syntaxtractor("hrs", replacements = machine_specific_replacements, 
2017-08-01 21:45:53     setup_test = "setup"), echo = TRUE)
2017-08-01 21:45:53 
2017-08-01 21:45:53 [[2]]
2017-08-01 21:45:53 withVisible(eval(ei, envir))
2017-08-01 21:45:53 
2017-08-01 21:45:53 [[3]]
2017-08-01 21:45:53 eval(ei, envir)
2017-08-01 21:45:53 
2017-08-01 21:45:53 [[4]]
2017-08-01 21:45:53 eval(ei, envir)
2017-08-01 21:45:53 
2017-08-01 21:45:53 [[5]]
2017-08-01 21:45:53 lodown("hrs", output_dir = file.path("e:/eanthony/r-wd/hrs-1501649007"), 
2017-08-01 21:45:53     your_username = "username", your_password = "password")
2017-08-01 21:45:53 
2017-08-01 21:45:53 [[6]]
2017-08-01 21:45:53 withCallingHandlers(catalog <- load_fun(data_name = data_name, 
2017-08-01 21:45:53     catalog, ...), error = function(e) {
2017-08-01 21:45:53     if (grepl("cannot allocate vector of size", e)) 
2017-08-01 21:45:53         message(memory_note)
2017-08-01 21:45:53     else if (grepl("parameter must be specified", e)) 
2017-08-01 21:45:53         message(parameter_note)
2017-08-01 21:45:53     else if (grepl("to install", e)) 
2017-08-01 21:45:53         message(installation_note)
2017-08-01 21:45:53     else {
2017-08-01 21:45:53         message(unknown_error_note)
2017-08-01 21:45:53         print(sys.calls())
2017-08-01 21:45:53     }
2017-08-01 21:45:53 })
2017-08-01 21:45:53 
2017-08-01 21:45:53 [[7]]
2017-08-01 21:45:53 load_fun(data_name = data_name, catalog, ...)
2017-08-01 21:45:53 
2017-08-01 21:45:53 [[8]]
2017-08-01 21:45:53 .handleSimpleError(function (e) 
2017-08-01 21:45:53 {
2017-08-01 21:45:53     if (grepl("cannot allocate vector of size", e)) 
2017-08-01 21:45:53         message(memory_note)
2017-08-01 21:45:53     else if (grepl("parameter must be specified", e)) 
2017-08-01 21:45:53         message(parameter_note)
2017-08-01 21:45:53     else if (grepl("to install", e)) 
2017-08-01 21:45:53         message(installation_note)
2017-08-01 21:45:53     else {
2017-08-01 21:45:53         message(unknown_error_note)
2017-08-01 21:45:53         print(sys.calls())
2017-08-01 21:45:53     }
2017-08-01 21:45:53 }, "argument must be coercible to non-negative integer", quote(seq_len(nrow(catalog))))
2017-08-01 21:45:53 
2017-08-01 21:45:53 [[9]]
2017-08-01 21:45:53 h(simpleError(msg, call))
2017-08-01 21:45:53 
2017-08-01 21:45:53 Error in seq_len(nrow(catalog)) : 
2017-08-01 21:45:53   argument must be coercible to non-negative integer
2017-08-01 21:45:53 Calls: source ... eval -> eval -> lodown -> withCallingHandlers -> load_fun
2017-08-01 21:45:53 In addition: Warning messages:
2017-08-01 21:45:53 1: In is.na(catalog$output_folder) :
2017-08-01 21:45:53   is.na() applied to non-(list or vector) of type 'NULL'
2017-08-01 21:45:53 2: In seq_len(nrow(catalog)) : first element used of 'length.out' argument
2017-08-01 21:45:53 Execution halted