〓 Mathematica 四 〓
■ このスレッドは過去ログ倉庫に格納されています
0001132人目の素数さん
2007/12/10(月) 16:00:01, - ' ,..、、.ヾ{{フ'⌒`ヽ、
/ ,:', -‐‐` ´ '´⌒ヽ ヾ:、
. ,' ,'´ ,ィ ,ィ ,' , `ヽ', ',-<
,' .i /|. /.| { i, i, }. }_,,))
! | ! .,'-.{ ! !|; |`、.}゙!.! |. ! ヽ.
', ', |Vァ=、゙、 `゙、!-_:ト,リ', l ! | ゙',
ヽ、', l:!Kノ}. f:_.)i゙i: リ ! l ル
| l!iヾ- ' , .!__:ノ ゙ ,リ l リ'´
. ',|!!、 r‐┐ ` ノ'. /,イ / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
'i!゙、ヽ、 ゙ー' _, ィ,:',:''´ < Mathematica に関する話題はここに書いてね!
゙:、ィ、jヾー::: 'iヘ .ノ',リ. \___________________
,、- '´ ヽ、゙、 { `>"、
/\\ ', } //`ヽ
過去スレ
>>2
0002132人目の素数さん
2007/12/10(月) 16:03:02http://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/
0003にょにょ ◆yxpks8XH5Y
2007/12/10(月) 16:04:410004さくら姫
2007/12/10(月) 16:18:56,イ /_ -‐――‐‐- _ ヽ ヽ
. / ,イ/ / ` ヘ ヘ
/ ./ / / / / ∧ ∧ ハ
. / ./ / / / / ハ ハ l
i ./ / / / /,' { l ∧ ハ |
|/ / ,'. ! / /. ! ハ. lト、 ,ハ | ハ l |
| i i | /| .ハ | | { | i |l ト、 }l || |
| | | | l {Hl {ナT爪 | V | | 爿 辷} 八 リ l l
| | | ,ハ. ト |ィfテ示kヽ| ヽl }/ 」/rzッ/_|/ ,' l
ヽ ト、ト、 ∧ l! /|l{、__,ハ| ´/{ }心/}. / ,'
. 〉、 ∧l l刈刋リ {州爪リ }/,'/ /
l \ ヽ. ヽ--'' ヽrzン / /
|| 八 { Xxx ! xxX / /
ヽト、 \ ー ‐ /./ /
ヽ\ ヽ、 /,.' イ|
| ヽハ、> 、_ ,. ィ/ //|i!
| `¨ヽk}> 、 __,. r<{r-く- ''" リ >>1 スレ立て乙です
l / ̄\ / ̄ヽ ,'
l / `ー‐''´ ∧ /
ヽ _,r〈 /⌒V ハ-、_/
,.r<\ | / l ̄l V / /\
,. -<. | / ̄. . ̄ト、 / `丶、
/ lト-< └┐ .┌┘ ヽンl 丶、
/{ l |l └‐┘ || l ヽ
. / .| l || || l ト、
0005132人目の素数さん
2007/12/10(月) 16:21:540006132人目の素数さん
2007/12/10(月) 18:54:43y''=3とかの微分方程式って
DSolve[y''[x]==3,y[x],x]
て、入力してもとけないんですけど、どうやったらとけますか?
すいませんが、教えてください。
0007132人目の素数さん
2007/12/10(月) 19:13:53解けるけど、、、。
{{y[x] -> (3 x^2)/2 + C[1] + x C[2]}}
0008132人目の素数さん
2007/12/10(月) 20:17:520009132人目の素数さん
2007/12/10(月) 23:58:14「
:関数取得( := )(Input入力)
:変数取得( = )(Input入力)
:関数定義( := )(Module定義)
:関数定義( := )(Module定義)
:定義関数呼び出してのメイン演算、条件文込み
」
てのが一行ずつのインタプリンタでは上手く実行されてるとして、これを
通常のプログラムみたいに何かしらの一個の読み込みコマンドを入れたら
全部包括的にやってくれるようにまとめ直したいんだけど、
どうすればいいんですか?
あと、MessageDialogue、Input、ChoidceDialogの実行に明確な順列をつけるには
どうすればいいんですか?
抽象的な質問で非常に申し訳ないんだけど、参照するコマンドとかだけでもわかればありがたい。
0010132人目の素数さん
2007/12/13(木) 04:20:0012394, 12367, 12384, 12425, 12394, 12356, 12418, 12398, 23455,
34892, 12375, 12390, 12288, 12393, 12358, 12379, 20170, 24180,
12418, 19968, 20154, 12398, 12463, 12522, 12473, 12510, 12473,
20057, 65367, 65367, 65367};
FromCharacterCode[str]
0011132人目の素数さん
2007/12/13(木) 14:58:00なくだらないもの実
行して どうせ今年
も一人のクリスマス
乙www
0012132人目の素数さん
2007/12/14(金) 03:10:10109, 105, 116, 115, 117, 46, 99, 111, 109, 47, 103, 97, 109, 101,
47, 99, 111, 109, 105, 110, 103, 47, 50, 48, 48, 55, 47, 48, 55,
47, 48, 51, 47, 104, 45, 49, 48, 52, 95, 55, 52, 51, 56, 52, 95,
114, 52, 53, 46, 106, 112, 103, 46, 106, 112, 103};
Import[FromCharacterCode[str4]]
0013132人目の素数さん
2007/12/15(土) 08:55:59{x -> u ,y -> v}
と求めた後、u,vをそれぞれx,yの値とするにはどうしたらいい?
いまはいちいち手入力で
x=u;
y=v;
とか打ってるんだけど、面倒で。
あほーな質問でスマソ。
0014132人目の素数さん
2007/12/15(土) 11:38:22{x0, y0} = {x, y} /. {x -> u, y -> v}
という感じで解をx0,y0に代入してる
x,yに解を代入しないのは、もう一度x,yで方程式記述するとき
すでに値が入っていると思うように動かないので、それを避けるため
0015132人目の素数さん
2007/12/15(土) 16:19:35{x, y} = {x, y} /. %[[1]]
さらに>>14方式なら
{x0, y0} = {x, y} /. %[[1]]
でおk
0017132人目の素数さん
2007/12/16(日) 02:14:45ttp://www.wolfram.com/products/player/download.cgi
ttp://www.wolfram.co.jp/products/player/download.cgi
を開いても真っ白のままで何も起こらないです
Windows XP+IE6とVista+IE7で両方同じ現象。
0018132人目の素数さん
2007/12/16(日) 23:14:12XP+IE7で確認しました。文字コードの影響みたい
右クリック -> エンコード -> その他 -> Unicode(UTF-8)
0019132人目の素数さん
2007/12/17(月) 09:52:38せっかくなので登録画面のご意見欄にこの問題のこと書いておきます
0020132人目の素数さん
2007/12/19(水) 21:31:54業務の関係でmathematicaを購入することになりました
どこでどのようにして購入すればよいのでしょうか?
やはりウルフラムから購入するのでしょうか・・・
0021132人目の素数さん
2007/12/19(水) 21:32:560022132人目の素数さん
2007/12/19(水) 23:05:210023132人目の素数さん
2007/12/20(木) 12:07:24はい。
大きなソフト売り場を持つ店舗なら、店頭でも買えますよ。
0024132人目の素数さん
2007/12/20(木) 23:52:32積分や面倒な計算も結構すぐやってくれる。記号計算が出来る使いやすいソフトは
やはりMathematicaだと思う。昔はMapleの方が性能が良いと言われていたけど今は
どうなのかな?Mapleは使い慣れないせいか、ほとんど使ってない。
0025132人目の素数さん
2007/12/22(土) 01:03:45新スレおめでとうございます
, _ ノ)
γ∞γ~ \
| / 从从) )
ヽ | | l l |〃/VVVVVVVVVVVVVVVVVVVVVVVVN\
`从ハ~ ワノ∩ ハニャウェ━━━━━━━━━━━━ブ >εε=ヽ( `Д´)ノ ウワァァァァン
⊃ .VVVVVVVVVVVVVVVVVVVVVVVVVN/
, _ ノ)
γ∞γ~ \
| / 从从) ) 人人人人人
ヽ | | l l |〃 ニコニコ ≪ヽ( `Д´)ノ ≫ ビリビリ
`从ハ~ ワノ) ^Y^Y^Y^Y^Y
, _ ノ)
γ∞γ~ \
| / 从从) )
ヽ | | l l |〃 ハニャーン! ヽ(・∀・ )ノ ハニャーン!
`从ハ~ ワノ∩
0026132人目の素数さん
2007/12/23(日) 16:22:38わざわざウルフラムから買わなくても
日本に代理店とかあったんじゃなかったっけ?
0027132人目の素数さん
2007/12/25(火) 00:16:520028132人目の素数さん
2008/01/07(月) 12:35:06Mathematicaを再インストールするときは、パスワードを再発行してもらう必要はありますか?
MathIDって変わってしまうんでしょうか?
0029132人目の素数さん
2008/01/08(火) 13:30:26MathIDってことはスチューデント版だと思うんですが、
再インストールすると確かに変わりますので再発行が
必要です。
0030132人目の素数さん
2008/01/09(水) 13:37:35ありがとうございます。
再発行してもらいます。
0031132人目の素数さん
2008/01/11(金) 22:51:24リモートデスクトップからわざわざ立ち上げるという手間がわずらわしい。。。
誰か教えてください。
mathmatica5でコンピュータはXPです。
0032132人目の素数さん
2008/01/31(木) 02:37:090033132人目の素数さん
2008/01/31(木) 02:38:070034132人目の素数さん
2008/01/31(木) 02:47:03カーネルは超能力者です
0035132人目の素数さん
2008/02/01(金) 00:35:17Mathematica6.0Student@Vistaで使ってます。
Export関数でFLV形式がサポートされた、ということで出力しようと思ったのですが、出力されるFLVファイルが再生できません。
だいたいファイルサイズからして7.4KBとビデオの大きさではありません。
入力した式は
Export["MovingPower.flv", Manipulate[Plot[x^a, {x, 0, 5}, PlotRange -> {{-1, 5}, {-1, 5}}], {a, -2, 2}]]
です。
再生環境はffdshow+MediaPlayerClassicです。
別のFLVは再生できるのでコーデックの問題ではないと思います。
「式がちげぇよトンチキ」「私もできない」などありましたら教えてください。よろしくお願いします。
あと何でさくらタンなんですか。CCS板住人としてはここで彼女に会えるとは思っていなかったハァハァ。
0036132人目の素数さん
2008/02/01(金) 05:56:570037132人目の素数さん
2008/02/01(金) 08:52:17できればkwskお願いします。
0038132人目の素数さん
2008/02/09(土) 21:57:400039援護保守
2008/02/10(日) 05:44:27119, 46, 108, 117, 99, 107, 121, 45, 99, 104, 46, 99, 111, 109, 47,
105, 110, 102, 111, 47, 105, 109, 103, 47, 105, 110, 102, 111, 95,
101, 118, 48, 55, 49, 50, 48, 50, 95, 114, 101, 112, 111, 114,
116, 95, 116, 105, 116, 46, 106, 112, 103}]]
0040132人目の素数さん
2008/02/11(月) 20:05:320041132人目の素数さん
2008/02/24(日) 20:34:490042132人目の素数さん
2008/02/24(日) 22:38:580043132人目の素数さん
2008/02/24(日) 22:52:05きみは外資金融にでも内定が決まっているのかい?
0044132人目の素数さん
2008/02/25(月) 00:16:30英語版ならバイナリと鍵genが至る所に出回っているよ。
まぁ、しかし実際便利な道具だと思う。面倒な計算は大抵やってくれるし、いちいち本をひっくり返す必要がない。
0045132人目の素数さん
2008/02/25(月) 21:09:26関数型プログラミングできるし簡易スクリプト言語として便利そう
0046132人目の素数さん
2008/02/25(月) 22:36:060047132人目の素数さん
2008/02/26(火) 00:16:280048132人目の素数さん
2008/02/26(火) 12:42:10つStudent
0049132人目の素数さん
2008/02/26(火) 13:55:370050132人目の素数さん
2008/02/26(火) 23:16:1300511stVirtue ◆.NHnubyYck
2008/02/26(火) 23:20:35ところで、私に通貨をください。
0052132人目の素数さん
2008/02/27(水) 16:30:08マチマチカにもクローンの類はあるの?
0053132人目の素数さん
2008/02/27(水) 16:44:5000541stVirtue ◆.NHnubyYck
2008/02/27(水) 17:33:36しかし、 アメリカ合衆国の公用語に通じていないと厳しいかもしれぬ。
0055132人目の素数さん
2008/02/28(木) 13:35:35マニュアル?
豊富な例を自分の手でいじってると
大抵のことは分かる気もする
0056132人目の素数さん
2008/02/29(金) 10:01:250057132人目の素数さん
2008/03/01(土) 11:35:08こんにちは、
下記の式、y1とy2があります。
y1を評価させて、y2の通り表示させるには、どうしたら良いでしょうか?
y1 = Expand[(a1*p1 + a2*p2 + a3*p3 + b*mc)^2]
y2 = p1^2*a1^2 + p2^2*a2^2 + p3^2*a3^2 + mc^2*b^2 + (a1*a2 + a2*a1)*p1*p2 + (a2*a3 + a3*a2)*p2*p3 + (a3*a1 + a1*a3)*p3*p1 + (a1*b + b*a1)*p1*mc + (a2*b + b*a2)*p2*mc + (a3*b + b*a3)*p3*mc
ちなみに、y1をそのまま評価しますと、下記になり、y2の通り表示しません。
p1^2*a1^2 + 2*p1*p2*a1*a2 + p2^2*a2^2 + 2*p1*p3*a1*a3 + 2*p2*p3*a2*a3 + p3^2*a3^2 + 2*mc*p1*a1*b + 2*mc*p2*a2*b + 2*mc*p3*a3*b + mc^2*b^2
0058132人目の素数さん
2008/03/02(日) 17:47:41これは、はまるべきでないパターン。
単に論文や、教科書が正しいかどうか見たいだけなら
In[18]:= y1=Expand[(a1*p1+a2*p2+a3*p3+b*mc)^2]
Out[18]= b^2 mc^2+2 a1 b mc p1+a1^2 p1^2+2 a2 b mc p2+2 a1 a2 p1 p2+a2^2 p2^2+2 a3 b mc p3+2 a1 a3 p1 p3+2 a2 a3 p2 p3+a3^2 p3^2
In[17]:= y2=p1^2*a1^2+p2^2*a2^2+p3^2*a3^2+mc^2*b^2+(a1*a2+a2*a1)*p1*p2+(a2*a3+a3*a2)*p2*p3+(a3*a1+a1*a3)*p3*p1+(a1*b+b*a1)*p1*mc+(a2*b+b*a2)*p2*mc+(a3*b+b*a3)*p3*mc
Out[17]= b^2 mc^2+2 a1 b mc p1+a1^2 p1^2+2 a2 b mc p2+2 a1 a2 p1 p2+a2^2 p2^2+2 a3 b mc p3+2 a1 a3 p1 p3+2 a2 a3 p2 p3+a3^2 p3^2
In[19]:= y1==y2
Out[19]= True
以上でy1=y2より十分。
どうしてもこの形に意味があるならだけど、このy2の形はあくまで
「筆者の人間側の都合でこうなった」というのを忘れてはいかん。
Collectとかで係数をまとめればそれらしき形にはなってくるが 規則がわからんので
完全な一致をMathematicaの関数のみで達成するのは難しいと思うぞ。
0059132人目の素数さん
2008/03/07(金) 06:04:35またアップデート自体はどのように行いましたか?
0060132人目の素数さん
2008/03/07(金) 17:19:51こんな形してるんだって思った。
でもプレステのガンダムseed destinyのほうがすごくない?
動きは早いしまるで3次元空間にいるかのようだ。
plot3Dのf(x,y)曲面よりガンダムのほうが複雑な形してるじゃん。
ガンダムとマテマテカはどっちのほうがコードの量が多いんでしょうか?
0061132人目の素数さん
2008/03/07(金) 18:46:380062132人目の素数さん
2008/03/07(金) 19:06:17お前がそういうコード書けばいいんじゃ
0063132人目の素数さん
2008/03/09(日) 01:47:43ニューラルネットワークの単純なBPなら10行以内でコーディングできる。
対してガンダムは10進BASICだからかなり長くなる。
0064132人目の素数さん
2008/03/12(水) 12:01:18一つのグラフのyデータは100〜200程度で、もう一つは0.1〜1.5のオーダーですが、
見やすく一枚で表示したいです
0065132人目の素数さん
2008/03/16(日) 09:50:28フリーで良いのが出たら乗り替えたいけど、ここまで整備するのは大変そう。
0066132人目の素数さん
2008/03/16(日) 18:10:010067132人目の素数さん
2008/03/24(月) 20:52:35例えば、
s = Play[Sin[2 \[Pi] 1000 t] Exp[-9 t], {t, 0, 0.5}]
これで音を再生しても歪みは特にないのですが、
これを
Export["aaa.wav", s]
とし、
Import["aaa.wav"]
すると、えらく歪んでいる。どうなってるのでしょう?私だけ?
0068132人目の素数さん
2008/03/28(金) 01:15:22もうExp^(-)じゃない変なピークになってる
0069mahworld13
2008/03/30(日) 11:25:02"Think of Laura" by Christopher Cross
http://www.youtube.com/watch?v=NKuzZ7wIShw 02:42
http://www.youtube.com/watch?v=nYEWeBarLww 03:02 Live 1998
http://www.youtube.com/watch?v=0OTFLgW_9Qg 04:16 Live @Vancouver 2007/08/29
(1983 hit dedicated to the late teenager Laura)
0070132人目の素数さん
2008/04/03(木) 00:10:09もsutudent版だった
正真正銘な がくセイ! sutudent の 雛 だから じゃ 姉ぇーの
(暫く ロハに近いお値段で 酷使 しやがル)
0071132人目の素数さん
2008/04/03(木) 00:23:11との こと。
ったくアメリカ合衆国の公用語に通じていないし
且つ 日本語も覚束ない
の条件達を 完璧に満たす にも 拘らず
Mathematica を 学セイの分際で 酷使する
ヤツ_______,________,________ を 俎上に
0072132人目の素数さん
2008/04/03(木) 10:30:03mathematicaっていつから暗号作成機能ついたの?
00731stVirtue ◆.NHnubyYck
2008/04/03(木) 12:33:450074132人目の素数さん
2008/04/03(木) 12:54:14007572
2008/04/03(木) 20:59:31たうえのたきぶんしきょうがもきぬじばたけぬきしたきてまぬすきたよ
0076132人目の素数さん
2008/04/04(金) 02:16:32In[55]:= key = ToCharacterCode["ルイズかわいいよルイズ"]
Out[55]= {12523, 12452, 12474, 12363, 12431, 12356, 12356, 12424, \
12523, 12452, 12474}
(*一応鍵の長さを確認*)
In[66]:= Length[key]
Out[66]= 11
(*よって2バイト文字11文字までに対して情報量的安全である、続いて平文*)
plain = ToCharacterCode["ルイズの姉も可愛いよぉ"]
Out[58]= {12523, 12452, 12474, 12398, 22985, 12418, 21487, 24859, \
12356, 12424, 12361}
(*一応平文の長さを確認*)
In[64]:= Length[plain]
Out[64]= 11
(*おk*)
0077132人目の素数さん
2008/04/04(金) 02:17:47In[60]:= cipher = BitXor[plain, key ]
Out[60]= {0, 0, 0, 37, 26950, 198, 25515, 20883, 175, 44, 243}
In[61]:= FromCharacterCode[cipher]
Out[61]= "\.00\.00\.00%楆Æ掫冓¯,ó"
(*一応わけのわからない文字列になった*)
(*復号化*)
In[67]:= plain2 = BitXor[cipher, key ]
Out[67]= {12523, 12452, 12474, 12398, 22985, 12418, 21487, 24859, \
12356, 12424, 12361}
In[68]:= FromCharacterCode[plain2]
Out[68]= "ルイズの姉も可愛いよぉ"
(*一応復活しているのがわかる*)
実装から見ればかなりムチャクチャだけど あくまで一例ということで
0078132人目の素数さん
2008/04/05(土) 23:39:39でもwolframのオンラインショップでは2500ドルくらいで買える見たいじゃないですか。
なんだか日本人は日本の代理店経由でないと買えないみたいですが、独占禁止法に違反してませんか?
0079132人目の素数さん
2008/04/06(日) 09:41:13なお、認証その他に不都合が発生したとしても、当社としては責任を負いかねます」
0080132人目の素数さん
2008/04/06(日) 19:43:180081132人目の素数さん
2008/04/07(月) 02:21:37鍵genはver4のがそのまま使えるw
0082132人目の素数さん
2008/04/07(月) 09:05:194000−2500=1500ドルもサポート料と称してとるわけ?
ボッタクリバーみたいだね。
0083132人目の素数さん
2008/04/07(月) 18:41:35btってブータンのことですか?
0084132人目の素数さん
2008/04/09(水) 03:35:09Resolve[ForAll[p, p > 0,
Exists[q, q > 0,
ForAll[x, x >= 0 && 0 < Abs[x - a] < q,
Abs[Sqrt[x] - A] < p]]], {a, A}, Reals]
Resolve[ForAll[p, p > 0,
Exists[q, q > 0,
ForAll[a, a > 0,
ForAll[x, x > 0 && Abs[x - a] < q, Abs[1/x - 1/a] < p]]]]]
0085132人目の素数さん
2008/05/04(日) 03:20:52データをベクトルとして認識させるのも厄介だし。
Newton-Raphson法も簡単にプログラムが書けない。
EM algorithm にいたっては、てんで弱い。
プログラム形式でalgorithmを書くなら、Matlabの方が向いているのか?
0086132人目の素数さん
2008/05/04(日) 23:01:25それはそうと
データーをベクトルとして認識させるのが面倒って?
それにベクトルの記法にしたって{{},・・・・・}たかがこれだけじゃない。 Importは知ってる?
Newton-Raphson法は書かかなくくてもFindRootで実装されている。
単にアルゴリズム書きたいならcかFortranでいいんじゃないすか?
前提がフリー環境だから文献も多そうだし
0087132人目の素数さん
2008/05/05(月) 00:26:54厄介きわまりないってところかな。
テイラー展開と微分とが交互になると、FindRootでは解に行かれないんだわ。
0088132人目の素数さん
2008/05/05(月) 13:46:060089132人目の素数さん
2008/05/11(日) 07:57:49なんで普及しないんや?
値段とアクチが原因か
0090132人目の素数さん
2008/05/11(日) 09:49:260091132人目の素数さん
2008/05/13(火) 22:31:160092132人目の素数さん
2008/05/17(土) 19:29:370093132人目の素数さん
2008/05/26(月) 03:27:14これを表示させないためにはどうすればいいでしょうか?
0094132人目の素数さん
2008/05/27(火) 17:26:20調べても、式を評価しますと書いてあるだけで評価するとは何なのかまったくわかりません
具体的に教えていただければ幸いです
0095132人目の素数さん
2008/05/27(火) 17:56:31Holdを外す
0096132人目の素数さん
2008/05/29(木) 22:31:20初心者です。
i*jの行列リストの各行の任意の成分{i1,i2}をつかって
2次元グラフをプロットをしたいのですが、方法がわかりません。
ListPlotで作図したいですが教えてもらえないでしょうか。
0097132人目の素数さん
2008/05/30(金) 03:22:580098132人目の素数さん
2008/05/30(金) 15:44:53使用環境くらいちゃんと書け
0099132人目の素数さん
2008/05/31(土) 20:06:55行列の任意の要素を抽出
http://reference.wolfram.com/mathematica/ref/Part.html
平面のプロット(ListPlot3D)
http://reference.wolfram.com/mathematica/ref/ListPlot3D.html?q=ListPlot3D
0100132人目の素数さん
2008/06/02(月) 21:00:480101132人目の素数さん
2008/06/03(火) 00:03:31■ このスレッドは過去ログ倉庫に格納されています