用plotrix包做双坐标轴图
library(plotrix)x<-df$time ##df为22个股票交易日数据y1<-df$开盘价y2<-df$交易额df如图:xpos<-1:22twoord.plot(xpos,y1,xpos,y2,lcol=4,rcol=2,rylim=c(...
library(plotrix)x<-df$time ##df为22个股票交易日数据y1<-df$开盘价y2<-df$交易额df如图:xpos<-1:22twoord.plot(xpos,y1,xpos,y2,lcol=4,rcol=2,rylim=c(...