getRawData produces error

```
> data = getRawData(AOI,"a",name = "Clemson")
Beginning download of HUC6-030601 files...
	Downloading 030601hand.tif
  |======================================================================| 100%
Error in data.frame(HUC6 = rep(HUC6, each = 1), name = name, raw.files = grep("tif$",  :
  arguments imply differing number of rows: 1, 0
```