补一下图

怎么图显示不出来，汗

这个东西很难吗？
data new;
num=_n_;
set work.try;
if x ge y;
drop y;
run;
proc print data=new;
run;

/*确定第一个x>=y的行数*/
data a1;
set try;
obs=_n_;
if x>=y;
run;
proc sql noprint;
select min(obs) as a into :aa
from a1;
quit;
/*取值*/
data try1;
set try;
if _n_>=&aa;
run;

data a;
input x y @@;
cards;
1 9 2 9 3 9 7 9 4 9 2 9 3 9 9 9 12 9 34 9 56 9 8 9 9 9 56 9 5 9 5 9 4 9 21 9
;

data test;
        set a;
        num=_n_;
        if x ge y then indicator=num;
                else indicator='';
run;

proc sql;
        create table test1(drop=num minimum) as
        select x, y, num,
                   min(indicator) as minimum
        from test
        having num ge calculated minimum;
quit;