在Mathematica8.0中怎么调用自己建的程序包

输完了Endpackage[]之后，就可以输入shift+enter运行，如果输入的程序包没有错误就会顺利运行，之后直接输入需要用到的指令如 Rijk

而不必输入<< Mtelchm

可以这样测试 Rijk 然后运行，如果程序包成功导入了就会显示出Rijk的函数信息

如果想以后使用可以保存成后缀是m的文件，mathematica可以直接打开的，而且可以直接运行，在后面输入运算

t = w^x;

f = a w^(2 x) + b w^x + c;

a1 = Coefficient[f, t, 2] ;

a2 = Coefficient[f, t, 1];

a3 = Coefficient[f, t, 0];

g = (#1 (t + #2/(2 #1))^2 + #3 - #2^2/(4 #1)) &[a1, a2, a3]

说明：t是人为指定，需要进行配方的变量

f是要进行配方的二次多项式

g是对f配方后的结果

有两种方法：

如楼上的直接绝对地址。

     <<C:/yourcodem

 2 加入$Path中，需要额外建立一个yourcode同名文件夹,并将之放入文件夹中。

     AppendTo[$Path,"C:\\yourcode"](或者PrependTo)

    <<yourcode`

 3 2方法也是临时的，在关闭重启MMA时需要重新输入一遍。永久方法是在MMA启动时候随MMA运行。找到initm文件(\Mathematica\80\SystemFiles\Autoload\PacletManager\Kernel),将2方法写入其中即可。

Mathematica代码如下：

co

={a,

b,

c,

d,

e,

f,

g,

h,

i,

j,

k};

expr

=

cox^Range[10,

0,

-1]

NSolve[D[expr,

{x,

2}]

==

0,

x]

因为方程次数高于5，所以一般只有数值解。

第一句是给系数赋初值，对应x次数由高到低（一定要先赋值，否则没法计算）。

第二句是产生表达式，这里用了矢量的标量积来缩减表达式。

第三句是求导，求数值解。

作为例子，比如：

co

=

Range[11];

expr

=

cox^Range[10,

0,

-1]

NSolve[D[expr,

{x,

2}]

==

0,

x]

In[53]:= Assuming[a \[Element] Reals, Simplify@Normalize[{a, a + 1, a + 2} ]] Out[53]= {a/Sqrt[5 + 6 a + 3 a^2], (1 + a)/Sqrt[5 + 6 a + 3 a^2], ( 2 + a)/Sqrt[5 + 6 a + 3 a^2]}

输入Clear[aa],aa为程序中的某个值

或者到菜单栏 Evaluation-》Quit kernel

我也很想知道输入什么语句可以达到 “到菜单栏 Evaluation-》Quit kernel” 的效果,每次都要鼠标点很烦啊。

Plot[Sin[x], {x, 0, 6 Pi}]

Plot[Cos[x], {x, 0, 6 Pi}]

Limit[1/x, x -> 0]

Limit[Sin[x], x -> 0]

D[Sin[x], x]

D[1/x, x]

Integrate[Cos[x], x]

Integrate[3 x, x]

上面应该是你要的答案，你最好再问问其它人。

注意：字母的大小写；数字与字母之间有一个空格；要知道上面的特殊符号是如何输入进mathematica的

那40分你可以自己留着了。

以上就是关于在Mathematica8.0中怎么调用自己建的程序包全部的内容，包括:在Mathematica8.0中怎么调用自己建的程序包、用Mathematica程序实现配方、Mathematica程序包无法加载等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！