x<-runif(50,0,2)#生成50个(0,2)区间服从均匀分布的随机数
y<-runif(50,0,2)#同上
plot(x,y,main = "Main title",sub = "subtitle",
xlab="x-label",ylab="y-label")#绘图添加主标题,副标题,x轴标签,y轴标签
text(0.6,0.6,"text at (0.6,0.6)")#在0.6,0.6处添加文本text at (0.6,0.6)
abline(h=.6,v=.6)#h参数表示在0.6的水平直线,v参数表示在0.6的竖直直线
#函数lines()其作用是在已有图上加线,命令为lines(x,y),其功能相当于plot(x,y,type="1")
for (side in 1:4) mtext(2:5,side=side,at=.7,line = -1:4)
#for循环,side为循环对象,循环体mtext(2:5,side=side,at=.7,line = -4:-1);line参数控制在边界的具体位置
#当循环体只有一行时,大括号可以省略
mtext(paste("side",1:4),side=1:4,line = -1,font = 2)
函数mtext(需添加的,绘图边界方位,具体坐标,对应位置,字体参数)
plot(x,y,type = "n",xlab = "",ylab = "",axes = F)
#绘制完全空白的图形,type=‘n’使点不被绘制,axes=F删掉坐标以及图周围的方框,x和y标题标签设置成空字符串
points(x,y)#添加点
axis(1)#添加横坐标轴
axis(2,at=seq(0.2,1.8,0.2))#添加纵坐标轴,标示0.2到1.8以0.2为步长
box()#添加方框
title(main="Main title",sub="subtitle",
xlab="x-label",ylab="y-label")#添加主标题,小标题,x和y标题
d<-par(mar=c(5,4,4,2)+.1)#mai的默认值,从下端开始逆时针设置
plot(x,y,type="n",xlab="",ylab="",axes=F)
box()
d<-par(mar=c(4,4,2,2)+.1)#修改mai的值
plot(x,y,type = "n",xlab="",ylab="",axes = F)
box()
x<-rnorm(100)#生成100个服从正态分布的随机数
hist(x,freq = F)#freq=F参数保证了直方图是根据比例绘制
hist(x)#根据绝对数值绘制直方图
curve(dnorm(x),add=T)#curve画x变量的密度函数曲线,add=T允许它叠加到已有的图上
h<-hist(x,plot=F)#plot=F将不会画出任何图形,但是返回一个以比例尺度表示的直方图条形高度的结构
ylim<-range(0,h$density,dnorm(0))#range寻找里面参数的最小和最大值,dnorm(0)标准正态在零的密度值
hist(x,freq = F,ylim = ylim)#y值的范围通过ylim(参数)=ylim保证
curve(dnorm(x),add=T)#curve画x变量的密度函数曲线,add=T允许它叠加到已有的图上