I think best way is to use .*? and capture first occurrence of three consecutive letters that come after a space. Hope this is what you are looking for.

gsub(".*? ([a-zA-Z]{3}).*?/.*? ([a-zA-Z]{3}).*", "\\1/\\2", mynames)