R语言-画散点图

最新推荐文章于 2023-07-14 01:02:29 发布

weixin_30724853

最新推荐文章于 2023-07-14 01:02:29 发布

阅读量2.8k

点赞数 2

文章标签： r语言 java

原文链接：http://www.cnblogs.com/all1008/p/10027002.html

版权

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)")