R语言里的点样式pch

　　在R语言中，点的样式由pch的取值决定。
　　当pch取0~14时，其点为空心点，可以用col(颜色)参数设置其边框的颜色；
　　当pch取15~20时，其点是实心点，可以用col参数设置其填充的颜色；
　　当pch取21~25时，其点也是实心点，既可以用col参数设置边框的颜色，也可以用bg参数设置其内部的填充颜色。　　
　　pch不仅包括正方形、圆、上三角、倒三角、菱形等常规图形，还包括之类的特殊图形，如图(1)所示。　　

图(1) 点的样式pch
　　数据源：online shop.txt　　

period  amount
2008    1281.8
2009    2630.0
2010    4610.0
2011    7846.5
2012    13040.0
2013    18500.0
2014    24500.0
2015    30200.0
2016    36000.0   

　　绘制9种类型的点样式
　　//point.R　　

##读取数据
dat <- read.table("G:/myProject/RDoc/Unit2/rChap6/online shopping.txt",head=T)
attach(dat)

##绘制9种图，每行三个
par(mfrow=c(3,3))
##空心圆点
plot(period,amount, pch=1,col="red",bg="yellow",cex=1.5)
title("online shopping",font.main=3, adj=1)

##上三角
plot(period,amount, pch=2,col="red",bg="yellow",cex=1.5)
title("online shopping",font.main=3, adj=1)

## 加号+
plot(period,amount, pch=3,col="red",bg="yellow",cex=1.5)
title("online shopping",font.main=3, adj=1)

##乘号×
plot(period,amount, pch=4,col="red",bg="yellow",cex=1.5)
title("online shopping",font.main=3, adj=1)

##空心菱形
plot(period,amount, pch=5,col="red",bg="yellow",cex=1.5)
title("online shopping",font.main=3, adj=1)

##倒三角
plot(period,amount, pch=6,col="red",bg="yellow",cex=1.5)
title("online shopping",font.main=3, adj=1)

##实心正方形
plot(period,amount, pch=22,col="red",bg="yellow",cex=1.5)
title("online shopping",font.main=3, adj=1)

##实心菱形
plot(period,amount, pch=23,col="red",bg="yellow",cex=1.5)
title("online shopping",font.main=3, adj=1)

##实心上三角
plot(period,amount, pch=24,col="red",bg="yellow",cex=1.5)
title("online shopping",font.main=3, adj=1)

　　
　　效果如下：　　

图(2) 9种点样式