title: Multiple regressions to excel
body: <p>I want to export results from multiple regressions into an excel file in a very specific format </p>
  
  <p>MWS</p>
  
  <pre><code>data("mtcars")
  str(mtcars)
  m1&lt;-lm(hp ~ disp, data = mtcars)
  m2&lt;-lm(hp ~ disp + wt, data = mtcars)
  </code></pre>
  
  <p>I find this format the most suitable:</p>
  
  <pre><code>library(texreg)
  screenreg(list(m1, m2))
  
  ===================================
               Model 1     Model 2   
  -----------------------------------
  (Intercept)   45.73 **    68.84 *  
               (16.13)     (31.80)   
  disp           0.44 ***    0.54 ***
                (0.06)      (0.14)   
  wt                       -14.45    
                           (17.10)   
  -----------------------------------
  R^2            0.63        0.63    
  Adj. R^2       0.61        0.61    
  Num. obs.     32          32       
  RMSE          42.65       42.85    
  ===================================
  *** p &lt; 0.001, ** p &lt; 0.01, * p &lt; 0.05
  </code></pre>
  
  <p>I want to convert the above into a dataframe or anything similar in order to export it to excel, <strong>preserving its format</strong>. </p>
  
  <p>Other ideas that could generate a similar table and export it to excel are welcome. </p>
  
  <p>The most import thing for me is to export the coefficients having the * on top of each, so I can understand which one is significant in every new regression.  </p>
  
  <p>Can you please help me with that ? </p>