数据依据数列均值转换

具体形式如下：ID     var1       var2
1         8           1
2         6           1
3         3           0
4         2           0
5         5           1
var1中5个数字的均值为4.8，我的目的是：把大于或者等于均值（4.8）的数字转换为1，把小于均值（4.8）的数字转换为0。结果如第三列所示。
那么相应的stata命令是什么啊？谢谢大家

quietly sum var1
gen var_cat=var1>=`r(mean)'

楼上是对的，如果你想在数据表中列示均值的话可以，
egen mean_var1=mean(var1)
gen var2=1 if var1>=mean_var1
replace var2=0 if var1<mean_var1

谢谢二位的回答，hplcdadong先回答了我就把他的答案设为最优答案了。也非常谢谢“风向我吹”。