这个可以使用egen命令+group（）选项给每家上市公司产生一个新的连续编号变量，如group变量（如第一家上市公司group赋值1，第二家赋值2，如此等等）。然后再用forvaule循环语句进行删选

删选条件如下：将每家上市公司的group变量进行求和，然后除以30，如果所得的结果大于等于group本生，则符合大于等于30个观察值的要求，则保留，其他则删除。

以上操作应该可以达到楼主的要求。

麻烦哪位高人看一下我的命令，我是要删除观察值小于36个的公司，我按照2楼朋友的建议写的程序，不知道为什么按我的程序算出来只删除了第一家公司（19个观察值）和第二家公司的前36个观察值，我数据一共有28213家公司。急求，跪谢各位高人了

我的程序
xtset ID date
egen id=group(ID)
forvalues i=1/28213 {
   quietly sum(id) if id==`i'
   drop if sum(id)/id<=36 & id==`i'
}

*-Try this one:

xtset code date
bysort code: gen N = _N
drop if N<=36