【分享】交流一下 Mathematica 编程方法，期望学习该软件的网友积极参与

天山草

[这个贴子最后由天山草在 2013/11/14 08:55pm 第 3 次编辑]

程序中的共轭复数，上面那一横线是如何输入上去的？

天山草

[这个贴子最后由天山草在 2013/11/14 08:42pm 第 5 次编辑]

请唐灵再看看您的程序，有一个大的错误。
下面红框部分可能有错误—— C 点的坐标应该是独立的，而不是常数。
现在 C 点的坐标实部是 0，虚部是 1。

ysr

很想学习，但搞不到这个软件，学习也只能学1写皮毛，不能充分发挥软件的强大功能。

天山草

下面引用由ysr在 2013/11/14 00:24pm 发表的内容：
很想学习，但搞不到这个软件，学习也只能学1写皮毛，不能充分发挥软件的强大功能。

可以从网上下载。版本 7 以前的容易下载。较新的版本 8 或 9 不容易下载到“注册机”。

ysr

谢谢！以前下载过，界面是英语，无法安装，好象还要有密码才能用，内容多下载时间长。

天山草

[这个贴子最后由天山草在 2013/11/14 10:43pm 第 3 次编辑]


   唐灵原先的程序中误将 C 点的坐标定义为常量了。
   经修改的程序运行结果正确（与张景中的数据完全一样，当然，也要采用老张的原图才行），但是唐灵的程序仍然有个问题：外心坐标的表达式使 O1 圆心的分母为零【经检查，确实如此】，这说明外心坐标位置的公式尚需完善。【？？？】后来检查，不是这回事。见后面的回帖。


上面程序的附图跟张景中的图有一点点差别，就是将原图的 A,B,C 点改个名称，叫 A1、B1、C1点。这样就与程序完全适应了。

denglongshan

[这个贴子最后由denglongshan在 2013/11/14 10:40pm 第 3 次编辑]

下面引用由天山草在 2013/11/14 00:07pm 发表的内容：
请唐灵再看看您的程序，或许有一个错误。
下面红框部分可能有错误—— C 点的坐标定义大概不对。

谢谢您纠正，后面的图片都改正了，正确的写法是c = a + b I;
c'; = a - b I; d = u + v I; d'; = u - v I; e = s + t I; e'; = s - t I
Mathematica中，I是虚单位，而不是i，运算i*i显示i平方。

下面引用由天山草在 2013/11/14 09:07am 发表的内容：

使用 mathematica 中的哪个命令，能将实部化简（去掉表达式中的 i）？
程序中的共轭复数，上面那一横线是如何输入上去的？

此主题相关图片如下：

8.0版本中，点击面板->其它->基本排版即可。
建议还是按照惯例大写字母表示点，小写字母表示对应的复数。

下面引用由天山草在 2013/11/14 08:24pm 发表的内容：

经修改的程序运行结果正确（与张景中的数据完全一样），但是有个问题，外心坐标的表达式使 O1 圆心的分母为零【经检查，确实如此】，这说明外心坐标位置的公式尚需完善。
此主题相关图片如下：

这肯定是问题，还需要研究，但是更大的问题是按照现在我们的假设并不能确定这些直线构成五角星形，他们也没有提出，已经强调过两次，您没有注意。
如果P表示△ABC的内心，由共轭比定义则可以得到：
[(p-a)/(p';-a';)]^2=[(a-b)/(a';-b';)][(a-c)/(a';-c';)]
[(p-b)/(p';-b';)]^2=[(a-b)/(a';-b';)][(b-c)/(b';-c';)]
上面的方程组可以求出P，但不能确定P是旁心还是内心
http://www.mathchina.com/cgi-bin/attachment.cgi?forum=5&topic=18421&postno=102&name=B4EDCEF3A3A1_1384401947&type=.gif
原意是表示乘积，中间没有空格，反而代表一个变量，即两个字母表示一个变量，如果运算中没有共轭复数，还不会错，由于c+c';=0，必然错！

天山草

下面引用由denglongshan在 2013/11/14 09:27pm 发表的内容：
这肯定是问题，还需要研究

  不是这个问题，外心坐标的公式没有问题。
  程序在计算 J 和 J 的共轭复数时，认为它们是相等的，其原因可能是 J 上面那一道横线有毛病。输入上去时看起来有线，但电脑不认它。

天山草

下面引用由denglongshan在 2013/11/14 09:27pm 发表的内容：
原意是表示乘积，中间没有空格，反而代表一个变量，即两个字母表示一个变量，如果运算中没有共轭复数，还不会错，由于c+c';=0，必然错！

denglongshan

在57楼中已经指出这个类似错误，注意红色注释。
“其原因可能是 J 上面那一道横线有毛病。输入上去时看起来有线，但电脑不认它。”真正原因是求J的共轭复数函数Jd上面漏写一横，最大的问题是，不论是张院士还是我们的证明，都没有考虑到点的位置，在不构成五角星时，结论是错误的。
[br][br]-=-=-=-=- 以下内容由 denglongshan 在 时添加 -=-=-=-=-
注意：下面的输入和输出结果是直接从Mathematica复制过来的
In[71]:= i i
Out[71]= i^2
In[72]:= I I
Out[72]= -1
我已经把源程序改成c=x+y I;大写字母I才是输入时的虚单位，其余类似错误都已经修改，注意字母之间有空格才表示乘积，否则只是一个符号，我的qq:525638206，可以线上交流。