R课程记录--第一课

R课程记录–第一课@TOC

本篇的文章结构
1 R的安装以及R studio的安装。
2 老师提供的练习网页的学习。出现的错误，以及订正的方法。

R的安装

R的安装主要步骤：

1. 找到R的官网https://cran.r-prigect.org/.可以找到最新的版本
2. ，也可以下载最好用的3.5.3.还可以考虑微软发行的开源R版本。

Rstudio的安装

作为R的调试版本。可以下载的地址是https://www.rstudio.com/

课程的内容

练习一

1 安装包
install.packages(‘tidyverse’)
install.packages(‘modelr’)
install.packages(‘gapminder’)
install.packages(‘ggbeeswarm’)
install.packages(‘gganimate’)
install.packages(‘ggstance’)
2 加载library
library(tidyverse)
library(modelr)
options(na.action = na.warn)
library(gapminder)
library(ggbeeswarm)
library(gganimate)
library(ggstance)

一定要检查上述的package和library是否安装正常。
3 查看“gapminder”的数据出来没
4
gapminder %>%
ggplot(aes(year, lifeExp, color = country)) +
geom_line(alpha = 1/3) +
scale_color_viridis_d(guide = F)

练习二

1 在上述package和library的基础上，输入代码
animate_df <- gapminder %>%
filter(continent == ‘Asia’) %>%
arrange(year, lifeExp) %>%
mutate(order = 1:n())

animate_fills <- viridis::viridis(33)
animate_fills[5] <- ‘red’
p <- animate_df %>%
ggplot(aes(lifeExp, order, fill = country)) +
geom_barh(stat = “identity”) +
labs(title=’{closest_state}’) +
scale_fill_manual(values = animate_fills, guide = F) +
scale_y_continuous(breaks=animate_df$order,labels=animat{e}_{d}f$country, expand = c(0, 0)) +
transition_states(year, transition_length = 1, state_length = 50) +
view_follow(fixed_x = T) +
ease_aes(‘linear’)
animate(p, nframes = 60)

• 提示报错p变量为有数值。差错发现p变量在animat_df这个数据就出现未传递的情况。

老师提供了新版的代码
animate_df <- gapminder %>%
filter(continent == ‘Asia’) %>%
arrange(year, lifeExp) %>%
mutate(order = 1:n())

animate_fills <- viridis::viridis(33)
animate_fills[5] <- ‘red’
animate_df %>%
ggplot(aes(lifeExp, order, fill = country)) +
geom_barh(stat = “identity”) +
labs(title=’{closest_state}’) +
scale_fill_manual(values = animate_fills, guide = F) +
scale_y_continuous(breaks=animate_df$order,labels=animat{e}_{d}f$country, expand = c(0, 0)) +
transition_states(year, transition_length = 1, state_length = 50) +
view_follow(fixed_x = T) +
ease_aes(‘linear’)
补充解决的方法是加载了’devtools’的安装包，以及devtools::install_github(‘thomasp85/gganimate’) 的代码。并添加了library(ggplot2) 和library(gifski)。出现图形