> How would I make the default behaviour of my plots produce output such
> as the following (i.e. tick marks inside on all axes, labels only on two
> (arbitrary?) sides) without needing the five additional commands each
> time?
> 
> plot(1:10, axes=FALSE)
> axis(1, tcl=0.5)
> axis(2, tcl=0.5)
> axis(3, tcl=0.5, labels=FALSE)
> axis(4, tcl=0.5, labels=FALSE)
> box()

Use a custom plotting function, e.g.
myplot <- function(..., sidesforlabels)
{
   #sidesforlabels should be a numeric vector containing the sides that 
you want labels on
   plot(..., axes=FALSE)
   par(tcl=0.5)
   for(i in 1:4)
   {
      axis(i, labels=i %in% sidesforlabels)
   }
   box()
}

myplot(1:10, sidesforlabels=1:2)

Regards,
Richie.

Mathematical Sciences Unit
HSL


------------------------------------------------------------------------
ATTENTION:

This message contains privileged and confidential inform...{{dropped:20}}

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to