************************************************1000除频数操作

tab f, matrow(x) matcell(y)

*f是相关变量。列向量x的各分量即f的各种取值（由小到大），列向量y的各分量即f的各种取值（由小到大）的频数

clear

*关闭原数据文件

svmat x

svmat y

*生成新数据文件：x1即f的各种取值（由小到大），y1即f的各种取值（由小到大）的频数

replace y1=y1/1000

************************************************频率（百分数）四舍五入操作，小数点后只保留一位

tab f, matrow(x) matcell(y)

clear

svmat x

svmat y

egen n=sum(y1)

replace y1=round(100*y1/n, 0.1)

[此贴子已经被作者于2008-9-30 7:02:32编辑过]

谢谢！楼上好牛啊～

我有个问题，如果要对上面的求频数的问题进行循环操作，用foreach么，该怎么做呢，比如f1-f10？

如果想新生成一个数据库，f1-f10的各种取值的个数未必相等。

foreach v of varlist f1-f10{

tab `v', matrow(`v'x) matcell(`v'y)

svmat `v'x

svmat `v'y

egen n=sum(`v'y1)

replace `v'y1=round(100*`v'y1/n, 0.1)

drop n

}

keep f*x* f*y*