OP-ELM: Optimally Pruned Extreme Learning Machine

function varargout = gui_OPELM(varargin) % GUI_OPELM M-file for gui_OPELM.fig % GUI_OPELM, by itself, creates a new GUI_OPELM or raises the existing % singleton*. % % H = GUI_OPELM returns the handle to a new GUI_OPELM or the handle to % the existing singleton*. % % GUI_OPELM('CALLBACK',hObject,eventData,handles,...) calls the local % function named CALLBACK in GUI_OPELM.M with the given input arguments. % % GUI_OPELM('Property','Value',...) creates a new GUI_OPELM or raises the % existing singleton*. Starting from the left, property value pairs are % applied to the GUI before gui_OPELM_OpeningFunction gets called. An % unrecognized property name or invalid value makes property application % stop. All inputs are passed to gui_OPELM_OpeningFcn via varargin. % % *See GUI Options on GUIDE's Tools menu. Choose "GUI allows only one % instance to run (singleton)". % % See also: GUIDE, GUIDATA, GUIHANDLES % Edit the above text to modify the response to help gui_OPELM % Last Modified by GUIDE v2.5 11-Feb-2008 15:18:25 % Begin initialization code - DO NOT EDIT gui_Singleton = 1; gui_State = struct('gui_Name', mfilename, ... 'gui_Singleton', gui_Singleton, ... 'gui_OpeningFcn', @gui_OPELM_OpeningFcn, ... 'gui_OutputFcn', @gui_OPELM_OutputFcn, ... 'gui_LayoutFcn', [] , ... 'gui_Callback', []); if nargin && ischar(varargin{1}) gui_State.gui_Callback = str2func(varargin{1}); end if nargout [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:}); else gui_mainfcn(gui_State, varargin{:}); end % End initialization code - DO NOT EDIT % --- Executes just before gui_OPELM is made visible. function gui_OPELM_OpeningFcn(hObject, eventdata, handles, varargin) % This function has no output args, see OutputFcn. % hObject handle to figure % eventdata reserved - to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA) % varargin command line arguments to gui_OPELM (see VARARGIN) % Choose default command line output for gui_OPELM handles.output = hObject; % Update handles structure guidata(hObject, handles); % UIWAIT makes gui_OPELM wait for user response (see UIRESUME) % uiwait(handles.work); home if ~isempty(evalin('base','who')) mylist=evalin('base','who'); set(handles.work,'UserData',mylist); popupmenu1_Callback(hObject, eventdata, handles) popupmenu2_Callback(hObject, eventdata, handles) popupmenu7_Callback(hObject, eventdata, handles) popupmenu8_Callback(hObject, eventdata, handles) else disp(repmat('Workspace is empty!',200,1)) end % --- Outputs from this function are returned to the command line. function varargout = gui_OPELM_OutputFcn(hObject, eventdata, handles) % varargout cell array for returning output args (see VARARGOUT); % hObject handle to figure % eventdata reserved - to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA) % Get default command line output from handles structure varargout{1} = handles.output; function popupmenu1_CreateFcn(hObject, eventdata, handles) % hObject handle to popupmenu1 (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles empty - handles not created until after all CreateFcns called % Hint: popupmenu controls usually have a white background on Windows. % See ISPC and COMPUTER. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end % --- Executes on selection change in popupmenu1. function popupmenu1_Callback(hObject, eventdata, handles) % hObject handle to popupmenu1 (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA) % Hints: contents = get(hObject,'String') returns popupmenu1 contents as cell array % contents{get(hObject,'Value')} returns selected item from popupmenu1 mylist=get(handles.work,'UserData'); set(handles.popupmenu1,'String',mylist); % --- Executes during object creation, after setting all properties. function work_CreateFcn(hObject, eventdata, handles) % hObject handle to work (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles empty - handles not created until after all CreateFcns called % --- Executes during object creation, after setting all properties. % --- Executes on selection change in popupmenu2. function popupmenu2_Callback(hObject, eventdata, handles) % hObject handle to popupmenu2 (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA) % Hints: contents = get(hObject,'String') returns popupmenu2 contents as cell array % contents{get(hObject,'Value')} returns selected item from popupmenu2 mylist=get(handles.work,'UserData'); set(handles.popupmenu2,'String',mylist); % --- Executes during object creation, after setting all properties. function popupmenu2_CreateFcn(hObject, eventdata, handles) % hObject handle to popupmenu2 (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles empty - handles not created until after all CreateFcns called % Hint: popupmenu controls usually have a white background on Windows. % See ISPC and COMPUTER. if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end % --- Executes on button press in Next1. function Next1_Callback(hObject, eventdata, handles) % hObject handle to Next1 (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA) set(handles.Kernel,'Visible','on'); % --- Executes on button press in pushbutton3. function pushbutton3_Callback(hObject, eventdata, handles) % hObject handle to pushbutton3 (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA) k=[1 1 1]; k(1,1)=get(handles.checkbox1,'Value'); k(1,2)=get(handles.checkbox2,'Value'); k(1,3)=get(handles.checkbox3,'Value'); mystring='lsg'; kernel=mystring(find(k)); mylist=get(handles.work,'UserData'); number_x=get(handles.popupmenu1,'Value'); name_x=char(mylist(number_x,:)); data.x=evalin('base',name_x); number_y=get(handles.popupmenu2,'Value'); name_y=char(mylist(number_y,:)); data.y=evalin('base',name_y); number_x=get(handles.popupmenu7,'Value'); name_x=char(mylist(number_x,:)); data.xtest=evalin('base',name_x); number_y=get(handles.popupmenu8,'Value'); if number_y<=length(mylist) name_ytest=char(mylist(number_y,:)); data.ytest=evalin('base',name_ytest); else data.ytest=[]; end [N,d]=size(data.x); if N>100 if k(1,1)==0 numberkernel=[int2str((50:50:min(N,400))')]; numberkernelvalue=50:50:min(N,400); else numberkernel=[int2str((50:50:min(N-d-1,400))')]; numberkernelvalue=50:50:min(N,400); end else if k(1,1)==0 numberkernel=[int2str((min(N,10):10:N)')]; numberkernelvalue=min(N,10):10:N; else numberkernel=[int2str((min(N,10):10:min(N-d-1))')]; numberkernelvalue=min(N,10):10:N; end end set(handles.nk,'Visible','on'); set(handles.popupmenu5,'String',numberkernel); % --- Executes on selection change in popupmenu5. function popupmenu5_Callback(hObject, eventdata, handles) % hObject handle to popupmenu5 (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA) % Hints: contents = get(hObject,'String') returns popupmenu5 contents as cell array % contents{get(hObject,'Valu