四、从文件中载入并执行代码以及将执行结果写入文件中
1、使用source函数载入并执行代码,我们把以下代码放在一个名为test.r的文件,用文本编辑工具录入以下代码
- x<-c(22,23,44,66);
- y<-mean(x);y
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
>