things and stuff
base::basename instead of sapply(strsplit(/, fnames), tail,1)