The R Project SVN R

Rev

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

Rev 59039 Rev 61153
Line 36... Line 36...
36 
\seealso{
 36 
\seealso{
37 
  \code{\link{par}}
 37 
  \code{\link{par}}
38 
}
 38 
}
39 
\examples{
 39 
\examples{
40 
x <- rnorm(1000)
 40 
x <- rnorm(1000)
41 
hist(x, xlim=c(-4,4))
 41 
hist(x, xlim = c(-4,4))
42 
usr <- par("usr")
 42 
usr <- par("usr")
43 
clip(usr[1], -2, usr[3], usr[4])
 43 
clip(usr[1], -2, usr[3], usr[4])
44 
hist(x, col = 'red', add = TRUE)
 44 
hist(x, col = 'red', add = TRUE)
45 
clip(2, usr[2], usr[3], usr[4])
 45 
clip(2, usr[2], usr[3], usr[4])
46 
hist(x, col = 'blue', add = TRUE)
 46 
hist(x, col = 'blue', add = TRUE)