トップページ⇒math
1001コメント517KB

〓 Mathematica 伍 〓

レス数が950を超えています。1000を超えると書き込みができなくなります。
0001132人目の素数さん2011/11/11(金) 09:02:28.82
        _....._{{ 〃
      , - ' ,..、、.ヾ{{フ'⌒`ヽ、
    /  ,:', -‐‐` ´ '´⌒ヽ ヾ:、
.   ,'   ,'´ ,ィ ,ィ ,' ,   `ヽ',  ',-<
    ,'   .i  /|. /.| { i,  i,  }.  }_,,))
   ! |  ! .,'-.{ ! !|; |`、.}゙!.! |.  ! ヽ.
   ', ', |Vァ=、゙、 `゙、!-_:ト,リ', l ! |   ゙',
    ヽ、', l:!Kノ}.     f:_.)i゙i: リ ! l ル 
     | l!iヾ- ' ,   .!__:ノ ゙ ,リ l リ'´     
.     ',|!!、    r‐┐   ` ノ'. /,イ    / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄  
      'i!゙、ヽ、 ゙ー'  _, ィ,:',:''´    <  Mathematica に関する話題はここに書いてね!
      ゙:、ィ、jヾー::: 'iヘ .ノ',リ.        \___________________
   ,、- '´ ヽ、゙、   { `>"、  
  /\\    ',   }   //`ヽ

過去スレ
〓Mathematica〓
http://science2.2ch.net/test/read.cgi/math/985023298/
〓 Mathematica 2 〓
http://science3.2ch.net/test/read.cgi/math/1078534285/
〓 Mathematica 3 〓
http://science6.2ch.net/test/read.cgi/math/1121413040/
〓 Mathematica 四 〓
http://kamome.2ch.net/test/read.cgi/math/1197270001/ (鯖飛びでログ消滅)
http://mimizun.com/log/2ch/math/1197270001/
〓 Mathematica 5 〓
http://kamome.2ch.net/test/read.cgi/math/1285859504/
0855132人目の素数さん2014/08/15(金) 17:58:24.78
>>854
>>745の
>マンデルスタム変数:http://www.geocities.jp/dirac_equation/desnhishoumetu.pdf の(8.55)式
の通り
0856132人目の素数さん2014/08/15(金) 18:40:46.13
お返事有難う御座います。

>マンデルスタム変数:http://www.geocities.jp/dirac_equation/desnhishoumetu.pdf の
>通り
後で、再度勉強します。
思い返しますと、マンデルスタム変数のmathematicaコードを教えて頂く前に、自分なりに、不完全ですがコードを作って計算しておりました。それも、見直します。

コンプトン散乱で、
p0,p1,k0,k1, k2,k3などが、すべて2乗倍になったときの計算結果は
(1)q0をq0^2などに変更したコンプトン散乱その1
(2)q0をq0^2などに変更したコンプトン散乱その2
(3)どちらも間違い
の内のどれでしょうか?

http://www.geocities.jp/dirac_equation/index.htm

のcompton r1に計算結果を追加しました。
0857132人目の素数さん2014/08/15(金) 21:14:47.19
>>856
デタラメやる前にちっとは勉強したら
0858132人目の素数さん2014/08/15(金) 21:43:31.49
p0,p1,k0,k1, k2,k3などが、すべて2乗倍になったときの計算結果を考えることは、物理としては意味がないかもしれませんが、数学として考えると意味があると思います。
数学として考えた場合、答えは、どうなると考えられますか?
私は
(2)q0をq0^2などに変更したコンプトン散乱その2
が正しいと考えます。
p0,p1,k0,k1, k2,k3などが、すべて2乗倍になるだけで、マンデルスタム変数を使って変換する式は、そのままのはずです。
すると、ルートの場合は、どうしたら計算できるのか?
がわからないです。
0859132人目の素数さん2014/08/15(金) 22:55:53.13
>>858
ベクトルやベクトルの内積や合同変換群や不変量などの数学的な性質を
一切無視した置き換えだからデタラメだと言われてるんだが。
「ローレンツ不変量」とか知らんのだろう?
0860132人目の素数さん2014/08/16(土) 07:43:49.82
ご回答有難う御座います。
>「ローレンツ不変量」とか知らんのだろう?
問題を整理します。
ローレンツ変換に対して、不変にならないのは、どの量でしょうか?
1.p0,p1,k0,k1, k2,k3などが、すべて2乗倍になったときのこの式でいうsl(q) 等
2.マンデルスタム変数等の変換の仕方
まず、1ですが、不変であるような気もします。クラインゴルドン方程式でローレンツ変換に対して、不変になるからです。
2ですが、デタラメデス。導出方法が理解できず、適当に変換方法を、2乗しています。
そこで、いままでの計算は忘れて、(2乗倍とか単なるルート倍とかはやめて)、物理的に意味のある計算を提案します。
�@p0を、p01^0.5とp02^0.5の積として分解して計算を進める。
�Ap01^0.5、p02^0.5のマンデルスタム変数等の変換を行い
�B最後にp01^0.5=p02^0.5=p0^0.5として
�C通常のコンプトン散乱の結果が得られることを確認する
これなら、「ローレンツ不変量」その他、すべて、満たしているはずです。
「なんで、わざわざそんな面倒なことをするのか?」と思われるかもしれませんが、自動車の分解が面白いのと同じで、特に意味はなく、面白そうだからです。
0861132人目の素数さん2014/08/16(土) 11:35:15.48
こんにちは、

下記を計算してみました。
HPのcompton 途中
です。
コードのどこが悪いでしょうか?

�@p0を、p01^0.5とp02^0.5の積として分解して計算を進める。
�Ap01^0.5、p02^0.5のマンデルスタム変数等の変換を行い
�B最後にp01^0.5=p02^0.5=p0^0.5として
�C通常のコンプトン散乱の結果が得られることを確認する
0862132人目の素数さん2014/08/16(土) 14:03:29.92
Mathematicaにはデバッガはないの?
0863132人目の素数さん2014/08/16(土) 16:11:01.71
こんにちは、

>Mathematicaにはデバッガはないの?
バグをとるのではなく、
�@理論を本当に理解して正しい計算式をコードとして入力しているか
�AMathematicaでちゃんと答えを導出できるテクニックを持っているか
になると思います。
更に下記を計算してみました。
HPのcompton 更に途中

もう一歩のような気がします。消えてほしい変数が残ってしまいます。
しかし、消えてほしい変数が消えても答えが間違っているかもしれませんが、
0864132人目の素数さん2014/08/16(土) 22:40:02.38
>>863

おまえのスペックは?
高校生が夏休みの自由研究でもやってんの?

Mathematicaはある答えを導出するために計算式入力して
はいMathematicaさん計算してください!って使い方だけじゃないのよ
開発元のウルフラムもV10からは「ウルフラム言語」って読んでるくらいで、
普通のプログラミング言語のようにプログラムすることも可能。

ただ、個人的に思ってることはMATLABとかはデバッガがあるのに、
Mathematicaは基本的に机上デバッグするしかなくて効率わるいなぁと。
0865132人目の素数さん2014/08/16(土) 22:46:06.70
>>864
信じられんmapleでもデバガーあるというのに
やっぱりmaple>>>>>>>>mathematicaだろうな
0866132人目の素数さん2014/08/16(土) 22:59:55.74
>>865
Mapleはデバッガあるんだ!
Mapleの使い勝手ってMathematicaと比べてどう?
俺も昔Maple使ってたんだがV6とかぐらいで今はだいぶ進化してるんだろうな
その当時のMapleの印象としては
●ヘルプがくそすぎる
●しょうもない関数が多すぎ(複利計算の公式通りの関数とかw)
って感じだったからMathematica使うようになったんだよね

その当時デバッガがあったかは覚えてないけど、
最近のMaple vs. Mathematicaって公平にジャッジしてどうなんだろ。
ヘルプもちゃんと翻訳されてマシになってきてるかもしれんな。
0867132人目の素数さん2014/08/17(日) 00:29:21.56
>>863
>�@理論を
全然理解してないって昔から指摘されてるのに、全く進歩しないねぇ
0868132人目の素数さん2014/08/17(日) 01:29:58.20
>>866
mapleは最近、ドキュメントモードとワークシートモードの2種類が
あるようになったよ。ドキュメントモードはワープロみたいな文章が
作れる。ワークシートモードは従来のコマンド入力するモードです。
クリッカブルマスと言って、コマンド入力しなくても計算できる機能
もあるんだよ。とりわけドキュメントモードの時にやくだつ。
ヘルプはmaple18で完全日本語化したよ
ヘルプについては使いにくいけど、mathematicaも変わらないと思う。
mapleはコマンドについての奥が深いと感じる。mathematicaの方が
コマンドを書きやすい。
 公平にジャッジするとどうなるかはわからない。
mapleはプログラミング言語に近いけど、mathematicaはそうではない。
0869132人目の素数さん2014/08/17(日) 03:10:24.32
>>868
mapleもうV18までいってんだw
昔はmathematicaと同程度のバージョンアップだったのに
最近は開発サイクル変えたのかな

クリッカブルマスはmathematicaで言えばパレット入力みたいなもんかな?
ドキュメントモードに相当する機能(見栄えを美しくする)も
mathematicaで出来た気がする

ヘルプやっと日本語化されたんだねw
V18って最新版だから最近ようやくって感じか
使ってた当時、使いづらいなと思ったのが、
ヘルプ上で実行できなかったこと。
これも改善されてるのかな。

昔使ってた時のなごりで今でもメルマガが届くんだが
Mapleは応用に力入れてるのかなって感じがする
MapleSimとかをしきりにアピールしてて、
確かにこれに相当するMathematicaのアドオンは知らない
(あるのかもしれないけど知名度低い)
モデルベースデザインをうたって産業界を巻き込もうとしてる感じ
トヨタとかではけっこう実績もあったりするらしい
mathematicaは産業界への応用に力いれてる気配はなく、
純粋な学問としての数学を突き進んでる感じ
あとは環境整備とかにも力いれてるね
だんだん方向性に違いが出てきてるから、
自分にあったものを、って感じかな
0870132人目の素数さん2014/08/17(日) 08:55:31.22
こんにちは、


y = Sqrt[(m^4 + 2*m^2*s - s*(s + 2*u))/p3a]*Sqrt[(m^4 + 2*m^2*s - s*(s + 2*u))/p3b];

y1 = Simplify[y //. {p3a^(1/2)*p3b^(1/2) -> p3}];

を実行させると

Sqrt[(m^4 + 2*m^2*s - s*(s + 2*u))/p3a]*Sqrt[(m^4 + 2*m^2*s - s*(s + 2*u))/p3b]
となります。
{p3a^(1/2)*p3b^(1/2) -> p3}
が効かないです。
これを効かせて
m4+2 m2 s-s (s+2 u)/p3
とさせるには、
{p3a^(1/2)*p3b^(1/2) -> p3}
をどのように修正すれば良いでしょうか?
0871132人目の素数さん2014/08/17(日) 11:50:47.63
>>869
いや、パレット入力とはちがう。
mathematicaだとパレットのギリシャ文字のパイ
をクリックすると入力行にそのギリシャ文字が現れる。
他方mapleだとドキュメントモードの場合は
ギリシャ文字のパイが同様のことをして現れる。
他方、ワークシートモードの場合は
パレットのギリシャ文字のパイをクリックしても
入力行に現れるのはコマンドのPiです。

クリッカブルマスというのはそうじゃなくて、
たとえば多項式の一部をまとめたい場合に、
そこをドラッグする。するとどう変形したいかの候補が
現れてそれを選択すると、もとの式全体の、しかし
一部分がまとめられた、式が現れる。

maplesimは持ってないから知らない。
mathematicaはmathematicaalpha?というのとか、
raspberrypiへの無償提供とかが話題になってるよね。
もともとmapleはAlgol70?だかを参考にして作っているから
プログラミング指向が強いんだよ。mathematicaのプログラミング
は普通のプログラミング言語とかなり違うでしょう?
そういうのが嫌だったな。それにプログラミングの本は多くないし。
0872132人目の素数さん2014/08/17(日) 11:59:55.79
>>869
ヘルプ上での実行はできなかったんじゃなかったかな?
だけど、それについては慣れだよ。mathematicaに慣れると
ヘルプ上での実行はあったほうがいいとおもうし、mapleに
慣れるとそんなものいらないよ、別にワークシート開いてコピー
ペーストで実行すればいいから、と思うようになるし。

バージョンアップのペースが昔とくらべてどうとかは知らない。
ドキュメントモードだけど、数式計算もできるワープロレベル
だよ。自分はワークシートモードで使ってるけど。

mathematicaは最初の頃のバージョンについてはかなりおそまつ
だったというのはよく聞く。mapleはmapleVあたりで開発者の
一人がスピンオフさせられてしまったんだよね。それでmapleの
魅力が減ってしまった。mathematicaの商業的な成功は宣伝に力を
入れたことだ、悪貨が良貨を駆逐するようにmathematicaが
mapleよりも売り上げを大きく上回るようになったともよく言われるよね。

自分はmapleが好きなんで、これからもmapleの開発が続いてほしいと
おもってる。mathematicaを昔使っているときと比べてもmapleの勉強を
するときは遥かに楽しいよ。奥が深いとおもうから。
0873132人目の素数さん2014/08/17(日) 12:04:31.31
>>866
maple6だとデバッガはあったはずだよ。4についての本をみたけど
それにもデバッガが出て来てたから。
0874132人目の素数さん2014/08/17(日) 12:45:28.82
http://www.geocities.jp/dirac_equation/index.htm

答えが一致しません。

原因不明。
0875132人目の素数さん2014/08/17(日) 13:29:15.68
すませんが、mathematicaで、
http://www.geocities.jp/dirac_equation/index.htm
の
答えが一致しない
の
Compton r3
を計算して頂けないでしょうか?
8*(m^4 - s*u + m^2*(3*s + u))
が正解なのですが
4*m^2*(14*m^2 - m^4/s + s + 2*u)
となります。
Mathematica9を使用しているのですが、他のバージョンでしたら、ちゃんと計算するかも?その可能性は、ほとんどないのですが、何回見直しても、原因がわからんのです。
0876132人目の素数さん2014/08/17(日) 16:46:21.48
http://www.wolfram.com/mathematica/trial/

多分、結果はver9と同じとは思いますが、今からver10trialをインストールして試してみます。
0877132人目の素数さん2014/08/17(日) 21:38:58.98
こんにちは、

下記を教えて下さい。
�@ある式y1があり、その変数を別の変数に変換させました。
�A別の変数を、元の変数に戻そうとしました。その式をy2とします。
�By1とy2の表示は同じになるはずですが、異なります。
�Cしかし、見かけは異なるのに、y1-y2=0になります。

y1とy2の表示を同じにするには、元に戻す変換を、どのようにすれば良いでしょうか?


http://www.geocities.jp/dirac_equation/index.htm
の
変換
に、ファイルが入っています。
0878132人目の素数さん2014/08/18(月) 12:53:52.63
http://i.imgur.com/tuZPStp.jpg
0879132人目の素数さん2014/08/18(月) 20:04:48.44
>878

有難う御座います。
おっしゃる通り、やってみましたら、出来ました。
感謝、感謝、感謝で御座います。

ご教示頂いた法則は、全く知らなかったです。
今まで、mathematicaの変換ができなくて、よく悩んでいたのですが、これが原因だったかもしれません。
昨日からずーと悩んでいたのですが、非常に助かりました。同時に、「もし教えて頂いてなかったら、一生解決しなかったのかも?」と「ぞ〜」としました。

http://www.geocities.jp/dirac_equation/index.htm
に出来た計算結果を入れております。

本当に有難う御座いました。
0880132人目の素数さん2014/08/18(月) 20:41:02.25
>879

すません。出来た思ったのですが、私の早とちりでした。

再度、やってみますと、結果は変わりませんでした。

どこが間違っているでしょうか?再度、ご教示頂きましたら幸甚です。

http://www.geocities.jp/dirac_equation/index.htm
0881132人目の素数さん2014/08/18(月) 21:05:29.11
そろそろお前コテ付けたら?
0882132人目の素数さん2014/08/18(月) 21:21:56.88
直接、計算すると変換できることを確認しました。


http://www.geocities.jp/dirac_equation/index.htm


やはり、変数を、クリアまたは初期化すれば、出来るんでしょうね?
0883132人目の素数さん2014/08/18(月) 22:11:46.44
大域変数p0...j3が値を持ったまま後半に突入しているから、
ルールがp0a -> p0/p0b -> (p0a p0b)/p0b -> p0aとか…
0884132人目の素数さん2014/08/18(月) 23:26:03.61
>883

お返事有難う御座います。
そういうことで御座いますか、、、やっと解りました。
何度も何度も、すいません。
今度こそ、感謝、感謝、感謝で御座います。
計算結果は、HPに入れました。

更に、すいませんが、新しい質問です。
誠に勝手ながら861に戻らせて頂きます。
�@p0を、p01^0.5とp02^0.5の積として分解して計算を進める。
→終わりました。
�Ap01^0.5、p02^0.5のマンデルスタム変数等の変換を行い
�B最後にp01^0.5=p02^0.5=p0^0.5として
�C通常のコンプトン散乱の結果が得られることを確認する
�A以降の計算結果をHP「新しい質問です」に入れたのですが、通常のコンプトン散乱の結果が得られません。どこが間違っているのでしょうか?
夏休みの自由研究と思って付き合って頂きましたら幸甚です。
0885132人目の素数さん2014/08/19(火) 22:23:37.23
>884
答えは、y1^0.5=(8*(m^4-su+m^2(3s+u))^0.5
ですが、導出方法が不明ですね。
0886132人目の素数さん2014/08/19(火) 22:34:12.11
piのrule pi -> ci(m,s,u)では
f=8*(m^4 - s*u + m^2*(3*s + u))
となる(p=p,q,k,j,i=0,1,2,3)。

piaとpibのruleでは、piを纏めると
pi -> pia pib -> ci(m,s,u)^2
となるため、fとはならない。

piaとpibのruleの対称性から、仮に
一方をpib -> 1とするとfがえられる。

>p0を、p0a^0.5とp0b^0.5の積として分解...

ならばp0 -> p0a p0bはおかしくないですか?
0887132人目の素数さん2014/08/20(水) 20:28:59.47
ご指摘有難う御座います。

>ならばp0 -> p0a p0bはおかしくないですか?
その通りで御座います。
また、
答えは、y1^0.5=(8*(m^4-su+m^2(3s+u))^0.5
にならないことにも気がつきました。

私が求めていたことは、下記のように、修正すれば得られることも気づきました。(勝手にmathematicaで次の計算は出来ないだろうと思い込んでおりました。やってみますとちゃんと計算してくれました。)

sl[q] = (?u[0]*q0 + ?u[1]*(-q1)^(1/2) + ?u[2]*(-q2)^(1/2) + ?u[3]*(-q3)^(1/2)^(1/2) + ms);
sl[p] = (?u[0]*p0 + ?u[1]*(-p1)^(1/2) + ?u[2]*(-p2)^(1/2) + ?u[3]*(-p3)^(1/2)^(1/2) + ms);
sl[k] = (?u[0]*k0 + ?u[1]*(-k1)^(1/2) + ?u[2]*(-k2)^(1/2) + ?u[3]*(-k3)^(1/2)^(1/2));
sl[j] = (?u[0]*j0 + ?u[1]*(-j1)^(1/2) + ?u[2]*(-j2)^(1/2) + ?u[3]*(-j3)^(1/2)^(1/2));


貴重なご指摘に感謝致します。
0888132人目の素数さん2014/08/22(金) 19:06:39.75
バージョンアップのたびに
ファイルフォーマットを変えるのが
うざい

新しくすると古いバージョンで読めない
余計なことをするな
0889132人目の素数さん2014/08/22(金) 19:08:44.03
すんませんですた。。。。
0890狸 ◆2VB8wsVUoo 2014/08/22(金) 19:09:21.50
>>4
>4 名前:KingMathematician ◆LoZDre77j4i1 :2014/08/21(木) 19:27:24.63
> とりあえず, vector analysis から修得しようか.
>

狸

痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕
逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢
痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕
逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢
痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕
逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢
痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕
逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢
痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕
逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢
痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕
逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢
痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕
逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢・逮捕・痴漢
0891132人目の素数さん2014/08/24(日) 17:17:42.70
チラ裏

jacobian[n_]:=r^(n-1) Product[Sin[\[Theta][i]]^(n-i-1),{i,n-1}]
v[n_]:=2^n Integrate[jacobian[n],{r,0,1},Sequence@@Table[{\[Theta][i],0,\[Pi]/2},{i,n-1}]]
Table[v[n],{n,10}]
Table[\[Pi]^(n/2)/(n/2)!,{n,10}]
0892狸 ◆2VB8wsVUoo 2014/08/24(日) 17:19:38.71
狸

>35 名前:KingMathematician ◆LoZDre77j4i1 :2014/08/24(日) 17:10:09.59
> 私が実際に社会を動かす事を良しとする.
>

■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
0893132人目の素数さん2014/08/29(金) 23:39:08.55
Table[RegionMeasure[Ball[Table[0, {n}]]], {n, 10}]
Table[Integrate[1, Element[Array[x, n], Ball[Table[0, {n}]]]], {n,
10}]
0894132人目の素数さん2014/08/30(土) 14:11:32.46
>>893
RegionMeasure[ImplicitRegion[(c1^2+c2^2)^(-1/2)>=(c1^2/a1^2+c2^2/a2^2)^(-1/2)+1,{{a1,0,1},{a2,0,1},{c1,-1,1},{c2,-1,1}}]]
Integrate[1,Element[{a1,a2,c1,c2},ImplicitRegion[(c1^2+c2^2)^(-1/2)>=(c1^2/a1^2+c2^2/a2^2)^(-1/2)+1,{{a1,0,1},{a2,0,1},{c1,-1,1},{c2,-1,1}}]]]
orz
0895132人目の素数さん2014/09/06(土) 07:49:39.29
215(x^4+y^2+54)
とか
689(x^3+y^7+xy+xy^4+125)
の式から、係数「215」、「689」を抽出するには、どうしたら良いでしょうか?
0896132人目の素数さん2014/09/06(土) 18:16:46.06
Coefficient で係数を得てから、非零の係数から最大公約数でも計算したら
0897132人目の素数さん2014/09/07(日) 20:52:42.26
回答有難う御座います。
やってみます。
0898132人目の素数さん2014/09/07(日) 21:34:21.14
立体を切断するにはどうすればいいんだ?

knife.mは最近のバージョンでは使えないんだろ
PlotRangeだと斜めとか切れないし
0899132人目の素数さん2014/09/08(月) 00:34:23.87
knife.m現在はファイルすら見つからないね
著者の人は相変わらずMathematica使ってるみたいだけど
興味が折り紙に向かってる模様
http://www.jssst.or.jp/award/detail/id=94

せっかく作ったパッケージなのになんで公開やめちゃったんだろう
新しいバージョンで動かなくなってメンテやめちゃったのかな
0900132人目の素数さん2014/09/14(日) 15:11:45.59
30万円もするようなもの、そう簡単に買えるか。
0901132人目の素数さん2014/09/14(日) 22:00:53.73
学生だったら2、3万で買えるし、home editionが5万くらいでしょ?
0902132人目の素数さん2014/09/16(火) 18:26:30.32
https://codeiq.jp/ace/code_teller/q1086
「設問チラ見」で問題が見れる

この問題をMathematicaで解いて使用言語「Wolfram言語」として送ったった。

届いた評価フィードバックがこちら。

【解答内容】
最適解でした。

【コメント】
詳細な説明ありがとうございます。
解の全列挙も良いアピールですね。Wolfram言語の需要がどの程度あるかは予測できかねますが、良いオファーがあることをお祈り申し上げます。

【参考評価値(1〜5点)】
(1)提出フォーマット 5.0
(2)入出力 5.0
(3)可読性 5.0
(4)汎用性・拡張性 5.0
(5)判断力・思考力 5.0

総合評価 5.0

10行ぐらいのコードだったんだが、コードの内容には一切触れず。
なんかよくわからんけど合ってるよ、おめでとう、ぐらいの感じだな。
Mathematicaの実行環境がないということで実行すらしてないだろう。
Wolfram Programming Cloudの存在教えてやりゃーよかったかな。
0903132人目の素数さん2014/09/17(水) 18:14:38.85
>>902

挑戦済み0人になってるけど。
wolfram langageだとカウントもされんのか。
0904132人目の素数さん2014/09/17(水) 22:23:23.03
>>898
>立体を切断するにはどうすればいいんだ?
>
>knife.mは最近のバージョンでは使えないんだろ
>PlotRangeだと斜めとか切れないし


Ver.10で立体の共通部分とか
できるようになったからやってみそ
0905132人目の素数さん2014/09/17(水) 22:37:28.26
>>903

>wolfram langageだとカウントもされんのか。
ワロタw
なんか受付期間を変えて何度もやってるみたい
https://codeiq.jp/ace/code_teller/
https://codeiq.jp/ace/code_teller/q986

この問題は言語不問だからWolfram言語でもOK
もちろん言語指定の問題もある

https://codeiq.jp/ace/code_teller/q1076

この問題をC#で解いたらオファーが3個くらいきた
0906132人目の素数さん2014/09/17(水) 22:42:07.67
>>904

立体の共通部分はまだダメだ
平面だけでした
0907132人目の素数さん2014/09/25(木) 21:03:59.71
>>900-901
今は一般人でも5000円もあれば使える時代に何を言ってるのやらw
ただしハードが遅いけどね
0908132人目の素数さん2014/09/27(土) 16:08:52.78
>>905だけどWolfram言語で解いた問題にもオファーきた
しかも2社

プログラミング言語総選挙にはC#で応募しといた
https://codeiq.jp/wp/vote/
0909132人目の素数さん2014/10/04(土) 08:03:17.17
いきなりですが、
素粒子論の専門家でmathematicaを使用している人には、どのような先生がいるのでしょうか?
0910132人目の素数さん2014/10/04(土) 13:23:50.72
増田 哲也 先生
0911132人目の素数さん2014/10/04(土) 13:34:58.54
>910
有難う御座います。
更に、ご存じないでしょうか?
0912age2014/10/04(土) 14:25:46.19
物理板できけ
0913132人目の素数さん2014/10/04(土) 14:31:12.17
増田先生の専門は数理物理
0914132人目の素数さん2014/10/22(水) 11:24:33.26
パラメータ付けされた曲線の長さをマセマティカで計算する方法教えていただけませんか、、、
0915132人目の素数さん2014/10/22(水) 11:35:29.20
>>914
定積分の計算じゃないの
0916132人目の素数さん2014/10/22(水) 13:41:46.73
マセマティカで論文を生成する方法教えて
0917132人目の素数さん2014/10/23(木) 06:23:29.80
>>914
ArcLength
0918132人目の素数さん2014/10/27(月) 21:22:49.19
閉曲線が自分と交わってる点の求め方ってMathematicaでなにかありますか?
閉曲線のパラメータ表示はわかってるとします。
グラフみればなんとなくどこかわかるけど、グラフが複雑になるとわけわからなくて困ってます。
0919132人目の素数さん2014/11/09(日) 08:42:42.46
こんにちは、
添付は、電子・ミューオン散乱の計算です。
答えは間違っています。どこを修正すれば、良いでしょうか?

http://www.geocities.jp/dirac_equation/index1.html
0920132人目の素数さん2014/11/09(日) 22:43:38.91
>>919
y
0921132人目の素数さん2014/11/10(月) 19:56:11.98
ご回答有難う御座います。

>>920
ほんとですね。確かに、yの部分が、間違っておりました。

更に、電子陽電子の散乱を計算しました。
答えが全く合いません。
原因は、マンデルスタム変数の部分が、コンプトン散乱で使用していた
ものと異なるからだと思っております。
コンプトン散乱の場合は、電子はm、光子はm=0
電子陽電子の散乱の場合は、両者ともmとして計算するためです。

添付にコンプトン散乱の場合のマンデルスタム変数の計算をつけております。
s+t+u=2m^2
が導出出来ません。どこが間違っているのでしょうか?

http://www.geocities.jp/dirac_equation/index1.html
0922132人目の素数さん2014/11/10(月) 20:34:06.13
>>921
Mathematica文法で {a,b,c,d}^2 はどう計算されるか知ってる?
0923132人目の素数さん2014/11/10(月) 22:35:00.45
お返事有難う御座います。
>>922
{a,b,c,d}.{a,b,c,d}にすれば、良いわけですね。
全く、考えていなかったです。
電子・ミューオン散乱の計算は、相対論的極限で,m=M=0のときは
答えが合っていますが、そうでない時は、導出できません。
電子、陽電子散乱も、陽電子の質量が考慮されておりませんので
正しい答えが導出出来ません。(多分)
要するに、下記の変換に、ミューオンのM(または陽電子のm)を反映させて
今度は、s+t+u=4m^2等の関係になるようにすることが必要です。
でも、そのM(またはm)を、(同じ場所のはずですが)、どこに追加すれば良いかは謎です。
直感的には、対称性からして
p0→(s+m^2+M^2)/(2Sqrt[s]),
p3→(s-m^2+M^2)/(2Sqrt[s]),
t→m^2+M^2-s-u
ではないかと、思っております。
0924132人目の素数さん2014/11/10(月) 22:45:43.70
>>923
>ではないかと、思っております。
計算したら、全くはずれてました。(泣)
0925132人目の素数さん2014/11/10(月) 23:16:18.52
>>921
>>740
0926132人目の素数さん2014/11/11(火) 21:25:34.51
お返事有難う御座います。
>>740
承知致しました。
下記に
1.コンプトン散乱のマンデルスタム変数を満たす確認計算
2.電子・陽電子散乱のマンデルスタム変数を満たす確認計算
3.電子・陽電子散乱の計算
を入れております。

直感的は正しいかもしれません。(一部訂正)
p0→(s+m^2+M^2)/(2Sqrt[s]),
p3→(s-m^2-M^2)/(2Sqrt[s]),
t→2*(m^2+M^2)-s-u

なぜか、3の計算が合いません。なぜでしょうか?

http://www.geocities.jp/dirac_equation/index1.html
0927132人目の素数さん2014/11/11(火) 21:40:48.10
>>926
>p0→(s+m^2+M^2)/(2Sqrt[s]),
>p3→(s-m^2-M^2)/(2Sqrt[s]),
この粒子の質量はどうなる?
0928132人目の素数さん2014/11/11(火) 23:42:50.79
>>926
>j0 -> p3, j1 -> -p3*Sqrt[1 - z^2], j2 -> 0, j3 -> -p3*z
この粒子の質量は?
0929132人目の素数さん2014/11/12(水) 00:48:11.77
>>927
お返事有難う御座います。

すいません。基本的なことを間違っていました。
この計算は、電子・陽電子ではなく、電子と電子の散乱でした。

>この粒子の質量はどうなる?
全体的には4元運動量として、保存されます。質量だけに注目すると、ローレンツ変換により、速度に応じて、変化すると思います。
数値では解らないです。

mathematicaの20141112の「電子・電子散乱のマンデルスタム変数の確認 その1」の計算は間違っているでしょうか?いいところまで、満たしております。
1つだけ、“0”になるべきところ、“2m^2”になります。80点です。


「電子・電子散乱のマンデルスタム変数の確認 その2」は、pとk(またqとk)で、質量を分担させましたが、結果は、全く、マンデルスタム変数の条件を満たさないです。
0点です。

どこから、考えれば良いでしょうか?
0930132人目の素数さん2014/11/12(水) 00:52:39.68
>>929
>どこから、考えれば良いでしょうか?
特殊相対論を勉強するところから。
0931132人目の素数さん2014/11/12(水) 19:42:48.56
mandelstam variables と mathematicaでググれば?
自力も大切ですが、すでに聞きまくりですから(^^;)
0932132人目の素数さん2014/11/12(水) 22:10:32.91
>>930
お返事有難う御座います。
P0^2-p1^2-p2^2-p^2=m^2
になるということですか。

>p0→(s+m^2+M^2)/(2Sqrt[s]),
>p3→(s-m^2-M^2)/(2Sqrt[s]),
この場合、質量がm^2+M^2になって、間違い。
すると
m→m+M
に変更すればよろしいでしょうか?
0933132人目の素数さん2014/11/12(水) 22:49:48.89
>>932
>>857
0934132人目の素数さん2014/11/13(木) 23:11:44.57
お返事有難う御座います。
>>931
日本語文献は、ほぼ完璧に探しましたが、英文は探しませんでした。
英文の検索しました、まだ完全に探しておりませんが、ほしい式は見つからないです。


>>933
そうですか。
下記HPの本の式(82.2)は正しいでしょうか?
特に2番目の式が、怪しいのでは?と思っています。

http://www.geocities.jp/dirac_equation/index1.html
0935132人目の素数さん2014/11/13(木) 23:44:41.29
>>934
間違ってるとしたら、どこがどう間違っていて、正しくはどうだと思うのか書いてみ
0936132人目の素数さん2014/11/15(土) 14:00:23.02
こんにちは、
>>931
探しましたが、ないです。
下記の最後のプログラムが近いですが、今の計算とは少し違うので、使えないです。

http://www.phy.pmf.unizg.hr/~kkumer/articles/feynman_for_beginners.pdf#search='mandelstam+variables+++mathematica'

もし、参考になるような式があれば、教えて下さい。

>>935

http://en.wikipedia.org/wiki/Mandelstam_variables

を見ると、間違っていないことがわかりました。

pの電子とkの電子が衝突して、qとjの状態になって、飛び去る。
pのp0^2-p1^2-p2^2-p3^3を計算すると“m^2”になり
kのそれは、”0”
qのそれは、”m^2”
jのそれは、“0”
になります。
kが0になるのは、光子質量が0であるからであり、kが“m^2”になるように計算すれば
良いのでしょうか?

いろいろと試しましたが、わからないです。かなり、コンプトン散乱の場合と、変更があるのではないでしょうか?

http://www.geocities.jp/dirac_equation/index1.html
0937132人目の素数さん2014/11/15(土) 20:04:20.80
こんにちは、
http://www.geocities.jp/dirac_equation/index1.html
の
20141115の計算 その1
で正しい否かを教えて下さい。
0938132人目の素数さん2014/11/15(土) 22:34:19.17
毎度のことながら、正しい計算結果が出ません。
http://www.geocities.jp/dirac_equation/index1.html

20041115 電子・電子散乱
どこに、問題があるでしょうか?
0939132人目の素数さん2014/11/16(日) 08:29:42.99
重心系と実験室系を考えていませんでした。
答えが合わないはずです。
0940132人目の素数さん2014/11/16(日) 10:57:58.70
計算が合わない要因
1、電子・電子散乱のマンデルスタム変数を使った変換式が間違っている
  (形からして、重心系の変換式のはず。82.8を代入したら一致するはず)
2、計算結果は正しいが、s,t,uの3種類の変数が混在しているため、見かけ上
異なるように見える
3、その他の箇所で、計算間違いをしている
等々、どこが悪いのか?その原因が解らないので、対策が立てられない状況です。
0941132人目の素数さん2014/11/16(日) 23:27:19.42
>>938
>どこに、問題があるでしょうか?
sl[j]の定義式より後は全部問題あり。「何一つ正しい式を書いてない」レベル。
0942132人目の素数さん2014/11/17(月) 21:00:48.13
ご指摘有難う御座います。
承知しました。計算をやり直してみます。
p1,p2,p3,p4とp、q、k、jが、対応してないかもしれません。
0943132人目の素数さん2014/11/24(月) 10:03:39.52
こんにちは、
Compton散乱を計算し直しております。
下記HPのCompton散乱は、HPのHeitlerの本を元に計算してます。
プログラムComptonは、式(39)に式(4)を入れて、式(40)を導いてます。
プログラムCompton R2は、行列を一部変更したのですが、式(40)に該当する式に、mが残ってしまい、グラフ化しません。グラフ化することは可能でしょうか?
変数、k0,k,u,γに対して、式(4)とγ=k0/uの関係式しかないので、計算は無理でしょうか?

http://www.geocities.jp/dirac_equation/index1.html
0944132人目の素数さん2014/11/24(月) 19:05:30.29
>>943
ガンマ行列の性質も知らん人にはQEDの計算は無理
0945132人目の素数さん2014/11/25(火) 20:30:33.71
>944
すいません。説明不足です。
プログラムCompton R2のガンマ行列もどきは、ガンマ行列になっていません。
そもそも、プログラムCompton R2は、間違っていますが、このような場合、最後に“m”が残ると、変数γだけの式にはならないでしょうか?
変数、k0,k,u,γに対して、式(4)とγ=k0/u(γ=k0/m)の関係式しかないので、計算は無理でしょうか?
0946132人目の素数さん2014/11/26(水) 16:53:01.39
>>945
最後の式をよく読めばどうしてmが残ってるか分かる
0947132人目の素数さん2014/11/26(水) 22:28:18.93
お返事有難う御座います。」
>最後の式をよく読めばどうしてmが残ってるか分かる
ご指摘有難う御座います。確認します。(現状、よくわからないです)
>特殊相対論を勉強するところから。
今、酔っています。現状で、仲間(賢い人一杯いると思います)に「特殊相対論」って一言、言ったら、「病院で見てもらえ!」って(目で)言われます(ました)。
でも、ワイスコップの人の心を埋めるのは、「科学」「宗教」「芸術」であるいう言葉を信じます。(確信しています。)実は、数歩、進んでいる。
あくまでも、物理「科学」大好き、(あほですが)よろしくお願いいたします。
0948132人目の素数さん2014/11/27(木) 12:22:31.02
>最後の式をよく読めばどうしてmが残ってるか分かる
すいません。最後の式とは、ハイトラーの本の式(40)のことでしょうか?
それとも(43)でしょうか?
0949132人目の素数さん2014/11/27(木) 16:37:23.94
>>948
貴方が自分で出力して
>最後に“m”が残る
と言ってる式
0950132人目の素数さん2014/11/27(木) 22:21:11.18
>>949
見て考えたのですが、わかりません。
mを消すことは可能でしょうか?
0951132人目の素数さん2014/11/27(木) 23:07:47.44
>>950
FullSimplify[(m^2)^(3/2)/m^3] はどうなるかをを考えてみ
0952132人目の素数さん2014/11/28(金) 07:17:52.06
>>951
有難う御座います。考えます。
0953132人目の素数さん2014/11/28(金) 21:41:47.33
お返事有難う御座います。
>FullSimplify[(m^2)^(3/2)/m^3] はどうなるかをを考えてみ
ボキャブラリーというか、ExpnadAllで展開させることしか、思い浮かばないです。
まず、このFullSimplify[(m^2)^(3/2)/m^3]を、どうしたら、“1”になるのか?わからないです。
±があるので、正確には、これ以上どうしょうも、ないのでしょうか?
(ルートm^2の解は、+mと-mの2つが考えられる。)
このコンプトン散乱の場合、±の-は、一応、無視したいです。
その場合でも、どうしたら、良いのか?わからないです。
0954132人目の素数さん2014/11/28(金) 21:44:09.26
不細工ですが
√m^2→m に、力ずくで、置き換えれば良いかもしれませんね。
レス数が950を超えています。1000を超えると書き込みができなくなります。