给我一个matlb的gui的桃心函数图

这里是一个MATLAB GUI的桃心函数图的示例代码：

function gui_heart()
% Create the GUI figure
fig = figure('numbertitle','off',...
             'name','Heart Function GUI',...
             'position',[200 200 400 400]);

% Create the axes to plot the heart function
ax = axes('unit','normalized',...
          'position',[0.1 0.3 0.8 0.6]);

% Create the heart function plot
t = linspace(0,2*pi,1000);
x = 16*sin(t).^3;
y = 13*cos(t) - 5*cos(2*t) - 2*cos(3*t) - cos(4*t);
plot(ax,x,y,'linewidth',2);

% Create the text box to display the equation
eqn = 'x = 16*sin^3(t), y = 13*cos(t) - 5*cos(2*t) - 2*cos(3*t) - cos(4*t)';
txt = uicontrol('style','text',...
                'unit','normalized',...
                'position',[0.1 0.15 0.8 0.1],...
                'string',eqn);

% Create the slider to control the number of points
slider = uicontrol('style','slider',...
                   'unit','normalized',...
                   'position',[0.1 0.05 0.8 0.05],...
                   'min',50,...
                   'max',500,...
                   'value',100,...
                   'callback',@slider_callback);

% Callback function for the slider
    function slider_callback(hObject,eventdata)
        % Get the slider value
        val = get(hObject,'value');
        
        % Calculate the new number of points
        n = round(val);
        
        % Update the plot with the new number of points
        t = linspace(0,2*pi,n);
        x = 16*sin(t).^3;
        y = 13*cos(t) - 5*cos(2*t) - 2*cos(3*t) - cos(4*t);
        plot(ax,x,y,'linewidth',2);
        
        % Update the equation text box with the new number of points
        eqn = sprintf('x = 16*sin^3(t), y = 13*cos(t) - 5*cos(2*t) - 2*cos(3*t) - cos(4*t), n = %d',n);
        set(txt,'string',eqn);
    end

end

运行这个函数，将会生成一个GUI，其中包括一个桃心函数图、一个文本框显示方程、一个滑块控制点数。你可以通过滑动滑块来改变曲线的平滑度。