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