Displaying 1 result from an estimated 1 matches for "nospacm".
Did you mean:
nospace
2004 Feb 24
6
be careful: using attach in R functions
...<- c(one, two, three)
sample(x, 1)
}
test <- function(n=400){
timeu <- numeric(n)
for(i in seq(n)){
timeu[i] <-
system.time({
resi <- f()
})[3]
}
plot(timeu)
}
test()
##############################
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡Li Dongfeng
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡ldf-nospacm at math.pku.edu.cn
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡2004-02-24