Maxima 中的多个地块

Question

我正在 Maxima 中编写代码，并且有三个图。我可以毫无困难地单独绘制这些，但我不知道如何将它们全部放在一个图上，而不用在一个 for 循环中进行，如果不深入太多细节，这对我的代码来说会很困难。

    for i:1 step 1 while i<=n-1 do(figgdown[i]:plot2d(
    [discrete,[xx[i], -xx[i]],[p[i],p[i]]]));
    for i:1 step 1 while i<=n-1 do(figgup[i]:plot2d(
    [discrete,[xx[i], -xx[i]],[q[i], q[i]]]));
    for i:1 step 1 while i<=n-1 do(figgmiddle[i]:plot2d(
    [discrete,[xx[i], -xx[i]],[pq[i], pq[i]]]));

有没有一种方法可以做类似 Mathematica 中的 Show 功能的操作，其中图形一起显示？最好的，本

Answer 1

你可以保留一个清单

n: 10;
x: makelist(2*%pi*i/n, i, 0, n);

p: [];
y1: sin(x);
p: endcons([discrete, x, y1], p);

y2: cos(x);
p: endcons([discrete, x, y2], p);

/* display all plots in p */
plot2d(p);