Permalink
Browse files

commented out years-to-download lines so users could set outside of s…

…cript
  • Loading branch information...
1 parent 82966de commit 52a9eeeabdc20c25500ae912ac72effedd49730d @ajdamico committed May 7, 2013
@@ -153,13 +153,19 @@ db <- dbConnect( MonetDB.R() , monet.url )
# if you have a big hard drive, hey why not download them all?
# single-year datasets are available back to 2005
-single.year.datasets.to.download <- 2005:2011
+# uncomment this line to download all available single-year data sets
+# uncomment this line by removing the `#` at the front
+# single.year.datasets.to.download <- 2005:2011
# three-year datasets are available back to 2007
-three.year.datasets.to.download <- 2007:2011
+# uncomment this line to download all available three-year data sets
+# uncomment this line by removing the `#` at the front
+# three.year.datasets.to.download <- 2007:2011
# five-year datasets are available back to 2009
-five.year.datasets.to.download <- 2009:2011
+# uncomment this line to download all available five-year data sets
+# uncomment this line by removing the `#` at the front
+# five.year.datasets.to.download <- 2009:2011
# # # # # # # # # # # # # #
# other download examples #
@@ -160,7 +160,11 @@ db <- dbConnect( MonetDB.R() , monet.url )
# if you have a big hard drive, hey why not download them all?
# single-year datasets are available back to 1984
-years.to.download <- 1984:2011
+
+# uncomment this line to download all available data sets
+# uncomment this line by removing the `#` at the front
+# years.to.download <- 1984:2011
+
# pretty orwellian, huh?
# # # # # # # # # # # # # #
@@ -37,8 +37,9 @@
require(foreign) # load foreign package (converts data files into R)
-# download all available years
-years.to.download <- 2011:2010
+# uncomment this line to download all available data sets
+# uncomment this line by removing the `#` at the front
+# years.to.download <- 2011:2010
# uncomment to only download the most current available year
# years.to.download <- 2011
@@ -40,8 +40,9 @@
# define which years to download #
-# this line will download every year of data available
-cps.years.to.download <- 2012:2005
+# uncomment this line to download all available data sets
+# uncomment this line by removing the `#` at the front
+# cps.years.to.download <- 2012:2005
# uncomment this line to only download the most current year
# cps.years.to.download <- 2011
@@ -49,7 +49,9 @@
# choose which hmda data sets to download
-years.to.download <- 2006:2011
+# uncomment this line to download all available data sets
+# uncomment this line by removing the `#` at the front
+# years.to.download <- 2006:2011
# if you have a big hard drive, hey why not download them all?
# remove the `#` in order to just download 2011
@@ -42,7 +42,8 @@ library(RCurl) # load RCurl package (downloads files from the web)
require(foreign) # load foreign package (converts data files into R)
-# specify the MEPS years currently available
+# uncomment this line to download all available data sets
+# uncomment this line by removing the `#` at the front
year <- 1996:2010
@@ -115,7 +116,8 @@ mm$events <- NULL
# highly recommended: MEPS 1996 has lots of oddities compared to other years
# this file should be skipped unless you spend lots of time reading the documentation
# to figure out what changed where.
-mm <- subset( mm , year %in% 1997:2010 )
+# uncomment this line by removing the `#` at the front
+# mm <- subset( mm , year %in% 1997:2010 )
@@ -45,8 +45,9 @@
# create a temporary file and temporary directory
tf <- tempfile() ; td <- tempdir()
-# designate which years are available to download
-years.to.download <- 1997:1999
+# uncomment this line to download all available data sets
+# uncomment this line by removing the `#` at the front
+# years.to.download <- 1997:1999
# loop through each of the years to download and..
for ( year in years.to.download ){
@@ -46,8 +46,9 @@ download.documentation <- TRUE
# define which years to download #
-# this line will download every year of data available
-nhis.years.to.download <- 2011:1963
+# uncomment this line to download all available data sets
+# uncomment this line by removing the `#` at the front
+# nhis.years.to.download <- 2011:1963
# uncomment this line to only download the most current year
# nhis.years.to.download <- 2011
@@ -37,8 +37,9 @@
# install.packages( c( "SAScii" , "downloader" ) )
-# download all available years
-years.to.download <- c( 2002 , 2005 , 2008 , 2011 )
+# uncomment this line to download all available data sets
+# uncomment this line by removing the `#` at the front
+# years.to.download <- c( 2002 , 2005 , 2008 , 2011 )
# uncomment to only download the most current available year
# years.to.download <- 2011
@@ -39,8 +39,9 @@
# define which years to download #
-# this line will download every year of data available
-years.to.download <- c( 2001:2009 , 2011 )
+# uncomment this line to download all available data sets
+# uncomment this line by removing the `#` at the front
+# years.to.download <- c( 2001:2009 , 2011 )
# uncomment this line to only download the most current year
# years.to.download <- 2011
@@ -26,8 +26,9 @@
# define which years to download #
-# this line will download every year of data available
-years.to.download <- c( 1989 , 1992 , 1995 , 1998 , 2001 , 2004 , 2007 , 2009 , 2010 )
+# uncomment this line to download all available data sets
+# uncomment this line by removing the `#` at the front
+# years.to.download <- c( 1989 , 1992 , 1995 , 1998 , 2001 , 2004 , 2007 , 2009 , 2010 )
# uncomment this line to only download the most current year
# years.to.download <- 2010

0 comments on commit 52a9eee

Please sign in to comment.