R语言--双坐标轴绘图

简介

之前绘图是靠R语言，只是R语言绘图相关的资料太少了，想要解决问题只能靠自己，实在不行我准备投靠python绘图，不过我相信R语言在一些领域还是会有人常用，我在此记录我遇到的一些问题，希望可以帮助到一些人。

数据

 

data=data[order(data$Xpos),]
CairoPNG(file = outF,width = 800,height = 500)
twoord.plot(lx=data$Xpos,ly=data$Y1,
            rx=data$Xpos,ry=data$Y2,
            xlim=c(1,24),
            rylim=c(0,max(data$Y2)),
            #lylim=c(0,100), 
            rcol='#1e90ff',lcol='red',
            xlab="X轴",rylab="Y2",ylab="Y1",
            type=c("b","bar"),xtickpos = data$Xpos,
            xticklab =data$X,lwd=2 )  
dev.off() 

 图

原本左右轴是互换的，只是Y2的坐标轴刻度会变成TRUE，

只好将Y1,Y2互换，然后去掉 lylim，图才会正常显示.

但是有一次报错

missing value where TRUE/FALSE needed

最后发现lylim不能去掉，为了解决问题，添加lytickpos，即可解决

 

data=data[order(data$Xpos),]
CairoPNG(file = outF,width = 800,height = 500)
twoord.plot(lx=data$Xpos,ly=data$Y1,
            rx=data$Xpos,ry=data$Y2,
            xlim=c(1,24),
            rylim=c(0,max(data$Y2)),
            lylim=c(0,100), 
            lytickpos = c(0,100),
            rcol='#1e90ff',lcol='red',
            xlab="X轴",rylab="Y2",ylab="Y1",
            type=c("b","bar"),xtickpos = data$Xpos,
            xticklab =data$X,lwd=2 )  
dev.off()