如何在 Mathematica 中使用函数式编程减去列表中的特定元素？
我有一个格式为以下的日期和值列表： {{{dateInfo1},value1},{{dateInfo2},value2},...,{{dateInfoN},valueN}} 一些实际的日期和值： {{{1971, 1, 31,…
简单的？ Mathematica 7 中的消息传递
Uu[z_,x_,t_] := A1[z]*F[t*a*x] Wu[z_,x_,t_] := B1[z]*F[t*a*x] Pu[z_,x_,t_] := C1[z]*F[t*a*x] eq1 = D[Uu[z,x,t],t]==-R*D[Pu[z,x,t],x] C1z = D…
将 Mathematica 网格导出为矢量图形时的字符串引号
运行下面的 agrid = Grid[{{Style["hello", Bold]}}] ImportString[ExportString[agrid, "PNG"], "PNG"] ImportString[ExportString[agrid, "EPS"], "…
Mathematica 中非线性 ODE 的初始条件
我正在尝试使用 Mathematica 的 NDSolve[] 使用耦合 ODE 计算沿球体的测地线： x" - (x" . x) x = 0 问题是我只能输入 x(0) 和 x'(0) 的初始条件，并…
Mathematica：获取传递给函数的参数数量？
如何获取传递给函数的参数数量，例如 Plus[2,3,4,5] 有 4 个参数传递给它。我想这可能涉及使用函数 Length 并将参数放入列表中。目的是根据函数的参数…
Mathematica 与 PrimaryValue 集成中的错误 -> True
看来 Mathematica 对主值积分的处理在某些极端情况下失败了。考虑这两个表达式（它们应该给出相同的结果）： Integrate[UnitBox[x]/(x0 - x), {x, -In…
如何构造 Set 列表
我有一大组参数 P，它们采用几组不同的值 V_i，并希望使用 ActionMenu[] 来轻松分配 P=V_i，如下所示： ActionMenu["Label", {"name_1" :> (P = V_1…
Mathematica 中的缩放轴
我确信这是一个非常简单的问题，但我最近开始使用 Mathematica，所以这对我来说是全新的。如何缩放 y 轴？我尝试以下但无法编译。 Plot[y = {Exp[-(x^…
Mathematica 相当于 Ruby 的注入
Ruby 中是否有类似 inject 的 Mathematica 函数？例如，如果我想要列表中元素的乘积，在 Ruby 中我可以这样写： list.inject(1) { |prod,el| prod * e…
在 Mathematica 中求正平方根
我目前正在按照以下方式进行一些标准化： J = Integrate[Psi[x, 0]^2, {x, 0, a}] sol = Solve[J == 1, A] A /. sol 对于这种类型的标准化，负平方根…
Mathematica 笔记本的版本控制
当然，Mathematica 笔记本是纯文本文件 - 似乎有理由期望它们应该与版本控制系统（在我的例子中是 git，尽管我怀疑特定系统是否重要）配合得很好。但…
在光栅中使用色调时图形为空？
为什么下面的代码 Graphics[Raster[{{Hue[1], Hue[1/3]}, {Hue[2/3], Hue[1/6]}}]] 没有产生任何输出？在数学中< 6 RasterArray 能够处理这个问题并…
Mathematica 的 Doxygen 等效项？
如何将附加信息放入 Mathematica 包文件中，例如 参数规范 doctests/示例用法？ 到目前为止，我只找到了 ::usage 字符串和一些关于如何编写的信息文档…
