SAS的R切割功能

Question

在R中，我可以使用内置的cut函数轻松地重新编码数字变量：

> test <- c(1, 2, 7, 9, 12, 15)
> cut(test, breaks=c(0, 2, 5, 10, 20))
[1] (0,2]   (0,2]   (5,10]  (5,10]  (10,20] (10,20]
Levels: (0,2] (2,5] (5,10] (10,20] 

是否有一种简单的方法可以获得与SAS类似的结果？

为方便起见的示例数据：

data test;
    input x;
    datalines;
    1
    2
    7
    9
    12
    15
run;