mathematica-8

    15热度

    2回答

    我正在编码基于Ukkonen的算法在Mathematica中构建后缀树的算法。 我的问题是,将我的整个树结构(我已经存储在一个列表中)传递给一个函数进行搜索,耗费我的程序大量的内存和时间,因为我必须使用一些函数在算法中多次? 例如,我有搜索特定节点的子功能,我用的是Select功能来搜索整个树。 getChildren[parentID_] := Select[tree, #[[3]] == pa

    6热度

    2回答

    我试图获得一个Mathematica例子。这是Theo Gray's blog上的那个。 我认为自从他编写代码(2008年5月)以来,Mathematica一定会发生变化,因为我无法从中得到任何合理的东西,尽管几乎所有东西都变了。我是否使用ImageData而不是导入?任何人都可以提出一个适用于Mathematica 8的代码版本吗? imagePool = Map[With[{i = Impo

    4热度

    1回答

    我正在评估一个大学课程项目的Wolfram Mathematica 8。 我很难定义目标编程模型。 首先,因为我在数学上真的很少:)第二,因为我在official documentation(寻找“多目标优化:目标编程”)中找到的东西很差。 我想在软件项目的维护阶段为资源分配定义一个小模型。这是非正式模型定义: 不要担心功能。这是一个激活功能,如果小时数超过阈值,则返回1。阈值是错误需要解决的平均

    14热度

    2回答

    在数学8,我想定义给定的名单密度肿块离散分布。例如, In[1] f = ProbabilityDistribution[{2/3, 1/3}[[x]], {x, 1, 2, 1}]; 这似乎工作。然而,这发出了两次重复的警告: "Part::pspec: Part specification x is neither an integer nor a list of integers."

    1热度

    1回答

    我有一个问题,而在编程数学8,这里是我的代码: f[t_, y_] := {y, y}; RungeKutta3[a_, b_, Alpha_, n_, f_] := Module[{h, j, k1, k2, k3}, h = (b - a)/n; Y = T = Table[0, {100 + 1}]; Y[[1]] = Alpha; T[

    3热度

    5回答

    考虑以下几点: cAxes = {{{0, 0, 0}, {0, 0, 1}}, {{0, 0, 0}, {0, 1, 0}}, {{0, 0,0}, {1, 0, 0}}}; Graphics3D[{Line /@ cAxes}, Boxed -> False] 如何可以风格不同的3条线?

    6热度

    1回答

    我有兴趣在不需要张量的列表上使用Listable编译函数。我想了解为什么某些功能可以工作,而其他功能则不能,关闭内核。这是一个例子。 假设我们有两个矩阵m1和m2如下。 m1 = {{1.0, 0.5, 0.5}, {0.5, 1.0, 0.5}, {0.5, 0.5, 1.0}}; m2 = {{1.0, 0.5}, {0.5, 1.0}}; 我们可以做两个不同的列表,第一个是张量,第二

    7热度

    4回答

    在任何Mathematica图表或图表中,如何显示y轴上的%值? 我可以具有数据是这样的: data = {{{2010, 8, 3}, 0.}, {{2010, 8, 31}, -0.052208}, {{2010, 9, 30}, 0.008221}, {{2010, 10, 29}, 0.133203}, {{2010, 11, 30}, 0.044557}, {{201

    9热度

    2回答

    是否有可能使用概率或NProbability函数来计算4个硬币掷骰中的3个或更多个头的概率。 这不是一个关于这个问题的简单答案的问题,它更多的是理解如何用Mathematica使用分布解决这类问题。 因此,使用4个随机变量的分布P 我希望这样的事情会做的伎俩,但它不工作。我得到0. P = BernoulliDistribution[0.5]; vars = List[Distributed[a

    3热度

    2回答

    我有一段代码,我在过去的一周左右一直在重写,以尽可能快地运行。 该代码为衍射激光束建模,其本质是640 * 640内核在许多2D 1280 * 1280切片上的卷积 - 每个切片都是沿着波束轴的新位置。 优化的第一阶段是编译我的函数,第二阶段是学习Mathematica喜欢用大量数据列表进行操作 - 因此一次传递多个层的3D空间,而不是一个接一个地传递片。 但是,这吃了我的RAM! 这是我目前的设