[R] Second axis on bottom of graph

Jim Lemon jim at bitwrit.com.au
Mon May 19 14:57:20 CEST 2014


On Mon, 19 May 2014 05:23:20 AM Hurr wrote:
> Thanks again Jim.
> Sorry, again I'm enclosing incomplete not-runnable code.
> Modified like this it works with the new staxlab function which
> I inserted before the second staxlab call.
> How long before I don't need to insert it?
> I didn't see a way to select the specific axis, so
> I used top.line=5. Is that what I should do?
> 
> 
axis(1,tick=TRUE,at=horTicLocs,labels=rep("",length(horLabels)),padj=0)
> staxlab(1,at=horTicLocs,labels=horLabels,srt=90,adj=c(1,0))
> nFrqTicInvls=9; frqTicLocs <- vector(length=nFrqTicInvls+1); frqLabels 
<-
> vector(length=nFrqTicInvls+1);
> frqInvl=(horAxisLims[2]-horAxisLims[1])/nFrqTicInvls
> for(i in 1:(nFrqTicInvls+1))frqTicLocs[i]=horAxisLims[1]+(i-1)*frqInvl
> for(i in
> 1:
(nFrqTicInvls+1))frqLabels[i]=.jcall(OuWid,"S","sR",frqTicLocs[i],as.integ
> er(4)) for(i in 1:(nFrqTicInvls+1))print(frqLabels[i])
> 
axis(1,tick=TRUE,line=3.5,at=frqTicLocs,labels=rep("",length(frqLabels)),pad
> j=0) staxlab(1,top.line=5,at=frqTicLocs,labels=frqLabels,srt=90)
> title(xlab="Cycles/Yr",line=6)
> 
> Hurr

I guess top.line=5 would be almost off the bottom of the plot. I assume 
that you know how it should look (I don't) and can adjust the top.line 
value until it looks right. the next version of plotrix will probably be out 
in a week or two.

Jim



More information about the R-help mailing list