The R Project SVN R

Rev

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

Rev 61433 Rev 61434
Line 95... Line 95...
95
}
95
}
96
\examples{
96
\examples{
97
for(i in 1:5) print(1:i)
97
for(i in 1:5) print(1:i)
98
for(n in c(2,5,10,20,50)) {
98
for(n in c(2,5,10,20,50)) {
99
   x <- stats::rnorm(n)
99
   x <- stats::rnorm(n)
100
   cat(n,":", sum(x^2),"\n")
100
   cat(n, ": ", sum(x^2), "\n", sep = "")
101
}
101
}
102
f <- factor(sample(letters[1:5], 10, replace = TRUE))
102
f <- factor(sample(letters[1:5], 10, replace = TRUE))
103
for(i in unique(f)) print(i)
103
for(i in unique(f)) print(i)
104
}
104
}
105
\keyword{programming}
105
\keyword{programming}