Is there a build in function to create an index for tapply or by given a
a numeric vector x an a vector of breaks?

What I want to do is:

x <- 1:100
breaks <- c(0,10,20,50,99,110)

y <- rep(0,length(x))
for(i in 2:length(breaks)){
  y[which(x>breaks[i-1] & x <= breaks[i])] <- i
}

by(x,y,sum)

but I find the code especially th for loop unneRving.


-- 
Witold Eryk Wolski

	[[alternative HTML version deleted]]

