粒子群算法优化极限学习机的参数

粒子群算法优化极限学习机的参数，实现SINC函数拟合

function [TrainingTime TestingTime TrainingAccuracy TestingAccuracyTY] = elm（TrainingData_File TestingData_File Elm_Type NumberofHiddenNeurons ActivationFunction）

% Usage: elm（TrainingData_File TestingData_File Elm_Type NumberofHiddenNeurons ActivationFunction）
% OR:    [TrainingTime TestingTime TrainingAccuracy TestingAccuracy] = elm（TrainingData_File TestingData_File Elm_Type NumberofHiddenNeurons ActivationFunction）
%
% Input:
% TrainingData_File     - Filename of training data set
% TestingData_File      - Filename of testing data set
% Elm_Type              - 0 for regression; 1 for （both binary and multi-classes） classification
% NumberofHiddenNeurons - Number of hidden neurons assigned to the ELM
% ActivationFunction    - Type of activation function:
%                           ‘sig‘ for Sigmoidal function
%                           ‘sin‘ for Sine function
%                           ‘hardlim‘ for Hardlim function
%
% Output: 
% TrainingTime          - Time （seconds） spent on training ELM
% TestingTime           - Time （seconds） spent on predicting ALL testing data
% TrainingAccuracy      - Training accuracy: 
%                           RMSE for regression or correct classification rate for classifcation
% TestingAccuracy       - Testing accuracy: 
%                           RMSE for regression or correct classification rate for classifcation
%
% MULTI-CLASSE CLASSIFICATION: NUMBER OF OUTPUT NEURONS WILL BE AUTOMATICALLY SET EQUAL TO NUMBER OF CLASSES
% FOR EXAMPLE if there are 7 classes in all there will have 7 output
% neurons; neuron 5 has the highest output means input belongs to 5-th class
%
% Sample1 regression: [TrainingTime TestingTime TrainingAccuracy TestingAccuracy] = elm（‘sinc_train‘ ‘sinc_test‘ 0 20 ‘sig‘）
% Sample2 classification: elm（‘diabetes_train‘ ‘diabetes_test‘ 1 20 ‘sig‘）

    %%%%    Authors:    MR QIN-YU ZHU AND DR GUANG-BIN HUANG
    %%%%    NANYANG TECHNOLOGICAL UNIVERSITY SINGAPORE
    %%%%    EMAIL:      EGBHUANG@NTU.EDU.SG; GBHUANG@IEEE.ORG
    %%%%    WEBSITE:    http://www.ntu.edu.sg/eee/icis/cv/egbhuang.htm
    %%%%    DATE:       APRIL 2004

%%%%%%%%%%% Macro definition
REGRESSION=0;
CLASSIFIER=1;

%%%%%%%%%%% Load training dataset
train_data=load（TrainingData_File）;
T=train_data（:1）‘;
P=train_data（:2:size（train_data2））‘;
clear train_data;                                   %   Release raw training data array

%%%%%%%%%%% Load testing dataset
test_data=load（TestingData_File）;
TV.T=test_data（:1）‘;
TV.P=test_data（:2:size（test_data2））‘;
clear test_data;                                    %   Release raw testing data array

NumberofTrainingData=size（P2）;
NumberofTestingData=size（TV.P2）;
NumberofInputNeurons=size（P1）;

if Elm_Type~=REGRESSION
    %%%%%%%%%%%% Preprocessing the data of classification
    sorted_target=sort（cat（2TTV.T）2）;
    label=zeros（11）;                               %   Find and save in

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       7859  2014-03-03 10:27  sinc\ELM.m

     文件       5059  2014-03-03 10:18  sinc\ELM_MultiOutputRegression.m

     文件       3763  2014-03-03 10:18  sinc\elm_predict.m

     文件       5645  2014-03-03 10:18  sinc\elm_train.m

     文件        709  2014-03-03 10:18  sinc\sinc.m

     文件        957  2014-03-03 10:27  sinc\sinc_mean.m

     文件     114328  2014-03-03 10:27  sinc\sinc_test

     文件     114518  2014-03-03 10:27  sinc\sinc_train

     文件     667807  2014-03-03 13:58  sinc\untitled.fig

     文件         78  2014-03-31 17:03  sinc\Untitled.m

     目录          0  2014-04-08 12:51  sinc

----------- ---------  ---------- -----  ----

               920723                    11