有没有简单的方法设定一个Notebook所有的变量均为实数？

ryan_xu

当然，用Element之类的可以将某些变量申明为实数。但是变量比较多的时候，用Element去设定的时候太麻烦了一点。每增加一个变量，又得在Element里面加一个申明，不够方便！

也不希望用ComplexExpand，用ComplexExpand后再Simplify最后虽然可以得到结果，但是总觉得浪费了时间，特别是表达式比较复杂的时候ComplexExpand还是挺花时间的。

所以个人最奢侈的想法就是：能有一个简单的方法申明某个Notebook中所有的变量均为实数，那就可以减少很多麻烦了.....

哪位大侠指点指点？

FreddyMusic

Not clear what is advantage of your idea, but check initialize or initialization.

changqing

Needs["Miscellaneous`RealOnly`"]

ryan_xu

Needs["Miscellaneous`RealOnly`"]
General::obspkg: Miscellaneous`RealOnly` is now obsolete. The legacy
version being loaded may conflict with current Mathematica
functionality. See the Compatibility Guide for updating information.

In[4]:= a + I b // Im
Out[4]= Im[a] + Re

6.0中貌似已经不支持了......，可惜

原帖由 changqing 于 2008-10-22 16:04 发表
Needs["Miscellaneous`RealOnly`"]

[ 本帖最后由 ryan_xu 于 2008-10-24 21:24 编辑 ]

waynebuaa

不知道你这样做有什么好处；
不过，我可以指出一点的是，用Element也可以很方便的对很多变量操作：
比如：

1. list =
   
2.   Element[#, Reals] & /@ {a, b, c, d, e, f, g, h, i, s};
   
3. Simplify[{Log[E^a], Sqrt[b^4], (a + I b) // Im}, list]

复制代码

ryan_xu

首先感谢回复！

这种做法不一定有什么好处，只是我自己希望能够这样，因为我经常需要对计算出来的比较复杂的复数表达式取实部和虚部。
因此如果不限定变量为实数的话，最后的表达式中会有太多的Re和Im，最终的表达式不够清晰和明确。

Element目前看来是唯一的方法，也只能这样了

原帖由 waynebuaa 于 2008-10-25 12:05 发表
不知道你这样做有什么好处；
不过，我可以指出一点的是，用Element也可以很方便的对很多变量操作：
比如： list =
  Element[#, Reals] & /@ {a, b, c, d, e, f, g, h, i, s};
Simplify[{Log[E^a], Sqrt, (a +  ...

waynebuaa

原帖由 ryan_xu 于 2008-10-26 10:47 发表
最后的表达式中会有太多的Re和Im，最终的表达式不够清晰和明确。

在末尾加个分号，可以不让复杂的表达式显示出来嘛，想看结果，就用Simplify或 FullSimplify化简.......

waynebuaa

刚才浏览Mathematica的内置的全局变量时,想到这个问题也可以这样来解决:

附件是演示例子:

[ 本帖最后由 waynebuaa 于 2008-11-1 14:21 编辑 ]