R基础操作

## 1.安装包

install.packages("包")

# 2.声明包

library("包")

# 3.查看变量模式

mode(x)

# 4.创建向量函数

seq(from to by length)   # 起尾间长
rep(x,each=?,times=?,length=?)   # 重复：先e（元素）后t（整个序列）
scan()          # 键盘输入函数

# 5.生成随机函数

rnorm(10,mean=10, sd=1)     # 生成随机正态分布
runif(n=10,min=1,max=20)   # 生成随机二项分布

# 6.排序问题

a<-c(1,3,4,2,5)
sort(a)   # a[order(a)]
order(a)  # 返回sort(a)中排序元素在原序列位置

# 7.绘图

7.1 基本图形

par(mfrow=c(3,3))   # 设置画布
set.seed(1234)      # 固定随机种子
x<-rnorm(10)        # x
plot(x,type="p")    # 散点图
plot(x,type="l")    # 折线图
plot(x,type="b")    # 散点+折线
plot(x,type="c")    # 去散点的折线图
plot(x,type="h")    # 类似直方图的铅垂线
plot(x,type="s")    # 梯形图
plot(x,type="o")    # 与b类似
plot(x,type="S")    # 梯形图
plot(x,type="n")    # 纯画布

输出图形如下：

7.2 设置图参数

par(mfrow=c(1,1))
plot(sin, -pi, 2*pi,main="sin(x)",sub="sin(x)的绘图")
或
plot(sin, -pi, 2*pi)
title(main="sin(x)",sub="sin(x)的绘图")

其中，main为主标题，sub为副标题，xlab/ylab横纵坐标轴标题。

字体大小：cex.main制定字号大小，默认为1。

字体形式：font.lab;font.axis:坐标轴刻度与标签的字体形式。从1-5依次为：常规、粗体、斜体、粗斜体和符号字体。

设置点、线的类型：在函数plot()中，指定点的类型是pch，可供选择的有25种，数字1-25表示；指定线条类型的参数是lty，可供选择的有6种，1-6表示。具体如下图：

 

设置颜色：1-8代表8种颜色，也可用col="red"表示。利用colors()可以返回R中所有颜色对应名称。

R中还有内置颜色可以选择，如：rainbow(),heat.colors(),具体如上图右。

par(mfrow=c(1,2))
pie(rep(1, 12), col = rainbow(12))
pie(rep(1, 12), col = heat.colors(12))

设置图例：legend()，实例：

par(mfrow=c(1,1))
plot(iris$Sepal.Length,iris$Sepal.Width,pch= as.numeric(iris$Species),
     col=2:4)
legend("topright",title="species",legend=c("setosa","versicolor",
                                             "virginica"),pch=1:3,col=2:4)

pch:点的类型

 设置网格线：grid(nx=20,ny=20),各20条网格线。

# 7.3 探索性分析：图形描述

plot	散点图
hist	直方图
Boxplot	箱线图
Stem	茎叶图
Barplot	柱形图
pie	饼图

7.3.1 直方图

op=par(mfrow=c(1,2))
hist(iris$Sepal.Length,col=rainbow(20),freq=T,main="")   # 频数图
hist(iris$Sepal.Length,col=rainbow(20),freq=F,main="")   # 频率图
lines(density(iris$Sepal.Length))    # 添加概率密度曲线

hist(x=data$Sepal.Width,breaks = 12,density = 10,angle = 45)
---------------------------------
相关参数

1.density :阴影线密度

2.angle:阴影线倾角

3.col:填充颜色

4.border:直方图边缘颜色

 

7.3.2 箱线图

par(mfrow=c(1,2))
boxplot(iris$Sepal.Length,col="red")
boxplot(iris$Sepal.Length,col="red",horizontal = T)   # 水平

----------针对分类变量，绘制条形图和饼图---------------

7.3.3 条形图

subset:符合条件的子集。

S.L<c(nrow(subset(iris,iris$S<=5)),nrow(subset(iris,iris$S>5&iris$S<=6)),...)                                       
barplot(S.L,col=rainbow(4))    # 彩虹四色

7.3.4 饼图

s<-matrix(S.L,nrow=1)   # 数值
names(s)=c("<=5","5-6","6-7","7")    # 标签
par(mfrow=c(1,2))       # 画布
pie(s,col=rainbow(4),labels=names(s))  # 饼图
pie3D(s,col=rainbow(4),labels=names(s),explode=0.05,labelcex = 0.9)   # 3D饼图

其它绘图参数

mar，控制图形边空大小，c(5,4,3,2)表示（下，左，上，右）边空分别为5，4，3，2。