将所有打印输出保存在R中

Question

如何将所有打印输出保存到excel文件中。我的输出文件为矩阵形式。我使用了write.table() / write.matrix()和write.xls()，但它没有用。 f()是一些用于获取输出的函数。我输出的样本以图像形式给出。

for(j in c(10,20)){
  for(i in 1:3){
    b <- print(f(j,i))
    write.table(b,file="aa.xls",sep="\t", col.names = F, row.names = F)
  }
}