随笔分类 - Mathematica
摘要：习题： 代码如下： 1. Limit[(Exp[x] - Exp[-x])/Sin[x], x -> 0] Limit[(x/(x - 1)) - 1/Log[x], x -> 1] Limit[(1 - Cos[x])/x^2, x -> 0] Limit[(1 + 1/x^2)^x, x ->
阅读全文
摘要：习题： 代码如下： 1. Expand[(x + 1) (x^2 - 2 x + 3)] Expand[(3 a - 2) (a - 1) + (a + 1) (a + 2)] Expand[x (y - z) + y (z - x) + z (x - y)] Expand[(2 x^2 - 1)
阅读全文
摘要：虽然过去有用Mathematica解过一些问题，不过对这个语言并没有系统学习过。 所以最近想重新把Mathematica系统的学一遍。 偶然在B站上找到了这样一组教程：https://www.bilibili.com/video/av70241728?p=1，就跟着重新学习一下。 下面是随堂教程的课
阅读全文
摘要：曲线的曲率k表示曲线的弯曲程度。 计算公式： 曲线的挠率tao表示曲率平面的扭曲程度，平面曲线挠率为0。 计算公式： 这里r代表曲线方程，比如有如下曲线方程：r={a*cos(t),a*sin(t),b*t} mathematica代码如下： 结果如下： 化简之后和《微分几何》第四版43-44页结果
阅读全文
摘要：问题是这样：比如有一个地心惯性系的轨道，然后从轨道上取了几个点，问能不能根据这几个点把轨道还原了？ 当然，如果知道轨道这几个点的速度的情况下，根据轨道六根数也是能计算轨道的，不过真近点角是随时间变动的。 下面我会用数学的方法来解这个问题，基本思想是通过拟合空间上点的平面与椭球平面的交线将该轨道计算出
阅读全文
摘要：代码很简单，就四行，我想到可以用mathematica干点什么了。有人通过mathematica编程研究过视频编解码算法么，挺有意思，可以尝试一下。img=Import["f:/lena.jpg"]pix=ImageData[img];pix=1.0-pix;imgn=Image[pix]运行结果：
阅读全文
摘要：从去年的11月开始，中国的股市就一直大涨，不知道这次能持续多长时间。为了获得股票数据，我用matlab试了网上的一些方法，总是失败，所以就改用mathematica，一行代码就可以了。DateListPlot[FinancialData["ss:600066", {2015, 1, 1}], Joi...
阅读全文