如题。 7 n1 R8 n$ q5 y, R$ ?主程序:: x) j. d+ z4 R" M
global a7 m: R. R% P. w/ \& n1 ^8 S W$ a
jg=[];c=[];a=xlsread('dytjg.xls');r=a;+ f+ ^6 V V3 y
for i=1:80! h1 L7 w( b9 t# F
[g,t]=fxjd(i);* k# i. u: m6 r# J; h
lg=1; . Y0 @0 q1 i3 q3 J" U2 j [kl,k]=find(a==i); % G7 R' p& G+ p# {+ F: ? a(:,k)=0;1 @, w% d5 b0 X g- b
for q=1:t6 o _- f" a% J
gg=g(q); 3 D) {5 Q0 o$ k8 S( Q b=[];j=1; 1 [, K% @1 J: T R/ T while j<=lg7 H* O6 n& u0 ^! l- f
b=gg(j);ut=0;. h9 S8 c/ }) H0 b
[p,ut]=fxjd(gg(j)); 0 {+ V7 A5 B) ^ l=1; 8 j$ m; a8 U6 X: g2 | while l<=ut* O) u. g# t8 c# c, M+ B3 p
js=find(b==p(l)); ! M& B* D5 g5 t/ ~ if isempty(js) 0 Q) i* T& o( L% c' | b=[b,p(l)]; 8 j4 y" z2 X9 Y+ s* W0 g' E. f gg=[gg,p(l)]; 5 V! @3 _5 V6 C3 [. n lg=lg+1; " ^1 k( I, M, @0 O" S! U8 i. ~ end 7 j: U% r( T8 m) q0 ~" n l=l+1; - v! B I, d. L1 X! n" w, w end! ^4 e. N- l; |. L. r: C6 m
j=j+1; ) ]8 s' ]1 I; T/ h! J end* ?0 q1 ^, I7 Y
c=[c,length(b)]; " I: E% j& s% W4 C2 F lg=1;, g, E- Q) W" K* Z
t=t+1; * Q8 K9 J- P- |$ Z* O gg=[];& [6 k1 H. E2 j/ }" w8 d
end ' J* C' K3 t) M$ o uu=max(c); * w. Q0 E2 w) z) K/ g2 }$ I c=[]; . k; n" B3 @, S) @ if (uu/79.0)<0.9: o& ?* x7 E% ]0 `" N$ U
jg=[jg,i];6 T! J% s! Z3 o: b$ S
end/ i1 S1 V0 U- t& v; s \% Q
a=r;( m1 p/ s. ^/ J& P; Q5 m
end+ V3 ?0 L5 K5 f" q: k4 D# l
函数:- g$ w1 W! W+ |4 O! b5 y# b7 P
function [y,x1]=fxjd(x);; n2 C% d" e0 ]6 ^
global a# K: v$ n! t0 {3 {+ C$ W; `+ O
[p,l]=find(a==x);- R) [/ d7 j, p
x1=length(p);* s) W' `+ [. v
for o=1:x1 ^9 E. m, r% o- u+ d; e
if p(o)==13 ~: d o% e1 Q' G% I9 M, Q4 O
y(o)=a(2,l(o));$ f4 T8 A4 n$ F. z) A! V
else ! K2 e3 v+ j" a1 D y(o)=a(1,l(o));5 K7 _& h5 @$ J0 M" V- V
end , D# i S! {' fend 5 p* x" z7 y0 w+ A$ Q# |if isempty(p)' H6 V8 ]4 i. z
y=[];x1=[]; 0 S, Y$ P Y$ S: |1 d0 |end+ x! a1 N5 K$ z0 ]7 c
3 V. e6 R. k6 ?matlab软件提示‘gg=[gg,p(l)];’这句有问题,但是不懂什么意思,求助前辈们,希望能帮帮忙。 , g; p' b y* d* F; y8 E0 K # i/ A$ l6 Q( u) `, R4 }, D+ Y+ e, N
8 Z8 g& e- l$ k: a5 {- O- E