The R Project SVN R

Rev

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

Rev 27601 Rev 30448
Line 40... Line 40...
40 
  \code{\link{plot.xy}},
 40 
  \code{\link{plot.xy}},
41 
  \code{\link{plot.default}}.
 41 
  \code{\link{plot.default}}.
42 
}
 42 
}
43 
\examples{
 43 
\examples{
44 
##--- An example for the use of 'asp' :
 44 
##--- An example for the use of 'asp' :
45 
library(stats)  # normally loaded
 45 
require(stats)  # normally loaded
46 
data(eurodist)
 - 
 
47 
loc <- cmdscale(eurodist)
 46 
loc <- cmdscale(eurodist)
48 
rx <- range(x <- loc[,1])
 47 
rx <- range(x <- loc[,1])
49 
ry <- range(y <- -loc[,2])
 48 
ry <- range(y <- -loc[,2])
50 
plot(x, y, type="n", asp=1, xlab="", ylab="")
 49 
plot(x, y, type="n", asp=1, xlab="", ylab="")
51 
abline(h = pretty(rx, 10), v = pretty(ry, 10), col = "lightgray")
 50 
abline(h = pretty(rx, 10), v = pretty(ry, 10), col = "lightgray")