meanfunction2.asv

来自「图论中的匈牙利算法」· ASV 代码 · 共 19 行

clc;
clear;
a=zeros(15,12);
b=zeros(15,12);
c=zeros(15,12);
fp1=fopen('G:\txt\rand.txt','r');
fp2=fopen('G:\txt\ready.txt','w');
for i=1:100000
aa=fscanf(fp1,'%f',180*1);
a=reshape(aa,15,12);
b=round(a*10000);
c=mod(b,12);
    for m=1:15
        for n=1:12
            fprintf(fp2,'%d\n',c(m,n));
        end
    end
end