Module 格式化操作输出，使Mathematica中有2个单元格

下面的输出代码从OPERVICE语句输出一个数组。我想将拟合和绘图输出为两个单独的输出单元，动态更新。我认为这应该很简单，但我有问题。我尝试过使用CellPrint[]函数，但没有成功。 谢谢 塔尔

输出的屏幕截图：

---

您不需要使用操纵。您可以使用较低级别的函数获得更多的控制。例如

Slider[Dynamic[nu, (f[#]; nu = #) &], {-0.2, -1}]
Dynamic[Normal[fitToHexatic]]
Dynamic[Show[{plota, plotb}, Axes -> True]]

另请参见。

太棒了。谢谢：）我还通过将我的每个语句放在一个Row[]函数中来实现它。然后，它将从操作中输出所有数据。

Slider[Dynamic[nu, (f[#]; nu = #) &], {-0.2, -1}]
Dynamic[Normal[fitToHexatic]]
Dynamic[Show[{plota, plotb}, Axes -> True]]