Question

mathematica 可以函数调用吗？

我想定义几个子函数，在另外的程序里调用，这样可行吗？matlab可以把函数保存成m文件，然后在另外的程序里使用，mathematica有类似功能吗？

Answer 1

一楼的方法还不错，只是每次要输出一次，个人就不喜欢用，
还有一种方法是你定义了一个函数，然后如果你以后用那个函数，就把它所在的细胞的style设置为code，然后保存的时候会提示自动生成.m文件，以后在任意notebook里就可以在工作目录调用这个包里的函数。
用Get["a.m"]
a.nb里面，也就是a.m里面有fun这个函数，就可以用了。

Answer 2

(*-------------------------------------
将下面的内容copy到mathematica 中
-------------------------------------*)
(*下面代码是定义一个函数bing*)
bing[x_] := Module[{vara},
vara = 1/x;
vara = Tr[vara];
vara = Simplify[1/vara];
vara];
(*下面代码是将该函数保存到 "d:\\gggg\\"文件夹下,注意gggg文件夹必须提前存在*)
SetDirectory["d:\\gggg\\"]
DumpSave["bing.mx", bing]

(*------------------------
将上面的内容运行后函数bing就保存到了d:\gggg下了.然后你可以保存或者不保存该文件,关闭mathematica 测试一下
--------------------------*)

(*-------------------------
重新打开mathematica ,输入下面的内容进行测试
---------------------------*)
<< d:\gggg\bing.mx
bing[{3, 6}]
(*输出的结果是2,说明结果正确,证明该方法可行*)

Answer 3

你咋不问我呢？数学软件包么。。
请参考