基本绘图函数:plot的使用
阅读原文时间:2023年07月08日阅读:1

注意:“##”后面是程序输出结果

例如:

par("bg") # 命令复制

[1] "white" # 结果

基本绘图函数:
      plot:散点图
      hist:直方图
      boxplot:箱线图
      points:添加线
      lines:添加线
      text:添加文字
      title:标题(main)、坐标(xlab、ylab)、字幕(sub)等的设置
      axis:坐标轴设置

  1. plot
  • 常用参数:xlab/ylab/lwd/lty/pch/col

    lwd-线宽

    lty-线型

    pch:点类型

  1. par:类型设置(用于全局的设定,会影响后期图形)
  • 常用参数: bg

    mar(边距)

    las(标签设置,水平or竖直)

# 0:always parallel(平行) to the
axis [default]

 # 1:always horizontal

 # 2:always perpendicular(垂直) to the axis

 # 3:always vertical

mfrow(子图,行填充)/mfclo(子图,列填充)

  • ?par 可查看帮助

  • 查看默认值:

    par("bg")

[1] "white"

par("mar")

## [1] 5.1 4.1 4.1 2.1

  1. plot练习

with( airquality,
plot( Wind,Temp,main="wind and Temp in NYC",type="n") # type="n"画出除点之外的部分
)

#-按月份画点-#
with(
airquality[airquality$Month==9, ],
points( Wind,Temp,col="red" )
)
with(
subset(airquality,Month==8), # subset 取子集,对比上面
points( Wind,Temp,col="blue" )
)
with(
subset(airquality,Month %in% c(5,6,7) ), # %in%
points( Wind,Temp,col="yellow" )
)

#--拟合--#
fit<-lm( Temp~Wind,airquality ) # 因变量~自变量
abline( fit,lwd=2 ) # abline:加入拟合线

#--添加图例--#
legend(
"topright", # 位置:右上角
pch=1, # 1-表示圆圈,2-三角形。。。
col=c( "red","blue","yellow" ),
legend=c( "九月","八月","其他" )
)
dev.off()

null device

1

  1. par练习

default.par<-par() # 保存默认设置 par(bg = "lightgrey") # 背景颜色设置 with(airquality, hist(Wind) )

1

par( mfrow = c(2,2) )
par(las = "0")
with(
airquality,
plot(Wind,Temp,main="las=\"0\"")
)

#-注意with的使用-#
with(
airquality,{
par(las = "1")
plot(Wind,Temp,main="las=\"1\"")

par(las = "2")  
plot(Wind,Temp,main="las=\\"2\\"")

par(las = "3")  
plot(Wind,Temp,main="las=\\"3\\"")  复制

}
)

小结 1. par设置可利用帮助学习(全局设置)。

 - las设定坐标轴标签方向<0-平行坐标轴,1-水平,2-垂直坐标轴,3-竖直的,个人比较喜欢“1”>

2. with构建数据集

 with(data,

 {

           
exp1

            exp2

 }

 )

3. with与attach的区别:

         attach存在隐患,当数据集与内存中已存在的变量重名时会出现错误。with则是封闭在数据框的环境中进行运算,不会与外在环境中的对象相冲突,因此,没有以上的隐患。

4. 拟合 lm( 因变量 ~ 自变量, data) abline( 拟合返回对象 )