r - R から Excel に要約を追加する

Question

私はいくつかのデータ分析を行い、結果をExcelファイルに書きたいと思っています。dataFrame を追加する方法は知っていますが、オブジェクトの概要などをシートに追加する方法がわかりません

たとえば、dataFrame dF があるとします。

Pr <- lm(Power~a + b + c,data = dF)  
r <- predict(Pr,interval="prediction")
r<-data.frame(r)

Excel1 <- createWorkbook()
Data <- createSheet(Excel1, sheetName = "Data")
Result <- createSheet(Excel1, sheetName = "Results")
Summary <- createSheet(Excel1, sheetName = "Summary")
addDataFrame(dF,Data)
addDataFrame(r,Result)

saveWorkbook(Excel1, "Excel1")

シート "Summary" に summary(Pr) を追加する方法は？助けてください