R语言怎么生成按照四分位数分组的变量？

之前都是用spss分箱分的 在R中要用什么代码呀 找了好久没用找到 求指教！