トップページsoftware
37コメント11KB

頭の良い人集まれ!Mathematica

■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん@お腹いっぱい。02/08/07 00:16ID:uiGoLUAN
困っています.どなたかMathematicaに詳しい方が
いらっしゃいましたら教えてください.

やりたいことは,変数を純実数として定義することです.
これができないと,例えば,


x=I*a;
Re[x]

Out[1]=-Im[a]

となってしまいます.(これはaが複素数として扱われているからです)
私としては,aを純実数として扱って,Re[x]=0という解に
なって欲しかったのです.
(aには数値を代入したりするのではなく,文字の変数として扱います.)

どなたか博識な方,教えていただけませんでしょうか?
0002ハト ◆MAG/uRoM 02/08/07 00:29ID:???
ここの質問スレか数学板の質問スレに行ってみては?
0003名無しさん@お腹いっぱい。02/08/07 00:30ID:???
ませまてぃか?
0004名無しさん@お腹いっぱい。02/08/07 00:31ID:uiGoLUAN
>>2
なるほど!
了解です
でも,知ってる人いらっしゃいましたら,ここに書き込んで下さい.
完全に沈むまで見てますので.
0005名無しさん@お腹いっぱい。02/08/07 00:33ID:???
>>1
出力結果はいずれにしろ0なんだし間違ってはいないよな。
どうしても0と出力してほしいと、そういうこと?
0006名無しさん@お腹いっぱい。02/08/07 00:39ID:uiGoLUAN
>>5
そういうことです.
0007名無しさん@お腹いっぱい。02/08/07 00:40ID:???
ID:uiGoLUAN
ういごるあん
0008名無しさん@お腹いっぱい。02/08/07 00:48ID:Qo80GDob
aをa_Realって書いたらどう?
今手元にmathematica無いから確認できんけど
0009名無しさん@お腹いっぱい。02/08/07 01:01ID:uiGoLUAN
>>8
やってみました.

Out[1]=-Im[a_Real]
と出力されます

あと,こんなのも試しましたが,
x[a_Real]=I*a;
Re[x]
Out[1]=Re[x]
となり,ダメでした.

更に,こんなのもやりましたが,
x=I*Re[a];
Re[x]
Out[1]=0
となり,見事0にはなるんですが,ちょっと複雑な計算にすると下記のように破綻します
x=(I*Re[a]+Re[b])/(I*Re[c]+Re[d]);
Re[x]
Out[1]=Re[(I*Re[a]+Re[b])/(I*Re[c]+Re[d])]

困りました.数学板の人たちは眠っているのか無反応だし.
0010名無しさん@お腹いっぱい。02/08/07 01:10ID:wnDFuJD0
学術系の板は概して閑散としてる。2、3日、1週間レス来ない事だってザラ。

mathematicaいいなぁ…「セアラ」の本読んで欲しくなったよ
001102/08/07 01:16ID:???
>>9
ダメですたか、スマソ

下のほうのは割ってるからしょうがない気がする・・・
0012名無しさん@お腹いっぱい。02/08/07 01:26ID:Qo80GDob
あとはSimplifyとか
x∈実数を表す、Element[a, Reals]を使ってみるとか
0013名無しさん@お腹いっぱい。02/08/07 01:27ID:???
a∈実数
の間違い
0014名無しさん@お腹いっぱい。02/08/07 01:42ID:uiGoLUAN
>>11
以下のようにすると

x=(I*a+b)/(I*c+d)
ComplexExpand[x]
Out[1]=(a c)/Abs[I c+d]^2-(I b c)/Abs[I c+d]^2+
(I a d)/Abs[I c+d]^2+(b d)/Abs[I c+d]^2
とまで実部と虚部をわけて出力してくれるんですね.
(ComplexExpandは変数を実数として取り扱ってくれる関数なので)

Re[ComplexExpand[x]]としても,
Im[(b c)/Abs[I c+d]^2]-Im[(a d)/Abs[I c+d]^2]+
Re[(a c)/Abs[I c+d]^2+(b d)/Abs[I c+d]^2]
と再び変数を複素数として扱ってしまいちゃんとした答を出しません.


実際に実部とか虚部を取り出したい式はかなり複雑な形をしているので,
ComplexExpandの出力を自分で実部と虚部に分けるのはしんどいんです.


また今日も悩むことになりそうです.
0015名無しさん@お腹いっぱい。02/08/07 01:49ID:xKmeSq80
◆毎年約1万人も韓国・朝鮮人が大量に帰化しているというのに、
在日の数がほとんど減っていない。(ニューカマー含む)

        1998年   1999年  2000年
在日人口   638,828   636,548  635,269 人

そのうち日韓・日朝結婚が年間約8500組。
年間約1万人のハーフ混血が産まれており、1910年以降から
朝鮮系混血者は既に数百万人に広がり、日本人汚染が続く。
1952年から累計約26万人が帰化。売国奴もどんどん増えていく。

また、不法滞在の韓国人は56000人で外国人で最も多い!

◎外国人帰化数
http://www.moj.go.jp/TOUKEI/t_minj03.html
0016名無しさん@お腹いっぱい。02/08/07 01:52ID:uiGoLUAN
>>12

Element[a,Reals]
x=I*a;
Re[a]
Out[1]=a∈Reals
Out[2]=Re[a]

となりうまくいきませんでした.
RealsをRealに代えてもダメでした
0017名無しさん@お腹いっぱい。02/08/07 01:58ID:???
アプリケーション・ソフトウェアについて、設定・使用方法などの情報交換をする板です。
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
違法コピーやシリアルナンバーを求める投稿は禁止です。関連の質問も控えてください。
パソコンの初歩的な話題はパソコン初心者板へ
ファイル交換ソフトの話題はダウンロードソフト板へ
セキュリティソフトの話題はネットワークセキュリティ板へ

スレッドを立てる前に、同じような内容のスレッドがないか『スレッド一覧』を検索してください。
検索の仕方
  Win: Ctrl+F
  Mac: Command+F
もしかしたらWindows板や新・Mac板など、各OSの板に探しているソフトのスレがあるかも知れません。

単発質問スレは禁止です。
~~~~~~~~~~~~~~~~~~~~~~~~~~~
質問などはこちらでどうぞ。リンク切れの場合は上記の方法で検索してください。
『★スレッド立てるまでも無い質問★』
『■こんなソフトウェアはどこに?■』

現在、ソフトウェア板のローカルルールについて議論中です。
『ソフトウェア板の自治ルールを作ろう。』体験版、無料ソフトダウンロード
0018名無しさん@お腹いっぱい。02/08/07 02:00ID:???
sageで行こうや
0019名無しさん@お腹いっぱい。02/08/07 02:03ID:???
そうだね
0020名無しさん@お腹いっぱい。02/08/07 02:08ID:???
>>19がスベりました
0021_02/08/07 02:56ID:???
[ビジネスsoft板]
頭のいい人教えて!Mathematica
http://pc.2ch.net/test/read.cgi/bsoft/1028646675/

マルチ
0022名無しさん@お腹いっぱい。02/08/07 03:00ID:???
( ´_ゝ`)
0023名無しさん@お腹いっぱい。02/08/07 03:21ID:???
ひょっとして数学にも・・
0024名無しさん@お腹いっぱい。02/08/07 03:48ID:???
私、頭良いのですが何か?
0025名無しさん@お腹いっぱい。02/08/07 07:49ID:uiGoLUAN
やっぱ 知ってる人なんて そうはいないな
0026名無しさん@お腹いっぱい。02/08/07 07:56ID:???
マルチ、単発スレはまともに相手して貰えないことを学んで帰りましょう。
0027名無しさん@お腹いっぱい。02/08/07 09:52ID:tahpFZhq
Simplify[Re[a], Element[a, Reals]]

これではダメなのか。
0028名無しさん@お腹いっぱい。02/08/07 23:42ID:uiGoLUAN
>>27
それは私も考えましたがWindows版のVer.3では対応していませんでした.
ComplexExpand[Re[x]]
という手もありますが,これだと ちょっと式が複雑になったときに
エライ時間がかかるようで使い物になりませんでした.
0029名無しさん@お腹いっぱい。02/08/07 23:53ID:???
>>28
Ver3かぁ、そらぁちょっとわからんなぁ・・・
0030名無しさん@お腹いっぱい。02/08/08 00:18ID:???
マルチは帰れよ。

「結果的にマルチ」ですか?
0031名無しさん@お腹いっぱい。02/08/08 00:23ID:???
マルチ
http://science.2ch.net/test/read.cgi/math/985023298/241
0032名無しさん@お腹いっぱい。02/08/08 05:29ID:hpQciykS
>>30
>>31
大至急知りたいので,知ってる人がいそうなところに立てましたが,
住人は一緒だったということですね.
まぁ,こっちから言わせてもらえれば 知らないなら黙ってろよ ってこと.
Mathematica知らないやつには用無いんで.

有益な情報を下さった方々には心から感謝します.
ありがとうございます!
大体,解決の糸口を見つけました.

>>30or>>31
ってことで,このスレとビジネスsoft板のスレの削除依頼出しといて.
あんたら ヒマでしょ.

ではでは
0033名無しさん@お腹いっぱい。02/08/08 05:36ID:mMUsGiTt
ベンジャミン教授のMathMagicsなら知ってますが何か?
0034名無しさん@お腹いっぱい。02/08/08 10:58ID:???
 逆 ギ レ で す か ー ?
0035名無しさん@お腹いっぱい。02/08/08 13:17ID:???
自分でマルチポストしといて削除依頼出しとけとは…
夏だねぇ
0036名無しさん@お腹いっぱい。02/09/21 11:33ID:R1esJ7+h
Mapleの法が透き。
0037sage ◆TtoiRsXI 02/09/21 14:36ID:???
ageんな ヴォルケイノ
■ このスレッドは過去ログ倉庫に格納されています