Can any one help me to run this program?
function varargout = simira(varargin)
% – DO NOT EDIT
gui_Singleton = 1;
gui_State = struct(‘gui_Name’, mfilename, …
‘gui_Singleton’, gui_Singleton, …
‘gui_OpeningFcn’, @simira_OpeningFcn, …
‘gui_OutputFcn’, @simira_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
function varargout = simira_OutputFcn(hObject, eventdata, handles)
varargout{1} = handles.output;
% – DO NOT EDIT
% — Project Opening Function.============================================
function simira_OpeningFcn(hObject, eventdata, handles, varargin)
% Default values
handles.xl=4000;
handles.yl=3000;
handles.Am=3;
handles.Fr=2000;
handles.output = hObject;
guidata(hObject, handles);
% — X length slider.=====================================================
function slider1_Callback(hObject, eventdata, handles)
handles.xl=get(hObject,’value’);
set(handles.text1,’string’,strcat(‘Xlength=’,num2str(handles.xl,’%4.f’),’µm’));
guidata(hObject, handles);
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
function slider1_CreateFcn(hObject, eventdata, handles)
if isequal(get(hObject,’BackgroundColor’), get(0,’defaultUicontrolBackgroundColor’))
set(hObject,’BackgroundColor’,[.9 .9 .9]);
end
%==========================================================================
% — Y length slider.=====================================================
function slider2_Callback(hObject, eventdata, handles)
handles.yl=get(hObject,’value’);
set(handles.text2,’string’,strcat(‘Ylength=’,num2str(handles.yl,’%4.f’),’µm’));
guidata(hObject, handles);
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
function slider2_CreateFcn(hObject, eventdata, handles)
if isequal(get(hObject,’BackgroundColor’), get(0,’defaultUicontrolBackgroundColor’))
set(hObject,’BackgroundColor’,[.9 .9 .9]);
end
%==========================================================================
% — Amplitude slider.====================================================
function slider3_Callback(hObject, eventdata, handles)
handles.Am=get(hObject,’value’);
set(handles.text3,’string’,strcat(‘Amplitude=’,num2str(handles.Am,’%1.f’),’µm’));
guidata(hObject, handles);
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
function slider3_CreateFcn(hObject, eventdata, handles)
if isequal(get(hObject,’BackgroundColor’), get(0,’defaultUicontrolBackgroundColor’))
set(hObject,’BackgroundColor’,[.9 .9 .9]);
end
%==========================================================================
% — Frequency slider.====================================================
function slider4_Callback(hObject, eventdata, handles)
handles.Fr=get(hObject,’value’);
set(handles.text4,’string’,strcat(‘Frequency=’,num2str(handles.Fr,’%1.f’),’Hz’));
guidata(hObject, handles);
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
function slider4_CreateFcn(hObject, eventdata, handles)
if isequal(get(hObject,’BackgroundColor’), get(0,’defaultUicontrolBackgroundColor’))
set(hObject,’BackgroundColor’,[.9 .9 .9]);
end
%==========================================================================
% — Plot pushbutton.=====================================================
function pushbutton1_Callback(hObject, eventdata, handles)
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
%==========================================================================
% — Clear pushbutton.====================================================
function pushbutton2_Callback(hObject, eventdata, handles)
cla
%==========================================================================
And this the function
function [t y A]=simiraFun(xl,yl,am,fr)
Fre=fr/1000000;
SFre=4*Fre;
t=0:(1/SFre):xl;
x=am*sin(Fre*t);
A=ones(yl+1 ,1)*x;
y=0:yl;
Any help would be greatly appreciated.
SimiraCan any one help me to run this program?
function varargout = simira(varargin)
% – DO NOT EDIT
gui_Singleton = 1;
gui_State = struct(‘gui_Name’, mfilename, …
‘gui_Singleton’, gui_Singleton, …
‘gui_OpeningFcn’, @simira_OpeningFcn, …
‘gui_OutputFcn’, @simira_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
function varargout = simira_OutputFcn(hObject, eventdata, handles)
varargout{1} = handles.output;
% – DO NOT EDIT
% — Project Opening Function.============================================
function simira_OpeningFcn(hObject, eventdata, handles, varargin)
% Default values
handles.xl=4000;
handles.yl=3000;
handles.Am=3;
handles.Fr=2000;
handles.output = hObject;
guidata(hObject, handles);
% — X length slider.=====================================================
function slider1_Callback(hObject, eventdata, handles)
handles.xl=get(hObject,’value’);
set(handles.text1,’string’,strcat(‘Xlength=’,num2str(handles.xl,’%4.f’),’µm’));
guidata(hObject, handles);
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
function slider1_CreateFcn(hObject, eventdata, handles)
if isequal(get(hObject,’BackgroundColor’), get(0,’defaultUicontrolBackgroundColor’))
set(hObject,’BackgroundColor’,[.9 .9 .9]);
end
%==========================================================================
% — Y length slider.=====================================================
function slider2_Callback(hObject, eventdata, handles)
handles.yl=get(hObject,’value’);
set(handles.text2,’string’,strcat(‘Ylength=’,num2str(handles.yl,’%4.f’),’µm’));
guidata(hObject, handles);
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
function slider2_CreateFcn(hObject, eventdata, handles)
if isequal(get(hObject,’BackgroundColor’), get(0,’defaultUicontrolBackgroundColor’))
set(hObject,’BackgroundColor’,[.9 .9 .9]);
end
%==========================================================================
% — Amplitude slider.====================================================
function slider3_Callback(hObject, eventdata, handles)
handles.Am=get(hObject,’value’);
set(handles.text3,’string’,strcat(‘Amplitude=’,num2str(handles.Am,’%1.f’),’µm’));
guidata(hObject, handles);
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
function slider3_CreateFcn(hObject, eventdata, handles)
if isequal(get(hObject,’BackgroundColor’), get(0,’defaultUicontrolBackgroundColor’))
set(hObject,’BackgroundColor’,[.9 .9 .9]);
end
%==========================================================================
% — Frequency slider.====================================================
function slider4_Callback(hObject, eventdata, handles)
handles.Fr=get(hObject,’value’);
set(handles.text4,’string’,strcat(‘Frequency=’,num2str(handles.Fr,’%1.f’),’Hz’));
guidata(hObject, handles);
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
function slider4_CreateFcn(hObject, eventdata, handles)
if isequal(get(hObject,’BackgroundColor’), get(0,’defaultUicontrolBackgroundColor’))
set(hObject,’BackgroundColor’,[.9 .9 .9]);
end
%==========================================================================
% — Plot pushbutton.=====================================================
function pushbutton1_Callback(hObject, eventdata, handles)
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
%==========================================================================
% — Clear pushbutton.====================================================
function pushbutton2_Callback(hObject, eventdata, handles)
cla
%==========================================================================
And this the function
function [t y A]=simiraFun(xl,yl,am,fr)
Fre=fr/1000000;
SFre=4*Fre;
t=0:(1/SFre):xl;
x=am*sin(Fre*t);
A=ones(yl+1 ,1)*x;
y=0:yl;
Any help would be greatly appreciated.
Simira Can any one help me to run this program?
function varargout = simira(varargin)
% – DO NOT EDIT
gui_Singleton = 1;
gui_State = struct(‘gui_Name’, mfilename, …
‘gui_Singleton’, gui_Singleton, …
‘gui_OpeningFcn’, @simira_OpeningFcn, …
‘gui_OutputFcn’, @simira_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
function varargout = simira_OutputFcn(hObject, eventdata, handles)
varargout{1} = handles.output;
% – DO NOT EDIT
% — Project Opening Function.============================================
function simira_OpeningFcn(hObject, eventdata, handles, varargin)
% Default values
handles.xl=4000;
handles.yl=3000;
handles.Am=3;
handles.Fr=2000;
handles.output = hObject;
guidata(hObject, handles);
% — X length slider.=====================================================
function slider1_Callback(hObject, eventdata, handles)
handles.xl=get(hObject,’value’);
set(handles.text1,’string’,strcat(‘Xlength=’,num2str(handles.xl,’%4.f’),’µm’));
guidata(hObject, handles);
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
function slider1_CreateFcn(hObject, eventdata, handles)
if isequal(get(hObject,’BackgroundColor’), get(0,’defaultUicontrolBackgroundColor’))
set(hObject,’BackgroundColor’,[.9 .9 .9]);
end
%==========================================================================
% — Y length slider.=====================================================
function slider2_Callback(hObject, eventdata, handles)
handles.yl=get(hObject,’value’);
set(handles.text2,’string’,strcat(‘Ylength=’,num2str(handles.yl,’%4.f’),’µm’));
guidata(hObject, handles);
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
function slider2_CreateFcn(hObject, eventdata, handles)
if isequal(get(hObject,’BackgroundColor’), get(0,’defaultUicontrolBackgroundColor’))
set(hObject,’BackgroundColor’,[.9 .9 .9]);
end
%==========================================================================
% — Amplitude slider.====================================================
function slider3_Callback(hObject, eventdata, handles)
handles.Am=get(hObject,’value’);
set(handles.text3,’string’,strcat(‘Amplitude=’,num2str(handles.Am,’%1.f’),’µm’));
guidata(hObject, handles);
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
function slider3_CreateFcn(hObject, eventdata, handles)
if isequal(get(hObject,’BackgroundColor’), get(0,’defaultUicontrolBackgroundColor’))
set(hObject,’BackgroundColor’,[.9 .9 .9]);
end
%==========================================================================
% — Frequency slider.====================================================
function slider4_Callback(hObject, eventdata, handles)
handles.Fr=get(hObject,’value’);
set(handles.text4,’string’,strcat(‘Frequency=’,num2str(handles.Fr,’%1.f’),’Hz’));
guidata(hObject, handles);
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
function slider4_CreateFcn(hObject, eventdata, handles)
if isequal(get(hObject,’BackgroundColor’), get(0,’defaultUicontrolBackgroundColor’))
set(hObject,’BackgroundColor’,[.9 .9 .9]);
end
%==========================================================================
% — Plot pushbutton.=====================================================
function pushbutton1_Callback(hObject, eventdata, handles)
[t y A]=simiraFun(handles.xl,handles.yl,handles.Am,handles.Fr);
surf(t,y,A);
shading interp
%==========================================================================
% — Clear pushbutton.====================================================
function pushbutton2_Callback(hObject, eventdata, handles)
cla
%==========================================================================
And this the function
function [t y A]=simiraFun(xl,yl,am,fr)
Fre=fr/1000000;
SFre=4*Fre;
t=0:(1/SFre):xl;
x=am*sin(Fre*t);
A=ones(yl+1 ,1)*x;
y=0:yl;
Any help would be greatly appreciated.
Simira sine wave MATLAB Answers — New Questions