The R Project SVN R

Rev

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

Rev 25118 Rev 30448
Line 23... Line 23...
23 
  \emph{Modern Applied Statistics with S.}
 23 
  \emph{Modern Applied Statistics with S.}
24 
  New York: Springer (4th ed).
 24 
  New York: Springer (4th ed).
25 
}
 25 
}
26 
\seealso{\code{\link{which.max}} for vectors.}
 26 
\seealso{\code{\link{which.max}} for vectors.}
27 
\examples{
 27 
\examples{
28 
data(swiss)
 - 
 
29 
table(mc <- max.col(swiss))# mostly "1" and "5", 5 x "2" and once "4"
 28 
table(mc <- max.col(swiss))# mostly "1" and "5", 5 x "2" and once "4"
30 
swiss[unique(print(mr <- max.col(t(swiss)))) , ] # 3 33 45 45 33 6
 29 
swiss[unique(print(mr <- max.col(t(swiss)))) , ] # 3 33 45 45 33 6
31 
}
 30 
}
32 
\keyword{utilities}
 31 
\keyword{utilities}
33 
\keyword{array}
 32 
\keyword{array}