I have a large number of models stored in a nested data frame similar to this (example adapted from many models):
library(gapminder) data(gapminder) # Nest data.