R语言中plot()函数里的6种边框

     R语言中，设置plot(x,y,'..., bty="o",..)里参数bty，就可以不同的6种边框了。

     bty可以取6种字符，分别为“o”、“l”、“7”、“c”、“u”、“]”。这些字符代 表6种边框。

     bty=“o” 绘制图形的上边框、下边框、左边框和右边框；注意这是小写的O

     bty="l" 绘制图形的左边框和下边框；注意这是小写的L

     bty="7"绘制图形的上边框和右边框；

     bty="c"绘制图形的上边框、下边框和左边框；

     bty="u"绘制图形的左边框、下边框和右边框；

     bty="]"绘制图形的上边框、下边框和右边框；

     这些字符很形象，比如看到O，由于O是封闭的，所有要画四条边框，

                                     比如看到7，它是有上面的一横 + 右边的一竖，所以要画上边框和右边框。

R语言实现的代码如下：

x.text <- c("1月","2月","3月","4月","5月","6月",
            "7月","8月","9月","10月","11月","12月")
sales.volume <- c(158721,190094,108441,88092,68709,50116,
                  90117,160044,186045,106334,89092,104933)
#par(mfrow=c(2,3))
## O表示四条边都要画
 plot(sales.volume,type="b",ylim=c(20000,250000),xaxt="n",yaxt="n",
     main="bty默认取\"o\"",xlab="月份",ylab="销量")


## L表示只画左边和底部，象形字(看字知意)
# plot(sales.volume,type="b",ylim=c(20000,250000),xaxt="n",yaxt="n",bty="l",
#     main="bty取\"l\"",xlab="月份",ylab="销量")

## 7表示画右边和上部，象形字
# plot(sales.volume,type="b",ylim=c(20000,250000),xaxt="n",yaxt="n",bty="7",
#     main="bty取\"7\"",xlab="月份",ylab="销量")

## c表示画左边、上部和下部
# plot(sales.volume,type="b",ylim=c(20000,250000),xaxt="n",yaxt="n",bty="c",
#     main="bty取\"c\"",xlab="月份",ylab="销量")

## u表示是画底部、左边和右边
plot(sales.volume,type="b",ylim=c(20000,250000),xaxt="n",yaxt="n",bty="u",
     main="bty取\"u\"",xlab="月份",ylab="销量")


## ]表示画右边、上部和下部
# plot(sales.volume,type="b",ylim=c(20000,250000),xaxt="n",yaxt="n",bty="]",
#     main="bty取\"]\"",xlab="月份",ylab="销量")


axis(1,at=1:12,labels=x.text,tick=FALSE); 
axis(2);

效果如下：

图（1）bty=“o”，画4条边框

图（2）bty="l"，画左边框和下边框