I've done multiple regression modeling in R using the below script. Now I'm wondering how can I make a table for the coefficients of each model of all models from lm, glm, and rf separately. 

```r

all_variables <- names(PaC09c_w20_dat3)
response_variables <- all_variables[c(1:3)]
predictors <- all_variables[-c(1:3)]

lm_model <- lapply(
  response_variables,
  function(x) lm(reformulate(termlabels = predictors, response = x), data = PaC09c_w20_dat3)
) |>
  setNames(response_variables)

glm_model <- lapply(
  response_variables,
  function(x) glm(reformulate(termlabels = predictors, response = x), data = PaC09c_w20_dat3)
) |>
  setNames(response_variables)

rf_ranger <- lapply(
  response_variables,
  function(x) ranger(reformulate(termlabels = predictors, response = x), data = PaC09c_w20_dat3, importance="impurity")
) |>
  setNames(response_variables)

save.image(file="PaC09c_w20_Reg.RData")
```
Input data looks like,
  

      head(PaC09c_w20_dat3)
            EE87865ln1   EE87866ln1   EE87895ln1  blood_vessel_w20 adrenal_gland_w20 bone_element_w20 bronchus_w20 
                   <dbl>       <dbl>      <dbl>     <dbl>             <dbl>            <dbl>        <dbl>         
            1    0.00391     0.00326    0.00332       0                 0                1            0             
            2    0.00139     0.00116    0.00132       0                 0                0            0             
            3    0.00360     0.00270    0.00469       1                 1                0            1             
            4    0.00323     0.00348    0.00339       0                 0                1            0             
            5    0.00323     0.00330    0.00382       0                 1                0            0             
            6    0.00278     0.00208    0.00214       0                 0                1            0