摘要: 拖动滚动条,就得到相应的均值和方差的动态效果,可能会有点小卡如果看不到效果的应该是浏览器的插件问题,可以进这里http://www.wolfram.com/mathematica/plugin/success.html?platform=WIN 下载CDF的插件解决 Wolfram推出的.cdf的动态文件已经有一段时间了,内容非常丰富,详细可以到wolfram的官网http://www.wolfram.com/查看。今天只想小试牛刀,关于在网页中嵌入CDF文档的一些常规步骤。这里有个小插曲,因为需要先上传CDF文件到服务器(对于有自己网站的情形类似,关键是Javascript的代码能找到该.. 阅读全文
posted @ 2013-08-08 20:31 Leonhard-E 阅读(1568) 评论(0) 推荐(0) 编辑
摘要: Matlab与Mathematica都是目前比较好的数学软件,个人感觉Matlab比较偏应用,工程计算方面,而Mathematica比较适合数学推理,,理论比较重,个人最喜欢就是它的二维输入格式,比较切合实际的数学书写。但是在对于外部接口方面,Matlab做得比较好,感觉比较开放。对于Matlab来说比较缺失的是一些比较专业的数学函数,特别是数论的函数,而在这方面恰恰是Mathematica的强项,因此可以在Matlab中调用Mathematica会有很大的益处。还是入正题吧,注意,先说明一下,我的是64位win7操作系统,32位的机器会有个别地方不同,我会特别说明一下。首先是要作前期的准备. 阅读全文
posted @ 2012-07-05 01:48 Leonhard-E 阅读(4768) 评论(0) 推荐(0) 编辑
摘要: 很久没更新东西,这个学期比较忙~~~基于最近对大作业的探讨,写了一些比较有用的代码,拿出来分享一下。直接进主题:SolveDiotN[A_List, M_] :=Module[{T = {}, Y = {}, X, x, y, i, d, n, u}, n = Length[A]; Array[d, n]; X = Array[x, n]; For[i = 1, i <= n, i++, AppendTo[Y, x[i] >= 0]]; For[i = 1, i <= n, i++, AppendTo[T, x[i]]]; d[2] = GCD[A[[1]], A[[2]]] 阅读全文
posted @ 2012-06-18 19:57 Leonhard-E 阅读(848) 评论(1) 推荐(0) 编辑
摘要: 终于考完Mathematica,趁有时间发个BLOG先。一直自学着潘承洞的 《初等数论》 \,里面关于原根、指标的计算实在繁杂,所以编了几个Packages在做题时用,希望对学习数论的朋友有用。(已经假定你具备已有的知识) 先介绍几个Mathematica的本身的命令: EulerPhi[n] // 欧拉函数MultiplicativeOrder[k, n, 1] //求mod n,k的指数 PrimitiveRoot[n] // 求n最小正原根 PrimePowerQ[n] // 判别n是否素数的方幂 MultiplicativeOrder[k, n, r] //(字符编辑原因,不能识别La 阅读全文
posted @ 2012-06-18 19:56 Leonhard-E 阅读(316) 评论(0) 推荐(0) 编辑
摘要: 实践了一个晚上,终于把大概的思路弄明白~~~~为此还编了个模板。在Mathematica 7.0模板如下: BeginPackage["自定义函数名`",{"需要用到的PACKAGE(通常在AddOns可以找到)`"," `"}] 自定义函数名::usage="对函数的注释"Begin["`Private`"] 程序段 End[]EndPackage[]想了想,比较空乏,给个原型吧BeginPackage["PrimitiveQ`", "NumberTheory`& 阅读全文
posted @ 2012-06-18 19:44 Leonhard-E 阅读(2006) 评论(0) 推荐(0) 编辑