R 和 Stata 中的环境变量与启动项

R 和 Stata 中的环境变量与启动项

电脑有开机启动项,而软件自然也有软件启动项。可以通过一些设定可以让软件启动之后就运行某些程序来达到简化工作的目的。

R 环境变量的更改

在前面练习 ggplot2 绘图的程序中,我经常遇到这样一个问题,就是如果月份变量值是英文,我们没办法直接将它们格式化,所以我之前都是很麻烦的把英文月份换成数字例如这篇文章:浏览器和操作系统份额,刚刚我终于知道如何更改 R 的环境变量来实现把日期环境改成英文的日期环境来避免这个问题。

再使用那篇博客中的例子:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
library(readr)
download.file("https://czxb.github.io/ar/browser.csv", "browers.csv")
browser <- read_csv("browers.csv")

# 我的电脑是中文系统,所以无法对英文的日期格式化
# 查看R的日期环境
Sys.getlocale("LC_TIME")
# [1] "zh_CN.UTF-8"
# 日期示例
paste(browser$month, browser$year, "01")[1]
# 直接对日期格式化
as.Date(paste(browser$month, browser$year, "01"), "%B %Y %e")[1]
# [1] NA

# 而如果我们把日期环境设置成英文:
Sys.setlocale("LC_TIME", "en_US.UTF-8")
as.Date(paste(browser$month, browser$year, "01"), "%B %Y %e")[1]
# [1] "2017-01-01"

所以我们只需要把日期环境改成英文环境即可。但是需要注意这个修改是临时的,下次启动 R 的时候还会恢复。所以就有了下面的 R 启动项的设置。

R 启动项的设置

对于 Mac 系统,通过在/Users/名字/文件夹内添加一个.Rprofile文件,然后在文件中写你想在 R 启动时运行的程序即可在 R 启动的时候运行这些程序。

不过注意这是个隐藏文件(点开头的文件在 Mac 电脑里面都是隐藏文件), 如果想在 Finder 中看到隐藏文件,那么在终端中输入以下下命令即可:

Shell
1
2
sudo defaults write com.apple.Finder AppleShowAllFiles YES
killall Finder

要关闭显示隐藏文件的话就把上面的命令中 YES 改为 NO 就行了。

例如我在我的.Rprofile文件中设置的程序为:

R
1
2
3
4
5
6
7
8
9
10
11
12
# 把日期环境设置成英文:
Sys.setlocale("LC_TIME", "en_US.UTF-8")
print("已把日期环境设置成英文!")
# 加载包
library(ggplot2, quietly = T)
library(dplyr, quietly = T)
library(RColorBrewer, quietly = T)
library(reshape2, quietly = T)
print("已加载ggplot2、reshape2、dplyr和RColorBrewer!")
theme_set(theme_bw(base_size = 18, base_family = 'STSongti-SC-Bold') + theme(plot.title = element_text(hjust = 0.1)) + theme(plot.subtitle = element_text(hjust = 0.1)))
print("已ggplot2绘图主题为theme_bw()!")
utils::sessionInfo()

这样的话,启动之后就会有一大堆信息:

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
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
R version 3.5.1 (2018-07-02) -- "Feather Spray"
Copyright (C) 2018 The R Foundation for Statistical Computing
Platform: x86_64-apple-darwin15.6.0 (64-bit)

R是自由软件,不带任何担保。
在某些条件下你可以将其自由散布。
'license()''licence()'来看散布的详细条件。

R是个合作计划,有许多人为之做出了贡献.
'contributors()'来看合作者的详细情况
'citation()'会告诉你如何在出版物中正确地引用R或R程序包。

'demo()'来看一些示范程序,用'help()'来阅读在线帮助文件,或
'help.start()'通过HTML浏览器来看帮助文件。
'q()'退出R.

[1] "en_US.UTF-8"
[1] "已把日期环境设置成英文!"

载入程辑包:‘dplyr’

The following objects are masked from ‘package:base’:

intersect, setdiff, setequal, union

[1] "已加载ggplot2、reshape2、dplyr和RColorBrewer!"
[1] "已ggplot2绘图主题为theme_bw()!"
R version 3.5.1 (2018-07-02)
Platform: x86_64-apple-darwin15.6.0 (64-bit)
Running under: macOS 10.14.1

Matrix products: default
BLAS: /System/Library/Frameworks/Accelerate.framework/Versions/A/Frameworks/vecLib.framework/Versions/A/libBLAS.dylib
LAPACK: /Library/Frameworks/R.framework/Versions/3.5/Resources/lib/libRlapack.dylib

locale:
[1] zh_CN.UTF-8/zh_CN.UTF-8/zh_CN.UTF-8/C/en_US.UTF-8/zh_CN.UTF-8

attached base packages:
[1] methods base

other attached packages:
[1] reshape2_1.4.3 RColorBrewer_1.1-2 dplyr_0.7.8 ggplot2_3.1.0

loaded via a namespace (and not attached):
[1] Rcpp_1.0.0 grDevices_3.5.1 withr_2.1.2 crayon_1.3.4
[5] assertthat_0.2.0 grid_3.5.1 plyr_1.8.4 R6_2.3.0
[9] gtable_0.2.0 magrittr_1.5 scales_1.0.0 pillar_1.3.0.9001
[13] stringi_1.2.4 rlang_0.3.0.1 utils_3.5.1 lazyeval_0.2.1
[17] rstudioapi_0.8 bindrcpp_0.2.2 graphics_3.5.1 tools_3.5.1
[21] stringr_1.3.1 glue_1.3.0 purrr_0.2.5 munsell_0.5.0
[25] pkgconfig_2.0.2 stats_3.5.1 colorspace_1.3-2 tidyselect_0.2.5
[29] bindr_0.1.1 tibble_1.4.2

设置日期环境为英文环境、加载了几个常用的包再显示当前的工作环境。

Stata 启动项的设置

Stata 启动项的设置可以通过在安装目录里创建一个profile.do文件,例如我的这个文件的位置在:/Applications/Stata/profile.do。同样在这个文件里添加你想要运行的启动程序即可,例如我的:

Stata
1
2
sysuse auto, clear
cd ~/Desktop

很简单,一个是调入汽车数据集,另一个是设置工作目录为桌面。

# R, Stata

评论

Your browser is out-of-date!

Update your browser to view this website correctly. Update my browser now

×