标签: wolfram-mathematica

我有一个表达式,我想将所有指数项一次设置为等于零

例子e ^ x + xx + tt + e ^ y + 5*e ^ 5,有没有直接的方法来设置所有e->零并产生xx + tt？

提前致谢

因此,将极坐标(幅度,角度)转换为2D中的欧几里德坐标是直截了当的.

但是在n(比如n = 5)维度中,我有一个固定的幅度和一个随机角度矢量.如何将其转换为坐标的欧氏矢量？

amp = 0.5
n = 5
ang = np.random.rand(n) * 2* pi

非常感谢

我在Octave,Scilab和Matlab提示符下测试以下命令.

>>  A = rand(10000,10000);
>> B = rand(10000,1);
>> tic,A\B;, toc

时间分别为40,15.8和15.7秒.为了比较,Mathematica的表现是

In[7]:= A = RandomReal[{0, 1}, {10000, 10000}];

In[9]:= B = RandomReal[{0, 1}, 10000];

In[10]:= Timing[LinearSolve[A, B];]

Out[10]= {14.125, Null}

这是否表明Octave不如线性方程领域的其他软件那么强大？

上次当我想保存 Mathematica 文件时，有些事情很奇怪。现在，当我想打开我的文件时，需要很长时间，最后我只看到一些数据，而且我无法使用它。

我已在这里上传我的文件：

http://www.mediafire.com/?4etrrd3rauq0j59

您能否打开该文件并向我解释一下您是如何做到这一点并再次发送给我的？

很长一段时间后，Mathematica 中出现此消息：

下面命名的文件中似乎存在错误。您应该关闭它而不保存，然后选中“笔记本选项”对话框中的“打开时解析整个笔记本并将其加载到内存中”复选框。文件名：D:\App\Math\Unt.nb。

我有两个阵列,说A={1, 2, 3}和B={2, 4, 8}(数组项计数和编号可能不同).如何在阵列之间找到双射.

在这种情况下,它会 f:A->B; f(x)=2^(x)

我想快速解决以下问题:

f[r_] := Sum[(((-1)^n (2 r - 2 n - 7)!!)/(2^n n! (r - 2 n - 1)!))
             * x^(r - 2*n - 1), 
         {n, 0, r/2}]; 

Nw := Transpose[Table[f[j], {i, 1}, {j, 5, 200, 1}]]; 

X1 = Integrate[Nw . Transpose[Nw], {x, -1, 1}]

我可以使用以下代码快速得到答案:

$starttime = AbsoluteTime[]; Quiet[LaunchKernels[]]; 
DIM = 50; 
Print["$Version = ", $Version, "  |||  ", 
      "Number of Kernels : ", Length[Kernels[]]]; 

Nw = Transpose[Table[f[j], {i, 1}, {j, 5, DIM, 1}]]; 
nw2 = Nw.Transpose[Nw]; 
Round[First[AbsoluteTiming[nw3 = ParallelMap[Expand, …

为什么Fibonacci递归程序工作这么久？

这是在OCaml:

let rec fib n = if n<2 then n else fib (n-1) + fib (n-2);;

这是在Mathematica:

Fib[n_] := If[n < 2, n, Fib[n - 1] + Fib[n - 2]]

这是在Java中:

public static BigInteger fib(long n) {
    if( n < 2 ) {
        return BigInteger.valueOf(n);
    }
    else {
        return fib(n-1).add(fib(n-2));
    }
}

因为n=100它工作了很长时间,因为,我猜,它会2^100及时跟踪节点树.

虽然只生成100个数字,但它只能消耗100个内存寄存器和100个计算机.

因此,可以优化执行.

这项任务是什么以及如何解决？由于Mathematica中没有实现解决方案,因此可能不存在.关于此事的研究怎么样？

我以为我知道FromDigits是如何工作的,但它现在正在做一些疯狂的事情.

n[[990;;]]
FromDigits[n[[990;;]]]

输出:

{9, 50, 0, 50, 1, 50, 2, 50, 3, 50, 4, 50, 5, 50, 6, 50, 7, 50, 8, 50, 9}
1405060708091011121309

而不是,你知道,950050150 ......

这是怎么回事？

我在Wolfram Mathematica中构建了一个Web应用程序,它在浏览器上直接显示数据库数据.

我将我的应用程序放在Apache Tomcat中.

我想每15秒重新加载一次这个页面,因为如果你重新加载页面,我们将获得DB的更新数据.

我怎样才能做到这一点？