R 和 RStudio 的安装

作者: c7a1c4db132c | 来源:发表于2019-12-30 19:43 被阅读0次

学习小组Day4 Rstudio--及时雨
R语言的基础环境搭建
学习小组day4-嘻哈哈
第四章第一节 R、RStudio和ggplot2简介
R的介绍及安装
学习小组Day4笔记-Herobrine
R语言入门_R和Rstudio安装与使用
学习小组Day-4笔记--丁览博
Day4陈海影
《学习小组Day4笔记》--范若辰

R 和 RStudio 的安装是非常简单的，这里提供一些安装 Tips。

安装 R

现在最新版的 R 语言是 3.6.2 版本 (2019 年 12 月 12
日发布)，该发行版的名字是 Dark and Stormy Night (漆黑暴风夜
??)，事实上只要用 3.0.0 之后的版本都差距不是很大。我的电脑上的 R
的版本是 R version 3.6.2 (2019-12-12)。

根据自己的版本点击下面的链接即可直接下载 R 软件了：

Linux：https://mirrors.tuna.tsinghua.edu.cn/CRAN/bin/linux/
Mac 系统: https://mirrors.tuna.tsinghua.edu.cn/CRAN/bin/macosx/R-3.6.2.pkg
Windows系统: https://mirrors.tuna.tsinghua.edu.cn/CRAN/bin/windows/base/R-3.6.2-win.exe

下载好之后一路安装即可。

安装 Rtools：Windows 构建工具

好像只有 Windows
用户需要安装这个工具：https://mirrors.tuna.tsinghua.edu.cn/CRAN/bin/windows/Rtools/Rtools35.exe

安装 RStudio Desktop

最新版的 RStudio 是 1.2.5019，各个版本的下载链接为：

Windows 系统：https://download1.rstudio.org/desktop/windows/RStudio-1.2.5019.exe
Mac 系统：https://download1.rstudio.org/desktop/macos/RStudio-1.2.5019.dmg
Ubuntu18 系统：https://download1.rstudio.org/desktop/bionic/amd64/rstudio-1.2.5019-amd64.deb

注意

一定要先安装 R 再安装 RStudio！

安装常用的一些 R 包

可以运行下面的几句命令快速的安装一些 R 包：

# 安装 devtools 
install.packages("devtools")
# tidyverse 系列的 R 包
install.packages('tidyverse', dependencies = TRUE)
# 安装 tinytex
install.packages("tinytex", dependencies = TRUE)
# 安装完成之后运行
tinytex::install_tinytex()
# 安装一些 RMarkdown 模板
install.packages("rticles", dependencies = TRUE)
install.packages("xaringan", dependencies = TRUE)

# 安装 Shiny
install.packages("shiny", dependencies = TRUE)

# 安装我写的一些 R 包
install.packages("hwordcloud", dependencies = TRUE)
install.packages("hchinamap", dependencies = TRUE)
install.packages("hpackedbubble", dependencies = TRUE)
install.packages("sankeywheel", dependencies = TRUE)

# 安装最近用到的一些 R 包
install.packages("sf", dependencies = TRUE)
install.packages("prettydoc", dependencies = TRUE)
install.packages("hrbrthemes", dependencies = TRUE)
install.packages("tmap", dependencies = TRUE)
install.packages("worldtilegrid", repos = "https://cinc.rud.is", dependencies = TRUE)
devtools::install_github('awhstin/awtools', dependencies = TRUE)
devtools::install_github("konradsemsch/ggrapid", dependencies = TRUE)
devtools::install_github("thomasp85/patchwork")
install.packages('manipulateWidget', dependencies = TRUE)
install.packages('ggthemes', dependencies = TRUE)
install.packages('tidyquant', dependencies = TRUE)
install.packages('rvest', dependencies = TRUE)
install.packages('DT', dependencies = TRUE)
install.packages("basetheme", dependencies = TRUE)
install.packages("ggchicklet", repos = "https://cinc.rud.is")

用一段时间之后你的电脑上就会安装一大堆 R 包，例如我电脑上安装的 R 包有
1479个（截止 2019年12月14号）。

library(tidyverse)
installed.packages() %>% 
  as_tibble() %>% 
  count() %>% 
  pull() %>% 
  paste("该电脑一共有", ., "个 R 包！") %>% 
  message()

完整的名单（仅供参考）：

installed.packages() %>% 
  as_tibble() %>% 
  select(Package, Version, License, Built) %>% 
  DT::datatable()

安装字体

点击下载我常用的一些字体：font.zip

解压后全选全部安装即可。

设置 R Profile

R Profile 里面的代码会在启动 R 的时候自动运行，创建 R Profile
文件可以使用：

usethis::edit_r_profile()

运行之后自动会打开一个文件，在里面输入你想要在 R
启动的时候自动运行的代码即可，可以参考我的：

Windows 系统：

# 加载包
suppressMessages(suppressWarnings(library(ggplot2, quietly = T)))
suppressMessages(suppressWarnings(library(dplyr, quietly = T)))
suppressMessages(suppressWarnings(library(RColorBrewer, quietly = T)))
suppressMessages(suppressWarnings(library(reshape2, quietly = T)))
suppressMessages(suppressWarnings(library(hrbrthemes)))
suppressMessages(suppressWarnings(library(awtools)))
suppressMessages(suppressWarnings(library(grDevices)))

# 把日期环境设定为英语环境
suppressMessages(suppressWarnings((Sys.setlocale("LC_TIME", "en_US.UTF-8"))))

# 设定字体，特别注意里面有一个 enfont 和 cnfont 是我最常用的两个字体。
windowsFonts(
  `Arial Narrow` = windowsFont("Arial Unicode MS"),
  `enfont` = windowsFont("Cascadia Code"),
  `cnfont` = windowsFont("宋体"),
  EconSansCndReg = windowsFont("Econ Sans Cnd"),
  IBMPlexSans = windowsFont("IBM Plex Mono"),
  IBMPlexSans = windowsFont("IBM Plex Sans"),
  `Public Sans` = windowsFont("Public Sans"),
  `Roboto Condensed` = windowsFont("Roboto Condensed"),
  `Roboto Slab` = windowsFont("Roboto Slab"),
  `Titillium Web` = windowsFont("Titillium Web")
)
enfont = "enfont"
cnfont = "cnfont"

# 设定 ggplot2 绘图主题
theme_set(theme_ipsum(base_family = 'enfont'))
print("ggplot: theme_ipsum()!")

# 这是设定 R 的基础绘图系统的绘图主题
basetheme::basetheme("brutal")

Mac 系统参考：

# 把日期环境设置成英文
suppressMessages(suppressWarnings((Sys.setlocale("LC_TIME", "en_US.UTF-8"))))
print("已把日期环境设置成英文!")

# 加载包
suppressMessages(suppressWarnings(library(ggplot2, quietly = T)))
suppressMessages(suppressWarnings(library(dplyr, quietly = T)))
suppressMessages(suppressWarnings(library(RColorBrewer, quietly = T)))
suppressMessages(suppressWarnings(library(reshape2, quietly = T)))
suppressMessages(suppressWarnings(library(hrbrthemes)))
suppressMessages(suppressWarnings(library(awtools)))
print("已加载ggplot2、reshape2、dplyr、hrbrthemes和RColorBrewer!")

# 设定 ggplot2 绘图主题
theme_set(theme_ipsum(base_family = 'CascadiaCode-Regular'))
print("已ggplot2绘图主题为theme_ipsum()!")

# 这里我的用的英文字体是圆体，pomofont 是凌慧体
enfont = "CascadiaCode-Regular"
cnfont = "STYuanti-SC-Regular"
pomofont = "MLingWaiMedium-SC"

# 这是设定默认使用 Python 的位置，可以参考自己的 Python 安装位置设定：
reticulate::use_python('/opt/anaconda3/bin/python',required = T)

# 这是设定 R 的基础绘图系统的绘图主题
basetheme::basetheme("brutal")
options(rgl.useNULL=TRUE)

这样设定好之后再重启 R 即可生效。

基于这种设定，使用 R 基础绘图系统绘图的结果将会是这样的：

hist(iris$Sepal.Length)

使用 ggplot2 绘图的结果是这样的：

library(ggplot2)
ggplot(iris) + 
  geom_col(aes(x = Sepal.Length, 
               y = Sepal.Width,
               fill = Species,
               color = Species)) + 
  tidyquant::scale_fill_tq() + 
  tidyquant::scale_color_tq()

设置 RStudio 的样式

我比较喜欢暗黑一些的样式，在 Console
运行下面的代码即可更换为我推荐的主题：Mojave-Dark-RStudio-Theme

rstudioapi::addTheme("https://raw.githubusercontent.com/patrickshox/Mojave-Dark-RStudio-Theme/master/Mojave%20Dark%20(Static).rstheme", apply=TRUE, force=TRUE)

这个主题是这样的：

一个小的练习：爬取 CRAN 上的所有 R 包的名称、发布日期和标题

可以爬清华镜像源的列表：https://mirrors.tuna.tsinghua.edu.cn/CRAN/web/packages/available_packages_by_date.html

显然，这是个表格，很容易爬取：

library(rvest)
library(tidyverse)
# lubridate 是处理日期的一个 R 包
library(lubridate)
library(hrbrthemes)

# 需要耐心地等待一会儿
pkg <- "https://mirrors.tuna.tsinghua.edu.cn/CRAN/web/packages/available_packages_by_date.html" %>% 
  read_html() %>% 
  html_table() %>% 
  .[[1]] %>% 
  as_tibble() %>% 
  mutate(
    Date = ymd(Date),
    Year = year(Date),
    Month = month(Date)
  )

# install.packages("ggchicklet", repos = "https://cinc.rud.is")
library(ggchicklet)
pkg %>% 
  group_by(Year, Month) %>% 
  count() %>% 
  ggplot(aes(x = factor(Year), y = n)) + 
  geom_chicklet(aes(fill = factor(Month)),
                width = 0.75, 
                radius = grid::unit(3, "pt")) + 
  theme_ipsum(base_family = enfont,
              grid = "X") + 
  coord_flip() + 
  scale_fill_brewer(name = "Month",
                    palette = "Paired",
                    breaks = 1:12,
                    labels = month.name) + 
  theme(axis.text.x = element_text(color = "gray60", 
                                   size = 10)) +
  theme(legend.position = "right") + 
  guides(fill = guide_legend(ncol = 1)) + 
  labs(
    title = "Number of R packages on CRAN",
    subtitle = "Created by TidyFriday @ czxa.top",
    caption = "Data Source: \nhttps://mirrors.tuna.tsinghua.edu.cn/CRAN/",
    x = "",
    y = "")

按年统计：

pkg %>% 
  group_by(Year) %>% 
  count() %>% 
  ggplot() + 
  geom_chicklet(aes(x = factor(Year), y = n,
                    fill = factor(Year))) + 
  geom_label(aes(x = factor(Year),
                 y = n + 200,
                 label = n),
             family = enfont,
             color = '#444444', 
             label.size = 0, 
             size=3) +
  scale_fill_manual(
    values = c(RColorBrewer::brewer.pal(4, "Paired"), 
               RColorBrewer::brewer.pal(10, "Paired"))
  ) + 
  theme_ipsum(base_family = enfont) + 
  theme(legend.position = "none") + 
  labs(
    title = "Number of R packages on CRAN",
    subtitle = "Created by TidyFriday @ czxa.top",
    caption = "Data Source: \nhttps://mirrors.tuna.tsinghua.edu.cn/CRAN/",
    x = "",
    y = "")

可以看到，今年截止到今天，CRAN 上一共有 15334 个 R 包，今天新发布的 +
更新的有 6428 个！

更多问题欢迎在 TidyFriday 知识星球提问！

也可以添加我的微信了解社区的详细内容：

学习小组Day4 Rstudio--及时雨
参考生信星球公众号教程 R 和 Rstudio安装Rstudio界面常用R包安装 1. R 和 Rstudio...
R语言的基础环境搭建
R 语言安装说明注意：R 和 RStudio 都要安装。要先安装R，然后安装 RStudio。一、下载安装包 ...
学习小组day4-嘻哈哈
R语言基础 1. 安装R和Rstudio 搜索下载R和Rstudio【安装路径不能有中文】 2. 认识R和Rstu...
第四章第一节 R、RStudio和ggplot2简介
4.1 R and RStudio简介 ①安装R、RStudio和R包：R可以从http://www.r-pro...
R的介绍及安装
R的介绍R的简介R的优势R的学习方法 R及RStudio的安装R的安装RStudio的安装RStudio的界面 R...
学习小组Day4笔记-Herobrine
R语言入门 R和Rstudio RStudio是R的一个集成开发环境。下载安装好R和Rstudio,需要使用R语言...
R语言入门_R和Rstudio安装与使用
主要围绕以下几方面学习 R和Rstudio的简介R和Rstudio的下载及安装Rstudio新建Rproject和...
学习小组Day-4笔记--丁览博
R语言基础 1.认识R和Rstudio 2.安装R和Rstudio -bing 官网下载 3.Rstudio外观设...
Day4陈海影
R和Rstudio的学习准备工作下载和安装R和Rstudio 了解R 完成简单作图 plot(rnorm())...
《学习小组Day4笔记》--范若辰
1.安装R4.0.5和Rstudio软件 2.R&Rstudio： R是一种编程语言；RStudio为R提供了多种...