function [y,y2,peaktopeak,numofL,numofR]=jianfeng(x)
lengthofx=size(x);
rowlengthofx=lengthofx(1);
y=zeros(rowlengthofx,32);

for i=1:rowlengthofx
    for j=2:32
        y(i,j)=x(i,j)-x(i,j-1);                   
    end
end
for i=1:rowlengthofx
    peaktopeak(i)=max(y(i,:))-min(y(i,:));
end


for i=1:rowlengthofx
    for j=2:32
        y2(i,j)=y(i,j)-y(i,j-1);                   
    end
end

for i=1:rowlengthofx
    numofL(i)=length(find(y(i,1:15)>0));
end

for i=1:rowlengthofx
    numofR(i)=length(find(y(i,16:32)<0));
end