提取数据中的非负数，不改变顺序，并储存到一个txt文件中

      一组数组 1 -2 6 7 8 -3 4 -6 7 -9，提取数据中的非负数，不改变顺序，并储存到一个txt文件中。

clc;
a=[1 -2 6 7 8 -3 4 -6 7 -9];
j=1;
l=1;
for i=1:10
    d=a(i);
    if (d>=0)
        b(j)=d;
         j=j+1;
    else
        c(l)=d;
        l=l+1;
    end
end
%dlmwrite('a.txt',b,'delimiter', '\t')
fid=fopen('shuju.txt','wt');              %需要改文件名称的地方
fprintf(fid,'%d',b);         
fclose(fid);