Print or capturing multiple objects in R

Question

I have multiple regressions in an R script and want to append the regression summaries to a single text file output. I know I can use the following code to do this for one

Answer 1

You can store the result as a list and then use the capture.output

fit1<-lm(mpg~cyl,data=mtcars)
fit2<-lm(mpg~cyl+disp,data=mtcars)
myresult<-list(fit1,fit2)
capture.output(myresult, file = "results.txt")