参见：
https://bbs.pinggu.org/thread-1204934-1-1.html

*-The Excess Return using extended-CAPM

*-假设 id year month 分别为公司代码，年度和月度标示。
*-     Ri 和 Rm 分别表示个股和市场月度回报率。
     
         egen m123 = group(year month), label lname(month123)
         tsset id m123
         xtdes
         global N = r(N)
         
     global  y "Ri"
         global  x "L.Rm Rm F.Rm"

         cap drop res
         cap drop R2
         cap drop R2_adj
     gen res  = .
         gen R2 = .
         gen R2_adj = .
         forvalues i = 1/$N{
           qui reg $y $x if (m123==`i')
           qui predict e if e(sample), res
           qui replace res = e if e(sample)
           qui replace R2 = e(r2) if e(sample)
           qui replace R2_adj = e(r2_a) if e(sample)
           drop e
         }                 
请问：
1       global  y "Ri"
         global  x "L.Rm Rm F.Rm"
——这两句，什么意思？
         cap drop res
         cap drop R2
         cap drop R2_adj
这组命令的作用是避免在进行第二组循环时出现 res already defined ?
2   drop e 的作用是什么？
3   这依然是个一重的循环；STATA可否做两重的循环？

3Q

1. help global  
我是想把被解释变量和解释变量分别放在两个全局暂元中。
    help capture
   你的理解没错，防止出现错误信息：…… already defined.   drop e 的作用也是相同的。
2. 可以做两重循环，参见 A5_prog 那一讲的内容。
   这个程序中，我已经通过 egen m123 = group(year month), label lname(month123) 命令，把本需两重循环的工作浓缩成了单重循环。

我昨天问你之前用过类似 drop e的办法，都没搞定双重循环。后来也是处理成单循环了。
处理之后的单循环和两重循环的计算量应该是一样的吧？
但我觉得要能用双重循环做出来还是很NB的，所以来问你，呵呵。而且，我觉得双重循环的程序看起来比较直观、漂亮。

如果穿一件衣服就能保暖，又何必非要穿两件呢？