The R Project SVN R

Rev

Rev 61153 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 61153 Rev 61168
Line 22... Line 22...
22 
xinch(x = 1, warn.log = TRUE)
 22 
xinch(x = 1, warn.log = TRUE)
23 
yinch(y = 1, warn.log = TRUE)
 23 
yinch(y = 1, warn.log = TRUE)
24 
xyinch(xy = 1, warn.log = TRUE)
 24 
xyinch(xy = 1, warn.log = TRUE)
25 
}
 25 
}
26 
\arguments{
 26 
\arguments{
27 
  \item{x,y}{numeric vector}
 27 
  \item{x, y}{numeric vector}
28 
  \item{xy}{numeric of length 1 or 2.}
 28 
  \item{xy}{numeric of length 1 or 2.}
29 
  \item{warn.log}{logical; if \code{TRUE}, a warning is printed in case
 29 
  \item{warn.log}{logical; if \code{TRUE}, a warning is printed in case
30 
    of active log scale.}
 30 
    of active log scale.}
31 
}
 31 
}
32 
\examples{
 32 
\examples{
33 
all(c(xinch(),yinch()) == xyinch()) # TRUE
 33 
all(c(xinch(), yinch()) == xyinch()) # TRUE
34 
xyinch()
 34 
xyinch()
35 
xyinch #- to see that is really   delta{"usr"} / "pin"
 35 
xyinch #- to see that is really   delta{"usr"} / "pin"
36 
 
 36 
 
37 
## plot labels offset 0.12 inches to the right
 37 
## plot labels offset 0.12 inches to the right
38 
## of plotted symbols in a plot
 38 
## of plotted symbols in a plot
39 
with(mtcars, {
 39 
with(mtcars, {
40 
    plot(mpg, disp, pch = 19, main = "Motor Trend Cars")
 40 
    plot(mpg, disp, pch = 19, main = "Motor Trend Cars")
41 
    text(mpg + xinch(0.12), disp, row.names(mtcars),
 41 
    text(mpg + xinch(0.12), disp, row.names(mtcars),
42 
         adj = 0, cex = .7, col = 'blue')
 42 
         adj = 0, cex = .7, col = "blue")
43 
    })
 43 
    })
44 
}
 44 
}
45 
\keyword{dplot}
 45 
\keyword{dplot}