stcol=size(tcol)
tcolnew=zeros(stcol(1),5);
for i=2:5
tcolnew(:,i)=(tcol(:,i-1)+tcol(:,i))/2;
end