Moved to Archive
baseline version
changed returned value to be a vector (instead of a data frame)
changed filename creating code for all three routines