R語言-畫散點圖


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

 


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM