本博客所有内容是原创,未经书面许可,严禁任何形式的转载。
http://blog.csdn.net/u010255642
四、从文件中载入并执行代码以及将执行结果写入文件中
1、使用source函数载入并执行代码,我们把以下代码放在一个名为test.r的文件,用文本编辑工具录入以下代码
x<-c(22,23,44,66);
y<-mean(x);y
x<-c(22,23,44,66); y<-mean(x);y
然后加载执行,查看输出结果
> source("f:/pro/r/test.r")
> y
[1] 38.75
> x
[1] 22 23 44 66
>
2、sink函数将随后的输出结果写入文件
> sink("f:/pro/r/test.lis")
> x
> y
打开test.lis,可看到内容
[1] 22 23 44 66
[1] 38.75
不带参数的sink,将恢复将结果输出到控制台中
> sink()
> x
[1] 22 23 44 66
>