关于真实盈余管理编程中存在的问题

最近在算真实盈余管理时，stata提示无效的语法，请各位帮忙看看问题出在哪里，谢谢啦！估计异常成产成本
label var A1 "1/A(t-1)"
label var Rev1 "S/A(t-1)"
label var Delta_Rev "△S/A(t-1)"
label var LD_Rev "△S(t-1)/A(t-1)"
local vv "PROD A1 Rev1 Delta_Rev LD_Rev"
egen g=group(year industry)

su g
loc n=r(max)     
g e=.

forv i=1/`n'{
   reg `vv' if g==`i'
   predict r if e(sample),r
   replace e=r if e(sample)
   drop r
}
drop g

下面的循环语句有问题