R語言繪製雙座標圖直方圖與折線的結合

par(mar = c(5, 5, 3, 4)+0.1) #似乎是設置圖片位置 bar<-barplot(gu[1:22,6],xlim=c(0.5,26),ylim=c(0,200000),ylab="交易量", col="blue",col.axis="blue",col.lab="blue") mtext(c(1:22),side=1,line=1,at=bar,cex=0.8,col="b

>>阅读原文<<