From e1f2e499ce842d731df31e01217fa9884e1301eb Mon Sep 17 00:00:00 2001 From: kbrevoort Date: Fri, 29 May 2020 14:03:26 -0400 Subject: [PATCH] Remove check of valid dates Modification is meant to work behind a firewall, until I can come up with a better approach. --- R/mapping.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/mapping.R b/R/mapping.R index aff2c20..3a97dcf 100644 --- a/R/mapping.R +++ b/R/mapping.R @@ -23,8 +23,8 @@ source_tiger_shapefile <- function(geography, year, resolution = '20m') { if (!is.character(geography) | !geography %in% c('state', 'county', 'cbsa', 'metro', 'micro', 'csa')) stop('Invalid geo value supplied to source_tiger_shapefiles') - if (!is.numeric(year) | !year %in% source_tiger_map_years()) - stop('Invalid year supplied to source_tiger_shapefiles.') + #if (!is.numeric(year) | !year %in% source_tiger_map_years()) + # stop('Invalid year supplied to source_tiger_shapefiles.') if (!resolution %in% c('500k', '5m', '20m')) stop('Invalid resolution supplied to source_tiger_shapefiles.')