转成文本，取第一位，检查，然后该干嘛干嘛，完了可以转回数值

如果你可能以4开头的那个变量x是一个字符变量，你要根据这个变量生成一个虚拟变量dum,如果x以四开头，则dum取1，如果不是dum取0.可以用下面的命令
gen dum=.
replace dum=1 if substr(x,1,1)=="4"
replace dum=0 if substr(x,1,1)!="4"
如果接下来你只想找出dum=1的观测值看一下你可以用下面的命令
browse if dum==1

学习了！