clear;
A=xlsread('table.xlsx');

for row=2:size(A,1)
   s=1; 
for i=6:202
    if A(row,i)*A(row,i+1)<0
        x1(row,s)=i;
        s=s+1;
    end
    if s>2
        dia(row)=x1(row,2)-x1(row,1);
        break;
    end
end
t(row)=A(row,1);
end
plot(t,dia)