雷达回波的ISLR计算

function islr=islrfunc（x）

l=length（x）;
a=find（x==max（x））;
i=1;
for k=a-1:-1:2
    if（x（k）-x（k-1）<0&&x（k）-x（k+1）<0）
        lindian（i）=k;
        i=i+1;
    end
end
lindian1=max（lindian）;

lindian=0;
i=1;
for k=a+1:l-1
    i