[R] Second axis on bottom of graph

[Hurr]

The first ten lines of code work OK temporariy.
The final line is for a second more-usual axis.
But if I say line=4 to prevent its overwriting the 
first axis, it goes off the graph page.
How do I solve that prob;em?

install.packages('plotrix')
library(plotrix)
horAxisLims=c(0,7213)
verData=c(1,365,809,1252,1753,2191,2922,3409,3896,4383,4819,5255,5691,6128,6564,7000)
#not fussy 
horData=c(1,300,800,1200,1700,2100,2900,3400,3800,4300,4800,5200,5600,6100,6500,7000)
#not at tics 
horTicLocs=c(1,365,809,1252,1753,2191,2922,3409,3896,4383,4819,5255,5691,6128,6564,7000)
horLabels=c('1Yr','1Da','10.8Hr','7Hr','5Hr','4Hr','3Hr','2.57Hr','2.25Hr','2Hr','1.82Hr','1.67Hr','1.54Hr','1.43Hr','1.34Hr','1.25Hr')
plot(horData,verData,xaxt='n',xlim=horAxisLims)
axis(1,tick=TRUE,at=horTicLocs,labels=rep("",length(horLabels)))
staxlab(1,at=horTicLocs,labels=horLabels,srt=90,adj=c(1,0))
axis(1,labels=TRUE,tick=TRUE,line=3,at=NULL)




--
View this message in context: http://r.789695.n4.nabble.com/Second-axis-on-bottom-of-graph-tp4690696.html
Sent from the R help mailing list archive at Nabble.com.