原文地址:http://blog.sina.com.cn/s/blog_50ccfc410101eigd.html
平时做R开发时,每次启动R环境都会要加载很多package,甚是繁琐。最近学习《R in action》时,介绍了自定义R启动环境的方法。
windows环境下,R启动时会到R_Home\etc目录下找Rprofile.site文件,其中“R_Home”指的是R安装目录,例如c:\R。可以用notepad等文本编辑器打开c:\R\etc\Rprofile.site,进行修改
# Things you might want to change
# 下面是常规设置,包括,默认编辑器、制表符宽度等等
# options(papersize="a4")
# options(tab.width=2)
# options(editor="notepad")
# options(pager="internal")
# set the default help type
# options(help_type="text")
options(help_type="html")
# set a site library
# 自定义库路径,便于备份
# .Library.site <- file.path(chartr("\\", "/", R.home()), "site-library")
# set a CRAN mirror
# 设置CRAN镜像,选一个最近源,这样安装和更新包时就不用手动选取CRAN镜像了
local({r <- getOption("repos")
r["CRAN"] <- "http://ftp.ctex.org/mirrors/CRAN/"
options(repos=r)})
# Give a fortune cookie, but only to interactive sessions
# (This would need the fortunes package to be installed.)
# if (interactive())
# fortunes::fortune()
.First <- function(){
# 设置R启动时加载的包
library(TSA)
library(MASS)
# 启动时交互,可自定义
cat("\nWelcome at",date(),"\n")
}
# 退出时交互
.Last <- function(){
cat("\nGoodnye at",date(),"\n")
}
.First()函数中除了加载常用package之外,还可以加载保存自己编写的常用函数的源代码文件
.Last()函数可以执行推出时清理工作,如保存命令历史记录、保存数据输出和数据文件等等