How to fit multiple parameters in multiple SEIR models to data with a loop in R

Question

I have an SEIR model with different parameter values for different scenarios. I would like to fit the same parameters in each of the scenarios to different respective data f