*若每行x*取值互异
egen r1=rowmax(x*)
foreach v of var x*{
g d`v'=cond(`v'-r1<0,`v',.)
}
egen r2=rowmax(d*)
keep id x* r2
*若每行x*最大值不唯一
egen r1=rowmax(x*)
foreach v of var x*{
g d`v'=cond(`v'-r1<0,`v',.)
g s`v'=(`v'-r1)==0
}
egen rs=rowtotal(s*)
egen rm=rowmax(d*)
g r2=cond(rs>1,r1,rm)
keep id x* r2