Applying a List to a Function that Outputs a Dataframe in R Using Tidyverse and Base R