meanfunction7.m

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

clc;
clear;
a=zeros(15,1);
b=zeros(12,1);
fp=fopen('G:\txt\choose.txt','r');
fp1=fopen('G:\txt\stat.txt','w');
%for i=1:100000
    aa=fscanf(fp,'%f',15);
    fprintf(fp1,'%d\n',aa);
    a=reshape(aa,15,1);
    stat=0;
    for m=1:15
        temp=a(m,1)+1;
        b(temp,1)=1;
    end
    for n=1:12
        if  (b(n,1)==0)
            stat=stat+1;
        end
    end
    stat=12-stat;
    fprintf(fp1,'%d\n',stat);
%end