Permission Denied Error when downloading a file

destfile should be a filename, not a directory. For example:

download.file(excel2file, destfile= "~/Home/Documents/Data/Housing2013EXCEL.zip")

Also, that URL doesn't seem to be valid, but that's a different (non-R) problem.