plot()函数
plot(cars$dist~cars$speed， # y~x
main="XXX", # 画标题
xlab="XXX", #X坐标轴标题
ylab="XXX", #Y坐标轴标题
xlim=c(0,30), #设置X轴范围为从0到30
ylim=c(0,140), #设置Y轴范围为从0到140
xaxs="i", #设置X轴风格internal
yaxs="i", #设置Y轴风格internal
col="red", #设置“散点”的颜色为红色
pch=19) #设置散点的形状为实心圆点
示例
1.数据：R自带数据集cars
>cars
>plot(cars$dist~cars$speed)
结果如下图：
>cars
> plot(cars$dist~cars$speed, # y~x
+ main="Relationship between car distance & speed", # 画标题
+ xlab="Speed (miles per hour)", #X坐标轴标题
+ ylab="Distance travelled (miles)", #Y坐标轴标题
+ xlim=c(0,30), #设置X轴范围为从0到30
+ ylim=c(0,140), #设置Y轴范围为从0到140
+ xaxs="i", #设置X轴风格internal
+ yaxs="i", #设置Y轴风格internal
+ col="red", #设置“散点”的颜色为红色
+ pch=19) #设置散点的形状为实心圆点
结果如下图：
2.点图
> library(reshape)
> sales<-melt(citysales) #把宽表融合成窄表
> sales$color[sales[,2]=="ProductA"] <- "red" #sales数据增加color这一列
> sales$color[sales[,2]=="ProductB"] <- "blue"
> sales$color[sales[,2]=="ProductC"] <- "violet"
> dotchart(sales[,3], #画点图
+ labels=sales$City, #标城市名
+ groups=sales[,2], #按第二列分类
+ col=sales$color,pch=19,
+ main="Sales Figures",
+ xlab="Sales Revenue (1,000's of USD)")
