比如：如何把下列的结果制作成表格
library('psych')
data(sat.act)
corr.test(sat.act)
corr.test(sat.act[1:3],sat.act[4:6]) #reports all values corrected for multiple tests
corr.test(sat.act[1:3],sat.act[4:6],adjust="none")  #don't adjust the probabilities
平时都是一个个复制的。

在代码开始前加一行：
sink("output.txt")，就会自动把结果全部输出到工作文件夹下的output.txt文本文档。这时在R控制台的输出窗口中是看不到输出结果的。
代码结束时别忘了用sink()切换回来。

相关系数矩阵怎么保存啊？？？

这个真的是最快最快的方法了！！！！！！感谢！！！！！！