定制R启动情况

本文翻译自R in Action的附录B，假如对该书感乐趣，请自行购置或去图书馆阅读。
R导论的10.8也是讲定制情况的。

措施员最喜欢做的事之一是定制启动情况，好让措施凭据他们喜欢方法事情。定制启动情况可以让你配置R的选项、指定事情目次、加载常用的包、加载用户本身写的函数、配置CRAN下载网址以及其它操纵。

你可以通过编辑位置位置初始化文件（Rprofile.site）可能目次初始化文件（.Rprofile）来定制R情况。这两个是纯文本文件，包括启动时要执行的R代码。

在启动的时候，R会从R_HOME/etc这个目次寻找Rprofile.site来挪用，个中 R_HOME 是情况变量。然后R会在当前事情目次寻找.Rprofile文件来挪用。假如R没有找到这个文件，就会在用户的主目次寻找。你可以用Sys.getenv("R_HOME")、Sys.getenv("HOME")和getwd()别离查察R_HOME 、HOME以及当前事情目次。

你可以在这些文件里放两个非凡的函数，.First()函数在启动R会话的时候执行，.Last()函数在竣事会话的时候执行。Rprofile.site文件的例子如下：

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32

# 配置常用选项 options(papersize="a4") options(editor="notepad") options(pager="internal") options(tab.width = 2) options(width = 130) options(graphics.record=TRUE) options(show.signif.stars=FALSE)  # 配置R交互提示信息 options(prompt="> ") options(continue="+ ")  .libPaths("C:/my_R_library") # 配置包的当地库（library）路径  # 配置CRAN镜像默认地点 local({r <- getOption("repos") r["CRAN"] <- "http://cran.case.edu/" options(repos=r)})  # 启动函数 .First <- function(){ library(lattice) library(Hmisc) source("C:/mydir/myfunctions.R") cat("\nWelcome at", date(), "\n") }  # 会话竣事函数 .Last <- function(){ cat("\nGoodbye at ", date(), "\n") }

关于这个文件，你需要留意以下几点：

尚有其他定制启动情况的方法，包罗利用呼吁行选项和情况变量。查察help(Startup)以及R导论的附录B（http://cran.r-project.org/doc/manuals/R-intro.pdf，中文版地点http://cran.r-project.org/doc/contrib/Ding-R-intro_cn.pdf）获取更多细节。