stata等间隔分组

有一组收入数据，从1到3000000，我想分成1000组，也就是收入从小到大排列后，收入差距每隔3000划为一个组。不是等分成1000分，也不是用1000分位数。

我想了一个办法，但是不会写循环。
gen group=1000
replace group=999 if total_income<=3000000-3000*1
replace group=998 if total_income<=3000000-3000*2

……
……
replace group=1000-i if total_income<=3000000-3000*i （i 从1到999）
……
replace group=1 if total_income<=3000000-3000*999

你若要问程序，永远附上相关资料；若附上资料，永远用 dataex 印出资料。
1.        先 ssc install dataex (并见说明)，将原始 Stata 资料中具有”代表性”的一部分资料列出，以供有意回答者实验之用，并能提供具体操作指令。
2.        请参考说明https://bbs.pinggu.org/thread-5048204-1-1.html。

如下

1. gen group=.
   
2. forvalues i=1(1)1000{
   
3. replace group=`i' if total_income<=3000*`i' & total_income>3000*(`i'-1)
   
4. }

复制代码

我也遇到这个问题，有不写循环的解决办法嘛？？