I found a solution using the assign function. However, I have to add in eval(parse(text = ...) to the function for it to execute. Is there a way to streamline in the beginning code to include this eval(parse(text = ...)?
run = 1
assign(paste0("model", run), c(run, 4, 74, 2))
hist(eval(parse(text = paste0("model", run))))
boxplot(eval(parse(text = paste0("model", run))))