| ²é¿´: 3716 | »Ø¸´: 0 | ||
¼Ó·ÆÃ¨ÁµÉÏÓãгæ (³õÈëÎÄ̳)
|
[ÇóÖú]
ANFIS´úÂëÔÀíÇó½â´ð
|
|
%% Your Solution clc;close all;clear all; numPts=51; x=linspace(-1,1,numPts); y=0.5*sin(pi*x)+0.3*sin(3*pi*x)+0.1*sin(5*pi*x); data=[x' y']; trnData=data(1:2:numPts, ;%%ѵÁ·Êý¾ÝchkData=data(2:2:numPts, ;%%¼ìÑéÊý¾Ý%% »æÖÆÑµÁ·ºÍ¼ìÑéÊý¾ÝµÄ·Ö²¼ÇúÏß subplot(2,2,1);plot(trnData(:,1),trnData(:,2),'o',chkData(:,1),chkData(:,2),'x'); legend('ѵÁ·Êý¾Ý','¼ìÑéÊý¾Ý','location','northwest');%%Ìí¼ÓͼÀý title('ѵÁ·Êý¾ÝºÍ¼ìÑéÊý¾ÝµÄ·Ö²¼ÇúÏß');%%Ìí¼ÓͼÌâ xlabel('(1)');%%Ìí¼ÓXÖá±êÌâ %% ²ÉÓÃgenfis1()º¯ÊýÖ±½ÓÓÉѵÁ·Êý¾ÝÉú³ÉTakagi-SugenoÐÍÄ£ºýÍÆÀíϵͳ numMFS=5; mfType='gbellmf'; %ÊäÈëÁ¥Êô¶Èº¯ÊýµÄ¸öÊý¡¢ÀàÐÍ fisMat=genfis1(trnData,numMFS,mfType); %³õʼģºýÍÆÀíϵͳ subplot(2,2,2);[x1,mf]=plotmf(fisMat,'input',1); plot(x1,mf);title('ϵͳѵÁ·Ç°µÄÁ¥Êô¶Èº¯Êý');xlabel('(2)'); %% ¸ù¾Ý¸ø¶¨µÄѵÁ·Êý¾Ý£¬ÀûÓú¯Êýanfis()ѵÁ·×ÔÊÊÓ¦Éñ¾Ä£ºýϵͳ epochs=40; %ѵÁ·´ÎÊýΪ40 trnOpt=[epochs NaN NaN NaN NaN]; disOpt=[ ]; [Fis, error, stepsize, chkFis, chkEr]=anfis(trnData,fisMat,trnOpt,disOpt,chkData); %% »æÖÆÄ£ºýÍÆÀíϵͳÓɺ¯Êýanfis()ѵÁ·ºóµÄÊäÈë±äÁ¿µÄÁ¥Êô¶Èº¯ÊýÇúÏß subplot(2,2,3); [x1,mf]=plotmf(Fis,'input',1); plot(x1,mf); title('ϵͳѵÁ·ºóµÄÁ¥Êô¶Èº¯Êý'); xlabel('(3)'); %% ¼ÆËãѵÁ·ºóÉñ¾Ä£ºýϵͳµÄÊä³öÓëѵÁ·Êý¾ÝµÄ¾ù·½¸ùÎó²îtrnRMSE trnOut1=evalfis(trnData(:,1),Fis); %ѵÁ·ºóÉñ¾Ä£ºýϵͳÊä³ö trnOut2=evalfis(trnData(:,1),chkFis); trnRMSE1=norm(trnOut1-trnData(:,2))/sqrt(length(trnOut1)); trnRMSE2=norm(trnOut2-trnData(:,2))/sqrt(length(trnOut2)); %% ¼ÆËãºÍ»æÖÆÉñ¾Ä£ºýÍÆÀíϵͳµÄÊä³öÇúÏß anfis_y1=evalfis(x,Fis); anfis_y2=evalfis(x,chkFis); subplot(2,2,4);plot(x,y,'-',x,anfis_y1,'x',x,anfis_y2,'o'); title('º¯ÊýÊä³öºÍANFISϵͳÊä³ö');xlabel('(4)'); legend('Ôº¯ÊýµÄÊä³ö','ANFIS-1µÄÊä³ö','ANFIS-2µÄÊä³ö','location','northwest') writefis(Fis,'ex6-3'); ¡ª¡ª¡ª¡ª¡ª¡ª¡ª¡ª¡ª¡ª¡ª¡ª¡ª¡ª¡ª¡ª¡ª¡ª ÒÔÉÏÊÇmatlabÖÐANFISµÄÀý×Ó´úÂ룬Óм¸¸öµØ·½Ã»Óп´¶®£¬Ï£Íû´óÉñÃǸøÓè½â´ð£» Ê×ÏÈÊÇ trnOut1=evalfis(trnData(:,1),Fis); %ѵÁ·ºóÉñ¾Ä£ºýϵͳÊä³ö trnOut2=evalfis(trnData(:,1),chkFis); ΪʲôÕâÀïtrnOut1ºÍtrnOut2µÄÊäÈëÊý¾Ý¶¼ÊÇtrnData(:,1),£¬£¬£¬¶øtrnOut2µÄÊäÈëÊý¾Ý²»ÊÇchkData(:,1)¡£ µÚ¶þ¸öÎÊÌâ¾ÍÊÇΪɶANFIS×îºóÒªÓÐÁ½¸öÊä³öÄØ£¬·Ö±ð´ú±íµÄÊÇÊ²Ã´ÄØ¡£ ÇóÖú´óÉñÃÇ£¬ºÜ׿±£¡£¡£¡Ð»Ð» |
» ²ÂÄãϲ»¶
ÊÛSCIÒ»ÇøÎÄÕ£¬ÎÒ:8.O.55.1.O.54,¿ÆÄ¿ÆëÈ«,¿ÉÙ¤¼±
ÒѾÓÐ5È˻ظ´
ÎÒ¾ÍÊÇÉêÇëÒ»¸öÃæÉÏÏîÄ¿¶øÒÑ£¬ÕâÆÀÉóÒâ¼ûÊǰ´ÕÕ½ÜÇàµÄÌõ¼þÆÀµÄ°É£¿
ÒѾÓÐ4È˻ظ´
ÊÛSCIÒ»ÇøÎÄÕ£¬ÎÒ:8.O.55.1.O.54,¿ÆÄ¿ÆëÈ«,¿ÉÙ¤¼±
ÒѾÓÐ4È˻ظ´
ÊÛSCI-T0PÎÄÕ£¬ÎÒ:8O.5.5.1.O.54,¿ÆÄ¿ÆëÈ«,¿É+¼±
ÒѾÓÐ4È˻ظ´
ÊÛSCIÎÄÕ£¬ÎÒ:8O.5.5.1O.54,¿ÆÄ¿È«,¿ÉÊ®¼±
ÒѾÓÐ3È˻ظ´
ÓжàÉÙÈËÊǽñÌì²éϵͳ֪µÀ½á¹ûµÄ£¿
ÒѾÓÐ18È˻ظ´
¹ú×ÔÈ»ÆÀÉóÒâ¼û
ÒѾÓÐ15È˻ظ´
Ϊʲô×ÊÖúÊý¸÷´ó¸ßУ¶¼´´Ð¸ߣ¬×Ô¼ºÉêÇëÔõô¾ÍÕâôÄÑ
ÒѾÓÐ13È˻ظ´
¹ú×ÔÈ»ÃæÉϸ´ÅÌ~»¶ÓÌÖÂÛ
ÒѾÓÐ14È˻ظ´
ϵͳ²é²»µ½
ÒѾÓÐ11È˻ظ´









;%%ѵÁ·Êý¾Ý
»Ø¸´´ËÂ¥
10