donuts1.m

人工免疫网络,实现分类,聚类,函数寻优等功能,采用matlab编写.

function Ag = donuts1(n);

%
% Ph.D. Thesis
% Leandro Nunes de Castro
% April, 2000
% Function generates the dataset for the 2-DONUTS problem
%
% n   -> Number of training samples (odd numbers)
%

Ag = ringe; [N,L] = size(Ag); 
m = round(n/2);
aux = randperm(N/2); aux2 = randperm(N/2); 
m1 = Ag(aux(1:m),:); m2 = Ag(N/2+aux2(1:m),:);
Ag = [m1;m2];

disp(sprintf('Dataset size: [%d,%d]',size(Ag)));
plot3(Ag(1:m,1),Ag(1:m,2),Ag(1:m,3),'r*'); hold on;
plot3(Ag(m+1:end,1),Ag(m+1:end,2),Ag(m+1:end,3),'bo'); hold off;

function [Ag] = ringe;

Ag = [-0.4525252	-0.8907047	0.02300506;
0.65285018	-0.8458747	0.02108445;
0.39790405	0.9134504	-0.0013908;
0.09523301	1.05498557	0.00628025;
0.52398982	-0.941104	0.03776228;
-0.0262946	1.00439376	0.02179162;
0.42454586	0.9081925	-0.0285324;
-0.9914314	-0.2748777	0.05108846;
-1.0126154	-0.0352555	0.0379796;
-0.7304934	-0.6309835	-0.0312168;
0.87914669	0.3461147	0.04394252;
-0.8454329	-0.4586898	0.08494412;
-0.3850727	0.92089519	0.00558477;
0.24016712	0.8836523	0.04803932;
1.03095553	-0.2602377	0.07270965;
0.87115628	0.50181224	-0.0402896;
-1.0175774	-0.0055609	0.02779346;
0.59192664	0.78671215	0.03608653;
0.29689381	0.9459822	0.00662452;
-0.8315876	-0.403408	0.05416447;
0.60727325	-0.7823157	-0.0182249;
-0.7116698	-0.7390734	0.01252387;
-0.5372357	0.85928428	0.00196889;
-0.8932135	-0.4196326	-0.0108159;
0.07238223	-0.9132109	0.04862236;
0.57943096	0.81872063	-0.0007589;
0.86629571	-0.4956995	0.00595943;
-0.3595167	1.03310984	-0.0163078;
-0.7784818	-0.6028631	-0.0865145;
-0.0978664	-0.9878286	0.02240619;
0.88679422	0.40135726	0.04856408;
0.75419754	0.74243132	-0.0178712;
1.05449026	-0.077174	0.02381608;
-0.2053988	-0.9561935	-0.0305776;
0.7970704	0.55056862	0.03127124;
0.80664383	0.6291378	-0.0021966;
-0.0722066	1.00920923	-0.0157249;
-0.4150387	-0.97207	0.01993414;
-0.0831856	1.08516733	0.0359923;
0.50757695	-0.7941202	0.02209442;
-0.2381655	0.90572871	-0.0305324;
-0.6344385	0.68929557	-0.0257716;
-0.8517859	-0.595751	0.00465477;
-0.5734966	-0.8914041	0.06845987;
-0.7232516	0.71237789	0.0318422;
-0.67738	0.80378605	-0.0052112;
-0.4641712	-0.9693576	-0.0344596;
-0.7108782	-0.7607005	-0.0682099;
0.61197061	0.8453011	-0.0168075;
-0.5804743	-0.7458711	-0.0398432;
0.16991914	-0.9753816	0.0132484;
0.76898106	-0.622375	-0.0136208;
-0.2929491	-0.9795689	0.01718237;
-0.2086039	-1.0014676	0.01579961;
0.29973822	-0.9647487	0.00309421;
-0.0316683	-1.0449721	0.01082174;
0.22309007	-0.9750819	0.01375148;
0.90997841	-0.4843764	-0.0155284;
0.39139131	0.88433743	-0.0275508;
-0.9952396	-0.056835	0.03616623;
-1.0255521	0.02438884	0.0936955;
-0.0574365	1.00917217	0.00857179;
0.77878063	0.69062657	-0.0371231;
0.51504485	0.8358649	-0.0268056;
-0.9675723	0.11698496	-0.0816102;
-0.8908005	-0.5022659	-0.034013;
-1.0527948	-0.1772752	-0.0103016;
-0.1170348	1.05904489	-0.0430465;
-0.6519069	0.72385776	0.01769686;
0.7757394	-0.6810511	-0.0009876;
0.39383897	0.93882353	-0.024617;
0.49148111	0.86816764	0.00246011;
-1.0297996	-0.3099082	0.00173572;
0.22425735	-0.939494	-0.031988;
-0.8970434	0.47429514	0.02297543;
-0.7381823	0.64632591	-0.0471291;
0.04326408	1.02498422	0.00162092;
0.63320791	0.78251916	0.00723937;
-0.9877009	-0.3346106	-0.0041075;
-0.6260111	0.746164	0.0882138;
0.92848579	0.52117043	0.06636477;
0.92883678	0.32253153	0.04703509;
0.54944811	-0.8704403	0.01046321;
0.31249202	-0.902157	-0.0208701;
0.37885006	-0.9361303	0.02969211;
-0.6153127	-0.9063245	-0.0177639;
0.91388427	-0.5754019	0.01075579;
-0.7303754	0.7034292	0.01048837;
-1.067262	-0.054688	-0.042956;
0.94896822	-0.244581	-0.0001919;
-0.1713969	-0.9744681	0.01154753;
-0.0589864	0.92954158	-0.0718201;
0.49905862	0.82364922	0.05885493;
0.35507076	-0.8948407	-0.0847769;
0.47102274	0.85114972	-0.061292;
-0.7010316	0.72384719	-0.0347031;
-0.9865252	-0.1712758	-0.0009419;
0.76075471	-0.5345846	-0.0158275;
-0.5738816	-0.769618	-0.02144;
0.92706623	0.10065087	0.03652247;
0.57886904	-0.7721276	0.00342795;
-0.6539927	0.76347134	0.04445028;
0.42691668	0.83691881	-0.0378636;
1.04125748	0.04925253	0.08134313;
-0.9785518	-0.0505186	-0.0090153;
0.39775458	0.88606072	-0.0107711;
0.88999919	0.57162802	0.06580374;
0.8692806	-0.4194305	0.02704047;
-0.2447104	0.92520679	-0.0189327;
0.93610101	0.12092776	0.004459;
-0.8148593	0.58553739	-0.0573582;
-0.9705409	0.29278533	-0.0095683;
-0.2825028	-0.998089	-0.0374855;
0.9065384	-0.4166981	-0.0003654;
0.72790675	0.68285161	-0.0033689;
-0.0941138	0.98857866	-0.0110291;
0.42838355	-0.9445792	-0.0344655;
-0.7962189	-0.5924116	0.0249398;
0.21389141	-0.9747726	-0.0105008;
-0.6636963	0.7707521	0.07392181;
-0.3056799	0.85716693	0.00342565;
1.03023336	0.22378442	0.05934804;
0.89694282	-0.2808418	0.05280012;
0.85690283	0.39239097	0.05079991;
-0.8865306	0.4850658	-0.0629902;
0.11695585	-0.9904328	0.00447791;
-0.9426945	-0.3353657	-0.0035864;
-0.8961589	-0.4528128	0.0003698;
0.34459877	-0.9538531	0.0366014;
-0.6866495	0.70263376	-0.0821461;
0.29292956	-0.9727051	0.00899222;
-1.0102906	-0.0060054	-0.0289151;
-0.184142	-0.9294694	-0.011086;
1.03567264	-0.0431184	0.08144413;
0.64157389	-0.8476114	-0.076684;
-0.0801708	-0.950155	-0.0021712;
-0.3147873	0.97735325	0.05544071;
0.96755983	0.29168362	0.08126896;
-0.8922702	-0.3758196	0.01993218;
0.43625922	-0.9196537	-0.0228195;
-0.2017404	1.02241156	0.05488388;
-0.8861998	0.57556933	-0.0061842;
-0.6067962	-0.7956248	-0.0095983;
0.89784009	-0.3494042	-0.0155058;
0.63682656	0.75713678	0.01472598;
0.85408214	-0.4669925	0.06688469;
0.89548143	0.20361372	-0.0394695;
-0.7769882	0.64706325	0.03396865;
0.88636554	-0.5043673	0.02329869;
-0.5083488	-0.8598643	0.00059735;
0.3925786	0.93406132	0.05509504;
0.81060818	-0.4828015	-0.0442453;
0.92699576	0.34245133	0.03581956;
0.56892121	-0.7458152	-0.0729574;
0.87189633	0.31489573	-0.0539321;
0.204139	0.97674869	0.03075248;
0.91486245	-0.4709952	-0.0891713;
-0.449887	0.88994454	0.02069098;
-0.9166571	-0.4619573	-0.0723668;
0.40794195	-0.9186377	0.01516105;
0.81670407	0.51290398	0.04933635;
0.92437591	-0.4781375	0.00250526;
-0.1106222	0.99057807	0.00816699;
-0.9641203	0.14074727	0.04709103;
0.60522682	-0.8887156	-0.033692;
-0.8175051	-0.5529537	-0.0356378;
0.8372463	0.53502875	0.0095613;
-0.8061915	-0.6093717	0.02652331;
0.3554443	-0.9437524	-0.0075581;
0.28940027	0.95931993	-0.0007966;
-0.7287544	-0.7325371	0.09232039;
0.93100705	0.03527424	0.03566583;
0.99031887	-0.0061715	0.02731654;
-0.4192207	0.86334069	0.01092947;
-0.6395701	0.83826421	0.02392218;
-1.0032136	-0.0655931	0.0947401;
-0.7168918	-0.708012	0.05961081;
0.88555594	-0.4724666	-0.0726776;
-0.037043	-1.0005091	0.04464802;
-0.7894323	-0.6127975	0.00378106;
0.0872189	-1.0049305	0.06913141;
-0.839012	-0.5516946	0.00118192;
0.75319642	-0.5299208	0.00339806;
0.0310178	-1.020277	0.06031104;
-0.7361953	0.65399735	-0.0985032;
0.38128818	-0.9265354	-0.0488804;
-0.903648	-0.3102941	-0.0607638;
0.8903593	0.40204553	0.09175167;
-0.9208362	-0.2806829	-0.0392001;
0.6022197	-0.8775923	0.063673;
-0.2716924	-0.9763059	0.05270111;
-0.9883425	-0.039914	0.03734058;
-0.4781066	0.86708731	-0.0058362;
-0.9949707	-0.14876	-0.0182881;
0.47156085	0.82945191	-0.074302;
1.01778324	-0.0731143	0.05623087;
-0.1971963	-0.9408268	0.023012;
-0.9467975	0.11474947	-0.0368247;
0.90221078	0.55664227	0.00415021;
-0.7755664	-0.7186656	-0.0401669;
0.47722312	-0.873987	-0.026157;
-1.0159764	-0.1790994	0.074983;
0.69256074	0.63218979	0.05827533;
-0.4588836	0.92910118	0.03059828;
0.11886052	-1.081263	0.03850651;
0.83669175	0.50302146	0.0679673;
-0.8106366	0.67153906	0.00052005;
0.88292555	0.47019362	0.00041436;
1.07063308	-0.0124207	-0.0218114;
-0.6517914	-0.7921946	0.04200751;
-0.9906625	-0.0247946	-0.0954052;
-0.3147039	-0.8824713	-0.0183492;
-0.4445942	-0.9264207	0.06500786;
0.78275294	-0.5730028	0.00830768;
0.08604859	1.06489125	-0.0704518;
-0.1619818	-0.9867987	0.00072935;
-1.0047711	0.24116306	0.09013502;
-0.9150786	-0.1338567	-0.0560842;
0.53609724	0.87622598	0.02449636;
0.76889232	0.6917978	0.06084953;
-0.0206958	-1.0791929	0.02294882;
0.89239337	-0.4637655	0.00766431;
0.32586596	0.99958518	0.01091944;
0.07032383	1.00315903	-0.0168789;
-0.9525768	-0.0361829	-0.0317952;
-1.062538	0.10413659	0.04840984;
0.65908602	-0.6818433	0.05616286;
0.62631261	-0.8114909	-0.0224464;
-0.9382713	-0.1759027	-0.038619;
-0.6697871	-0.6517938	0.01582675;
-0.6326931	0.81635457	0.02131273;
0.34470568	-0.8768006	-0.0679305;
-0.4586594	-0.8286213	0.06920815;
0.82692691	-0.671244	-0.00386;
-0.4040283	-0.907478	0.0615304;
-0.9781378	-0.2400336	-0.0022544;
-0.7022534	0.69010539	0.02824615;
0.51980993	-0.9463645	-0.0123266;
0.76437596	0.6510917	-0.0081548;
0.68822144	-0.7241117	0.0014499;
0.56385418	-0.778839	0.08010265;
0.53397863	0.80365119	-0.0159897;
-0.9908342	-0.154363	0.00801654;
0.52438547	0.92257363	0.01073216;
0.99103716	0.06489239	0.04336176;
-0.474273	-0.9496884	0.0350037;
-0.8714417	0.47539954	0.00697509;
-0.5319537	0.85247137	-0.0088547;
0.04840486	0.99307419	0.04756977;
0.44418536	-0.8285268	-0.0030011;
0.12074836	-1.0150283	-0.0715271;
-0.048261	1.08885579	0.02421852;
0.83955843	0.37417492	0.01217289;
-0.6897391	0.6056653	-0.0466038;
-0.7521829	0.71737598	0.00393661;
-0.1305259	-1.0088778	0.00984738;
0.79111975	0.60204177	0.02836633;
0.97464372	-0.4646365	0.03030835;
-1.0225759	-0.1555946	0.02602287;
-0.6428477	0.69735776	-0.0603644;
-0.9847493	0.22073619	0.0062195;
0.13748705	-0.9539414	-0.065388;
-0.9673659	-0.2536793	0.00074851;
-0.0104301	-0.9800498	-0.0190178;
0.86262246	-0.53062	-0.0401455;
-0.6209439	-0.8690461	0.05610835;
-0.9926412	0.12639382	-0.0038384;
0.13673073	1.04736584	-0.0266255;
-0.7283993	0.64732172	-0.0143982;
-0.2576569	-0.9726462	0.01504503;
1.02836351	-0.0981998	-0.0874245;
0.66862315	0.69556946	-0.00736;
-0.7070821	0.70871094	-0.0552347;
0.97717893	0.21255442	-0.0001993;
-0.8130558	-0.6139481	0.02417151;
-0.4753768	0.80303796	-0.038456;
-0.806303	-0.5007842	-0.0765278;
-0.2848641	0.92532124	0.02574071;
0.84725765	0.59343107	-0.0577119;
-0.8910161	-0.3054792	0.03517925;
-0.1793676	-0.9995517	0.02513522;
-0.8683963	0.49480379	0.00091929;
-0.9136584	0.45978722	0.0621774;
0.62731653	0.65059762	-0.0141044;
-0.4137878	0.87640211	-0.0844099;
-0.9644665	-0.2804922	-0.0118271;
0.39067213	0.88362793	-0.0693115;
-0.9383436	-0.2316994	0.01989358;
0.87231508	0.64591647	0.05053456;
0.50666485	-0.8766632	0.01941332;
0.58712196	-0.795142	0.06734414;
0.60480685	-0.7704094	-0.0153574;
-0.979517	-0.1377238	-0.0369443;
0.59999437	0.79094407	0.07567131;
1.04500843	0.02896201	-0.0105682;
0.98703829	-0.120875	0.02346962;
-0.9714522	-0.2966203	0.02154563;
-0.7002813	0.61420943	0.04706121;
0.97511461	0.08868289	-0.0287046;
0.37818663	0.93243374	-0.0461186;
-1.0289227	-0.0892018	0.04585254;
-1.0214872	-0.3196229	-8.77E-05;
-0.0628322	1.00077119	-0.0045386;
-0.0489822	-0.9873964	-0.0005858;
0.77535516	0.7179174	-0.0416284;
1.02773539	-0.113874	0.03406398;
-0.2034898	-0.9999443	0.00452813;
-0.6222862	-0.7841265	0.05248285;
0.53066746	-0.8989927	-0.0422796;
-0.6853828	-0.7247343	-0.0035785;
0.88535624	0.60095318	0.03695871;
-0.0216289	-0.9980656	0.00930954;
0.37020802	-0.9137681	0.01919605;
-0.5038933	-0.9521391	-0.0378341;
-0.4638711	0.86984669	0.01404433;
-0.7818452	0.55694116	0.013682;
-0.2020263	-0.9874226	-0.0042264;
0.31418076	-0.8707005	-0.0037312;
0.58452415	-0.8190702	-0.0171173;