> x <- rnorm(100) > xx <- cut(x,3) > levels(xx) [1] "(-2.37,-0.716]" "(-0.716,0.933]" "(0.933,2.58]" > as.numeric(xx)