如何删除在 scilab 上使用子图制作的多个绘图轴

Question

你好吗。我整天都在尝试执行以下操作：我正在设计一个 PID 控制器，并根据我想要分析的数据量，然后在同一图中只显示一个图或四个图（最后一个多图是用子图制作的） ).

所有的计算和绘图都是在一个函数中完成的，函数中的选项取决于我想看到的内容，我正在编写的应用程序中有几个按钮和文本输入，我知道 PID 设计和简单或多个情节正在运作；我当前的程序是轴句柄被分配给函数内部的局部变量，当然当程序退出函数时这些变量会被销毁。

问题的更详细解释如下：如果我 select 多个绘图然后我想要一个绘图然后我不知道如何删除四个轴来清理图形而不关闭它，所以当我想激活简单图时，程序只会擦除四个图之一，并在其余三个图上打印简单图，而其余三个子图仍然可见。以下是给我带来问题的代码：

grafico=sistem_graf;
disp(grafico);
if(isdef('aa')==%T);
    scf(aa);
    delete(get("current_axes"));
    disp("aa");
end
if(isdef('bb')==%T);
    scf(bb);
    delete(get("current_axes"));
    disp("bb");
end
if(isdef('cc')==%T);
    scf(cc);
    delete(get("current_axes"));
    disp("cc");
end
if(isdef('dd')==%T);
    scf(dd);
    delete(get("current_axes"));
    disp("dd");
end

select ventana
case 0
    tipoG=0;
    plot2d(T,graffta);
    xtitle('Ω(S)/R(S): Respuesta al escalón (Sistema original)','t [s]','Vel [rpm]'); 
    legend(['Original';'C/control P';'C/Control PI';'C/Control PID']);
    aa=get("current_axes");
    aa.axes_bounds = [1/3 0 2/3 1];
case 1
    tipoG=1;        
//        delete(get("current_axes"));        
    plot(T,[graffta;sist_P_ZN;sist_PI_ZN;sist_PID_ZN]);
    xtitle('Ω(S)/R(S): Respuesta al escalón','t [s]','Vel [rpm]'); 
    legend(['Original';'C/control P';'C/Control PI';'C/Control PID']);
    aa=get("current_axes");
    aa.axes_bounds=[1/3 0 2/3 1];
case 2
    tipoG=2;        
    //delete(get("current_axes"));  
    subplot(421);
    plot(T,[graffta;sist_P_ZN;sist_PI_ZN;sist_PID_ZN]);
    xtitle('Ω(S)/R(S): Respuesta al escalón','t [s]','Vel [rpm]'); 
    legend(['Original';'C/control P';'C/Control PI';'C/Control PID']);
    aa=get("current_axes");
    aa.axes_bounds=[1/3,0,1/3,1/2]
    subplot(422);
    plot2d(T,(kt*kp/(j*la))*(1/(afta*bfta))*(1+(1/(afta-bfta))*(bfta*exp(-afta*T)-afta*exp(-bfta*T))));
    xtitle('Ω(t)','t [s]','Vel [rpm]');
    bb=get("current_axes");
    bb.axes_bounds=[2/3,0,1/3,1/2];
    subplot(423);
    plot2d(T,(kt/(j*la))*(1/(afta*bfta))*((1/(afta-bfta))*(bfta*afta*exp(-bfta*T)-afta*bfta*exp(-afta*T))));
    xtitle('Variación de velocidad angular dΩ/dt','t [s]','Ac. [rpm/s^2]');
    cc=get("current_axes");
    cc.axes_bounds=[1/3,1/2,1/3,1/2];
    subplot(424);
    plot(T,[sist_P_ZN;sist_PI_ZN;sist_PID_ZN]);
    xtitle('Controladores','t [s]','Vel [rpm]');
    legend(['C/control P';'C/Control PI';'C/Control PID']);
    dd=get("current_axes");
    dd.axes_bounds=[2/3,1/2,1/3,1/2];
end

四个 if(isdef("variable_name")) 永远不会起作用，因为当程序进入函数时，这些变量还不存在，它们是在带有子图的图之后创建的。

如果从图的“编辑”菜单中显示图形属性，则会显示所有子轴，但如果我尝试使用

获取轴

a=get(sistem_graf.Axes(1))

然后控制台显示属性“轴”不存在，所以我不知道如何解决这个问题。

请帮忙！

提前致谢。

2021 年 3 月 6 日更新：

我找到了一种让我需要的行为在 90% 时有效的方法，只有当我从详细情节转到简单情节（正在擦除一个图形）时它才会失败但向后它工作正常，我改变了所有“Select ventana”之前的代码到以下

if(imps(1) ~= -1)
    if(size(imps) == 1)
        sca(imps(1));
        disp(imps(1));
        delete(get("current_axes"));
    elseif(size(imps) > 1)
        sca(imps(1));
        delete(get("current_axes"));
        sca(imps(2));
        delete(get("current_axes"));
        sca(imps(3));
        delete(get("current_axes"));
        sca(imps(4));
        delete(get("current_axes"));
    end
end

并填充一个数组，其内容是上次调用函数时绘制的所有轴，该数组从函数返回到全局变量，最后在下一次调用中将该全局变量提供给函数，并且分配给局部变量“imps”。

我觉得有点疯狂，但显然 scilab 没有合并静态变量 aproach。

Answer 1

如果我理解了你的问题，下面的小例子应该对你有帮助：

function fun(nb)
    ch = gcf().Children;
    delete(ch(ch.type=="Axes"))
    t = linspace(0,1,100);
    if nb==1
        plot(t,t)
    else
        for i=1:nb
            subplot(2,2,i)
            plot(t,t.^i)
        end
    end
endfunction
clf
uicontrol("style","pushbutton","units","normalized","Position",[0.1 0.1 0.4 0.1],"string","one plot","callback","fun(1)");
uicontrol("style","pushbutton","units","normalized","Position",[0.5 0.1 0.4 0.1],"string","four plots","callback","fun(4)");

我认为您缺少的机制如下：

ch = gcf().Children;
delete(ch(ch.type=="Axes"))

即允许删除绘图轴并使 uicontrol 保持活动状态的东西。上面的构造使用逻辑索引。这里 ch.type=="Axes" 是一个布尔值向量，当相应组件 ch(i) 的 type 字段为 Axes 时，组件 i 等于 true。然后，ch(ch.type=="Axes") 是 ch 的子集，因此布尔索引的值为 true。因此，最后，ch 的组件子集属于 Axes 类型。

如何删除在 scilab 上使用子图制作的多个绘图轴

How to delete multiple plot axes made with subplot on scilab

graphics

subplot

figure

scilab