一、保存数据
1、保存和加载R的数据(与R.data的交互：save()函数和load()函数)
|
1 2 3 4 5 |
save(a, file = "data/dumData.Rdata") # data文件为当前工作目录下的文件，必须存在 save(list = ls(all.names = TRUE), file = ".RData", envir = .GlobalEnv) rm(a) load("data/dumData.Rdata") print(a) |
二、调用函数
你编的R程序里面要调用 beta.int.R 里的函数，比如说最简单，算园面积
beta.int.R 里写到:
|
1 2 3 4 |
area<-function(r){ s<-3.14*r^2 return(s) } 退到R的界面：先source这个函数文件: >source(beta.int.R) >rarea(r) 不source是无法用area这个函数的 [1] 12.56 |
如果是函数，source后还需要调用这个函数，如果是操作记录，则这几可以运行。
运行外部命令
比如这个程序脚本：
|
1 2 3 4 |
x=seq(0,20,by=0.5) y=dchisq(x,3) plot(x,y,type="l",col="blue") text(15,0.15,"d.f.=3",cex=2,col="red") |
取名为“chisq2.R”
运行 source(“chisq2.R”)，则打印出漂亮的图形
三、保存操作命令
保存操作记录到history中
|
1 2 |
savehistory(file="hah.R") source("hah.R") 重新跑一遍上面的记录 |
四、导入参数
有时需要反复执行一段R代码，并使用不同得参数，可以将代码用文本编辑器写为R脚本(*.R)，在第一行加入
|
1 |
Args<- commandArgs() |
然后通过
Rscript *.R 参数1 参数2 …
执行脚本。
脚本中
|
1 2 3 4 5 6 7 8 9 10 |
Args[6]==参数1 Args[7]==参数2 ... 输出commandArgs()可以看到前五个分别是： [1] "/opt/blc/genome/biosoft/R/lib64/R/bin/exec/R" #这个是R路径 [2] "--slave" [3] "--no-restore" [4] "--file=test.r" [5] "--args" 所以第一个参数从<span style="color: #ff0000;">Args[6]</span>开始 |
|
1 2 3 4 5 6 7 |
例子： 文件test.R加入： Args x=seq(0,20,by=0.5) y=dchisq(x,3) #plot(x,y,type="l",col="blue") Args[0] Args[6] |
运行 Rscript test.R 111 122
参考资料：
http://www.cnblogs.com/xianghang123/archive/2012/07/18/2597687.html