Update retrofilenames.R

Add argument error-handling