Q:

How do you store evaluated ggplots in R from a list of lists by string?

I am have made a series of lists that contain ggplots. I would like to evaluate the objects in order to bite the plotting time early. I have gathered the variable names that I would like to evaluate in a string vector. Additionally, I want to keep the variable names before. 
The solution I tried was to lapply the eval(as.symbol("myvarstring")). To my knowledge, it evaluates the variable without storing the evaluated expression. 
Adding as.symbol("myvarstring") <- eval(as.symbol("myvarstring")) does not work for me.
Below is a minimal reproducible example of my failed solution.    
library(tidyverse)

tbl <- tibble(
  x = 1:10,
  y = 1:10
)
g <- ggplot(tbl, aes(x, y)) + geom_point()

my_plot_list1 <- list(g,g,g,g,g,g)
my_plot_list2 <- list(g,g,g,g,g,g)
my_plot_list3 <- list(g,g,g,g,g,g)

my_vars <- c(
  "my_plot_list1",
  "my_plot_list2",
  "my_plot_list3"
)

lapply(my_vars, FUN = function(x) {as.symbol(x) <- eval(as.symbol(x))})

How would you accomplish this task?
Thank you
EDIT:
These graphs will ultimately be displayed through an rmarkdown script. The graphs will be loaded in the rscript. My graphs take an enormous amount of time to plot. If I could save an environment with "rendered" graphs, it would shorten the rmarkdown runtime. Shortening runtime of the rmarkdown runtime is the ultimate goal.

A:

Why don't you just store the lists in a list, rather than relying on tricks to get them from the global environment?
library(tidyverse)

tbl <- tibble(
  x = 1:10,
  y = 1:10
)
g <- ggplot(tbl, aes(x, y)) + geom_point()

my_plot_list1 <- list(g,g,g,g,g,g)
my_plot_list2 <- list(g,g,g,g,g,g)
my_plot_list3 <- list(g,g,g,g,g,g)

my_vars <- list(
  my_plot_list1,
  my_plot_list2,
  my_plot_list3
)

lapply(my_vars, function(x) lapply(x, function(y) y))

If you want to ensure that the plots print (eg, if you were to call this code in a function or script) then replace the inner function(y) y with function(y) print(y)
EDIT: I believe I misunderstood.
If you want to assign variables to a programmatically generated name, you would do:
x <- "mygeneratedname"
assign(x, g, envir = .GlobalEnv)

