用matlab设计牛顿环gui界面代码

以下是一个简单的牛顿环GUI界面的MATLAB代码：

function newton_ring_gui

% 创建GUI窗口
f = figure('Visible','off','Position',[360,500,450,285]);

% 创建UI控件
r1_text = uicontrol('Style','text','String','半径 r1:','Position',[50,220,100,20]);
r1_edit = uicontrol('Style','edit','Position',[150,220,100,20]);
r2_text = uicontrol('Style','text','String','半径 r2:','Position',[50,190,100,20]);
r2_edit = uicontrol('Style','edit','Position',[150,190,100,20]);
lambda_text = uicontrol('Style','text','String','波长 λ:','Position',[50,160,100,20]);
lambda_edit = uicontrol('Style','edit','Position',[150,160,100,20]);
n_text = uicontrol('Style','text','String','折射率 n:','Position',[50,130,100,20]);
n_edit = uicontrol('Style','edit','Position',[150,130,100,20]);
calculate_button = uicontrol('Style','pushbutton','String','计算','Position',[75,75,100,25],'Callback',@calculate);
close_button = uicontrol('Style','pushbutton','String','关闭','Position',[225,75,100,25],'Callback',@close);

% 初始化UI控件
set(r1_edit,'String','10');
set(r2_edit,'String','15');
set(lambda_edit,'String','632.8e-9');
set(n_edit,'String','1.5');

% 显示窗口
set(f,'Name','牛顿环计算器','NumberTitle','off','Visible','on');

% 计算函数
    function calculate(hObject,eventdata)
        r1 = str2double(get(r1_edit,'String'));
        r2 = str2double(get(r2_edit,'String'));
        lambda = str2double(get(lambda_edit,'String'));
        n = str2double(get(n_edit,'String'));
        r = (0:0.001:r1+r2)';
        t = 2*pi*r/lambda;
        delta = (2*r2^2-r1^2)./r./(2*n);
        intensity = (1+delta).^2./(1-delta).^2;
        plot(t,intensity);
        xlabel('相位差');
        ylabel('光强');
        title('牛顿环');
    end

% 关闭函数
    function close(hObject,eventdata)
        delete(f);
    end

end

该代码创建了一个简单的窗口，包含四个文本框和两个按钮。用户可以在文本框中输入参数值，点击“计算”按钮，即可计算牛顿环的光强分布，并在图形窗口中显示。点击“关闭”按钮，即可关闭窗口。