The R Project SVN R

Rev

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

Rev 8893 Rev 23011
Line 17... Line 17...
17 
\seealso{
 17 
\seealso{
18 
  \code{\link{diag}},
 18 
  \code{\link{diag}},
19 
  \code{\link{matrix}}.
 19 
  \code{\link{matrix}}.
20 
}
 20 
}
21 
\examples{
 21 
\examples{
22 
m2 <- ma <- matrix(1:20, 4, 5)
 22 
(m2 <- matrix(1:20, 4, 5))
- 
 
 23 
lower.tri(m2)
23 
m2[lower.tri(m2)] <- NA
 24 
m2[lower.tri(m2)] <- NA
24 
m2
 25 
m2
25 
stopifnot(lower.tri(ma) == !upper.tri(ma, diag=TRUE))
 - 
 
26 
}
 26 
}
27 
\keyword{array}
 27 
\keyword{array}