The R Project SVN R

Rev

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

Rev 59039 Rev 61153
Line 51... Line 51...
51 
  \code{\link{matplot}} some examples of which use
 51 
  \code{\link{matplot}} some examples of which use
52 
  \code{iris}.
 52 
  \code{iris}.
53 
}
 53 
}
54 
\examples{
 54 
\examples{
55 
dni3 <- dimnames(iris3)
 55 
dni3 <- dimnames(iris3)
56 
ii <- data.frame(matrix(aperm(iris3, c(1,3,2)), ncol=4,
 56 
ii <- data.frame(matrix(aperm(iris3, c(1,3,2)), ncol = 4,
57 
                        dimnames = list(NULL, sub(" L.",".Length",
 57 
                        dimnames = list(NULL, sub(" L.",".Length",
58 
                                        sub(" W.",".Width", dni3[[2]])))),
 58 
                                        sub(" W.",".Width", dni3[[2]])))),
59 
    Species = gl(3, 50, labels=sub("S", "s", sub("V", "v", dni3[[3]]))))
 59 
    Species = gl(3, 50, labels = sub("S", "s", sub("V", "v", dni3[[3]]))))
60 
all.equal(ii, iris) # TRUE
 60 
all.equal(ii, iris) # TRUE
61 
}
 61 
}
62 
\keyword{datasets}
 62 
\keyword{datasets}