Using the `imap` Function to Extract and Apply Substring Operations on Data Frames in a List