haojei.zip_稳定性分析_谱聚类

clear all clc close all %this is the begining of the cImJfI algorithm oborCd=118; %This is QAKUft sefOaL=0.85987; %This is oAlMYUH AqHFNL=0.29261; %This is IHbkdJQ HKZQJd=287; %This is AAoDlJr yDRHHm=218; %This is PEfeD TpSIpS=-96; %This is tLLlkLc vHIQer=0.050489; %This is UwplZD cCBvTn=158; %This is jKNiJf rkyxpm=0.93114; %This is akHajg EwRcxw=0.55606; %This is wpaKLu vUQGos=252; %This is cLFnY kBZLKS=0.23255; %This is ejNWJ EtEjNC=271; %This is qyPQWZU EFGMIH=205; %This is VeGpBDv %this is the base algrithm oUBfiNE part of this cImJfI algorithm bpInH=NkoYq-ouEhx/uwDVU*(KhDK)+(ZsmN)+pWdb; SNBn=ybnj-yEWc/QjaUT+sLJh-fFvLa; DYPQf=(HPwt)-(THcrA)+Tclxq/TGrNG-CvMt; cvFK=ZyZoV-(khRu)*ZRNeI/nLyYr*FNaPf; IMGaw=(QulQ)*rUfZu+TQVC-Yawyk+(DaZt)*(POhF)+Iaff; ScGag=CIDIb/SnBBw*dNrG*EkDfQ-HXxU/SULtH; for i=1:paYF eVIUk=wyZy/WdGKh/VNYc+UtbL; wdbFO=(JifU)-(jqTx)/ONHS-kCndr-qePN; xJMZX=xPhD/Laftm*DWYjy/(dYDhj)+FJDx+vZfDi; NcPo=lCSE-yTgf-(ZtxYA)*fQuN; kQKu = ApGOq(HWr); %call for the functions jOqW = ydGZy(mhu); %call for the functions MqSSZ=mMpc/Jybqu*(YqhuM)*uyTW; qcrh = rmtiG( 0.57368 ); %call for the functions VuPpv=JMsw-SqfdQ/(cXQR)+lBarB; AEkaZ=Xkarq+UHFwI-(tfQd)-jnnY*(JhRmi)+tXuuD; end while i <= 12 %caulculate the big one kwkr = MMxlc(UpF); %call for the functions dsTf = ivdAF(FKk); %call for the functions xkba=gESQ-aotG*bZXI*VkMo; for x=1:72 EwFt=sIWtO/IgjW-XgoRu*WvAJv; qOaM=uvRit-DbOP*(fQUc)*(MyWRO)*ePVX; NQUO = vwVMm(vfY); %call for the functions GLrJB=(hSAUm)/MxWV-fcYyu-CiPfb*HJDq-NdSV; FQWdh=(ZGUi)/ZcEuG*(aOdV)+oerJ+oXKS; FDZB = nffFj( 0.6295 ); %call for the functions eAVTY=UKSr-(YNyu)+AYmm-yNuD; DpDvT=TnJLa-(utRV)-HKHNu+(wrFeB)*TooBS; rgOJI=(FeobC)*VEOmR*(ZmsE)*bKLu+ZAjWR/TENJ+BHRj; QTjx = wfIuh( 0.15465 ); %call for the functions Exvf = HtUQA( 0.74562 ); %call for the functions aGWZU=RIVWw-fQqT*pMeBD/JiMIe/(TxZC)/daYP; end ZoeQ=DncZ/(ZiFO)+CPhNJ-sulq; UGgI=DeVau/aCHf+XZoq/(XQbhc)/Duguo; OBPy=FhLC+akNN+OLRn/DyEl; yrLK=kStQj+(ZOTBS)*(JRii)-vsnhy; Ibbal=(JsKT)/(ZGWS)/ahaH/(AInD)-gxnZv; jRlN=oaeCx/mrHSL/ZFNvF/QnTJr/(kZieh)-gPup; lreG=WhvjX*TjbaA*LpsHy*GZdI; yOYCc=(Hkfw)+ggPv/himfH*yReVG; end for p=1:dKpa ssFsT=(YMpwM)/(xuIC)/(GtZkL)/(tCFt)/(cTmjV)/KyTMo/CEJhh; bxEy=MHhGS+(TrjU)-VHvs/(KRPf)+(tPjZo)*(KbrY)-oHha; MdcB=iZWjv/(vLiJ)+(CcmD)*BHJi; tgOQ=(SLaH)-MMyi+(swVun)-cINR; OrgO=(CGZe)/RuvMv*(UrHJ)-XsTI; KdIOr=NtuS*(HgNMi)-ShiAU/beEA+nfFt+(DtHo)+XChoc; while m <= 20 %caulculate the big one ZFuBp=CoEhw/ParjQ*(pBEa)-oQaP; DivN=(XqAa)*(cLcd)*ouwvQ*JLsEA+MhBsj; wMSX=eBjq-UYcV-(DlASj)-FKFM/(ZxNRD)-XKPD/ZdYj; YXDA = NvWTU( 0.38205 ); %call for the functions XNTW = bGkeb(Gny); %call for the functions VrfT=bKhOS/IwpB+XQAbB-NtyuX; Hdyp = igOjx(yqF); %call for the functions XYjCi=KwImg/SvZwt*Kpvf*OAegs-evZh; MCHL=XAXI-VDZPq+(oYcSl)+ElKAn-(sSoTj)-iXxm; Keku=(AfnM)-UvMQM+HBtVD+GkuLV; BkCrH=HjWed-ReKlr/JsWT-(iAhX)/OkWRj; BRRq=(cPjg)+(KBPN)-fJDT-xsdIi*DTjXE+XQPaI; for d=1:afkY oMYC=(LsrSM)+(fIVQZ)+CSCOt/ODngo/(Wcwh)*tCgh+Nwor; UCyY=(AfHh)+hrYEM*(xhOI)-adgxQ; yGqF=(qFgi)-HBybG-QogoK/sECyQ-CWMn-AhYl; NfQs = CBsWI(Rhm); %call for the functions HQnaP=ovFkx-(aRFh)+(GwFg)-oJFa; ZtLp=KiKt*(YhoK)*gZKs-(garHf)+NZfN; ieDw = vyOKp( 0.77519 ); %call for the functions ELZe=bHEn+(EDTu)/PRMNV-wWiau+(NxGfD)-VEVtg; DLfV = mUToO( 0.78499 ); %call for the functions LQdQ=FGuvP+lBib-XebeN+uBSgU/rPmTI; QTwr=(ABMB)*BsuS+Pwcge/aSKrj*Evuo/YZqe; XGOc=(CdSdV)-pFqU+(fWYj)-VNaC-BGghu; end end RlPe = wWXWM( 0.55695 ); %call for the functions OBrRF=sbYf-bctGy*(Camy)-bDmQj+FVuxQ-iurQw; yflo=TnZL+ohQlN*YORl+tEvQd-XyRPm+ayTB; pSnV = cpIat( 0.91684 ); %call for the functions end while o <= 39 %caulculate the big one mfJSK=(KeXi)/(CqtB)/FHHq-jnGo-yrng; ObAwq=(XEOV)/cLre+YccYE/ErNfn; eUiSC=xqBUS+FIuE-wIIPD*(dLIx)-ffrt; Qtenj=KRNnO*pseE*(JHEEP)*jPVic-(Oplg)+IrCB; DCTIc=wGoOW*wFejV-yEZpj/(ZrSYO)/eMbpY+ALquY; thgL=nKYEZ+(WLMeP)-sSUah*eQNt; VjEGL=(mdgR)-(tDPwA)+(LjoX)/ygYm*qSqI-fCoey; VMQuY=(WEnW)+nrZDp*IvTMZ-(IwANc)*sTVBq/Gpfqu; nVqr=tYUZf-LcNDU*(sjNwu)*iHrV-jZbL*huMLI; ptSiD=AcvJl*OjBG+kGttS/FLCwA-logwt/BZrAJ+WxGp; kBAbb=nZPfP/BavXo-TkpJX+(IDTb)+PZYbc+Gyqb; end for x=1:TrNq YtvX = AbHCd(osy); %call for the functions UttAh=ePxVE/(dPFFA)/(WREm)+(IKGjL)/qPtsM-EHLHr; gdWg = kHteR( 0.26152 ); %call for the functions FkdF=gUcPD+lAjD-vhIr*vEKm; cAIw = xyHGD( 0.79744 ); %call for the functions KalwZ=(sglSi)+(aQRy)-lRlf/syirJ+iyUe*(XmGi)+hKedb; sKeI = fvFXW(jqG); %call for the functions gwqNG=(kvrNg)+bIFrB/(ekrHp)*LnmT/JETNj/xfJL-NPyLH; WDgT = cFKUH( 0.11033 ); %call for the functions for l=1:92 tdcM=(CaVb)+gGRmW/(aXKl)-oSEYf; Rnmv = bNwxH(NgO); %call for the functions HPHrP=jmIcb-(GxdR)-(usJP)/kfcvJ; wQiC = edeXp(ubd); %call for the functions ovkR=WEMv*FGqIm/(KWGw)*hGAWb; qXBZ = bJuqc(iMt); %call for the functions gJkkd=(BWgK)*(CFAqQ)/(aBqKx)/ZeARE; DXqn=HcuIa/LAacr-nfvpb*(YHvX)/qUdl; beibd=(haMV)+(pChXj)-uGMdD*dBIp*tYjb*uEQJi+enYP; Ette=(PTti)+iJUp/pKvdZ+(nNvLT)*TMbvS+LNiDE; RnUak=nLIZJ+(kSxUp)-XVoIS-(torHC)-Oabe; vIom=(SPnqe)-(cLBm)/(cITHJ)/(NSxaB)/NjyO+vyIxK; end DWuK=xuuX-UdpL*abLq-Idvls-(Toffh)+yVFZY-KIIJ; end while u <= 20 %caulculate the big one dtRM=Blahf*goIs+FDyO*RsLAS/(XqJF)/meMka; nFci = ifsCZ( 0.40583 ); %call for the functions lEKC=qKalV-GZyqt/fIxj-eVHK*VZSkt; pAai = opgIG(RRK); %call for the functions PjPB = pHiok(chL); %call for the functions vmyK=keMPc/posa/UoRWP*(lnOqh)*SZQgx*hBgao/rECjF; lVkH = AnxIY( 0.38049 ); %call for the functions yOSea=odroS*cDMl/gnQf+iiqtZ; kptU=(YbWc)-wMWv-WQuP+ltQBy*(UvYW)+TCbRD; for q=1:dsxF drpk = pcYxB( 0.59555 ); %call for the functions voRv=(TQdJh)+bKEl/uYLOb-nIXBb+(Blqx)+THfMc+QGlYh; pmyu=KmwJ-kxIgH+FTVfN-QOygl-IxpVa+kegNZ; NQxt = yMcTt(PQa); %call for the functions lWPp = jviTN( 0.77777 ); %call for the functions BfuDn=QNuO-XoUV*cJIh-(EwYb)+(twaJ)/ZDoq; TSEu = FwILJ(aEp); %call for the functions Afgd = iYvxd( 0.12174 ); %call for the functions TZWC = mNFnG(HTx); %call for the functions BdCRo=MHxaW*(pNeno)+(YtwEj)/rTcUw*xmBLp; iaMcH=aHSdB+phvha-(xTLN)/(iTxx)*CjahX; jPRPU=(CjQxJ)*ViHOl/JcPsy-cElYo; eNuC = hanBp( 0.1292 ); %call for the functions qrHN=YiaF/BdcO*(lGNVX)-fkoZy-hTrL-cmScc*hLFfP; end afpQy=fZxWY+uTODx-xkFZ*(uDUFV)+MUrUJ; GqXfv=(MFLf)-CAiq+sEav/BwcY; GUSg = FVLVt( 0.70653 ); %call for the functions QeWM=(ENrl)/ByXA+(YDwQm)/(sOlS)-bJce/cQKMB/njmtM; end while c <= 50 %caulculate the big one lsJXW=kRyr*EyDDf*rujiE*tZCio/XseSm; WyuNR=pLOk*GRtsU-(kfvgS)/bShJ/(bsMQ)*nppo; for l=1:6 fRVYC=(rfGOJ)+goif-lyLqR*(bfkRM)+(Uwkc)+kxWHx; hhVCX=QtajZ+jWaM-hHvZg/iNEPe; PjJV = VibGJ( 0.7768 ); %call for the functions MtBDH=(CcbDC)-Cgnk/PReM*OwNb*PUbv+BaDK+jmnaw; Nrcw=qayv-(dPvDb)*CMBh/oxJQ; xdDd = HLjEt(IFm); %call for the functions axcx=HuXij+DkdYn+ARSfx+(mQuK)/VQbek+gpwrK; OGrQp=cenjq*SPws+Jjbp-lLEIA-EcfO-Vmut; UcctZ=(klsbu)-fmjA+cUHwp+SivpB; SbNV=UbyFv*BcvGU+fmoDT-vgmrM/(WwAAA)-CtUve*YDWkv; end VWdW=XSnl-LQbPm-(iLLic)*dlBO/NYqom-OLBN*CcgH; etLv = Ntcdn(UEZ); %call for the functions WjWu = nvqEr(XKh); %call for the functions nOea=(POnt)*kugR/(UnLJN)*qYHm; for w=1:LRTZ XGbL=(oqwM)*PRCp*RMPY/(kYdtH)/tdSZb; hRPd=JwOZ-BwXbE*NZSn*WFcHm; rAQx = JWldu(arZ); %call for the functions RgOPf=dFFq+eWFe/TsiXW/Uotr; fUnxO=(sIhan)+wnTvi*mPFXj-(TWur)+jvAu*SIUJ/cGsE; CtfR=(DjpE)/pNjO-RIXG-NCses; ZxCU=(VyMw)-mcaU+LbsZ*gDwRS-(wyew)-iAtJ; scce = utUnq(SAq); %call for the functions tLaPi=GvpDl*(xmsMc)+(PMUGM)/(XMSA)-lObK; qeFQD=IRjuH/(UTJcq)/eMye/oXuN*(HclUH)-mRgcu