〓 Mathematica 5 〓
■ このスレッドは過去ログ倉庫に格納されています
0001132人目の素数さん
2010/10/01(金) 00:11:44, - ' ,..、、.ヾ{{フ'⌒`ヽ、
/ ,:', -‐‐` ´ '´⌒ヽ ヾ:、
. ,' ,'´ ,ィ ,ィ ,' , `ヽ', ',-<
,' .i /|. /.| { i, i, }. }_,,))
! | ! .,'-.{ ! !|; |`、.}゙!.! |. ! ヽ.
', ', |Vァ=、゙、 `゙、!-_:ト,リ', l ! | ゙',
ヽ、', l:!Kノ}. f:_.)i゙i: リ ! l ル
| l!iヾ- ' , .!__:ノ ゙ ,リ l リ'´
. ',|!!、 r‐┐ ` ノ'. /,イ / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
'i!゙、ヽ、 ゙ー' _, ィ,:',:''´ < Mathematica に関する話題はここに書いてね!
゙:、ィ、jヾー::: 'iヘ .ノ',リ. \___________________
,、- '´ ヽ、゙、 { `>"、
/\\ ', } //`ヽ
Mathematica 8が間もなくリリース
*統計:市場で最も広範囲の統計分布とデータ可視化機能
*ソフトウェア開発:組込みのGPUプログラミングサポート,高性能
Cコード生成,SymbolicCサポートおよび拡張された並列処理
*工学および研究開発:統合された制御系とウェーブレット関数
*金融:組込みのオプション価格付けソルバ,財務指標とグラフ
*画像処理:特徴検出を含む拡張された画像解析機能
0261132人目の素数さん
2010/12/28(火) 14:21:360262132人目の素数さん
2010/12/28(火) 17:39:450263132人目の素数さん
2010/12/28(火) 22:10:46CUDA対応になったので、でGPU命令使ってみた。といっても、やや古めのGeForce8800だが・・・
まず、ドライバーがCUDAに対応していなかったので、Nvidiaから最新のドライバーを入れるところから。
行列計算してみたところ、GPUの方がCPU(Core2Duo E6600)よりも2倍くらい速い。
GPUメモリ内で収まるモードなら10倍くらい速くなる。
0264132人目の素数さん
2010/12/28(火) 22:22:200265255
2010/12/28(火) 22:46:17IPとかの問題なら、いくらでも偽装できるだろぅ。
問題はたぶんそのあとやね...
インスト時にOSで地域を判断され、登録するなら
メアドでバレると思いますよ。
0266132人目の素数さん
2010/12/28(火) 22:48:11とかなら大丈夫では?
0267132人目の素数さん
2010/12/28(火) 22:49:190268132人目の素数さん
2010/12/29(水) 06:12:05動くの?
mathIDはパソコンから生成されるからハネられるんじゃない?
0269132人目の素数さん
2010/12/29(水) 17:16:51乙!10倍はすごいね。
GPUメモリも最近はギガ単位であるからそれなりに有効性があるかも。
インターフェースとかはあんま変わりない?
あと、自由形式入力(英語で命令するやつ)は使ってみた?どんな感じ?
0270132人目の素数さん
2011/01/04(火) 12:37:01$295で本当に買って動くのか
誰も試した人はいないのか
0271132人目の素数さん
2011/01/09(日) 17:37:59http://kamome.2ch.net/test/read.cgi/math/1294561909/
0272132人目の素数さん
2011/01/09(日) 18:03:09大学のMathematicaの授業で減衰振動の微分方程式を解いて変位の時間変化と相空間をプロットせよという課題が出たのですが、
相空間をParametricPlotで出そうとしても表示されなくて詰まってしまいました
どこが間違っているのか教えてください
書いたノートブックは↓にうpしました
http://www.dotup.org/uploda/www.dotup.org1350506.zip.html
0273132人目の素数さん
2011/01/09(日) 18:45:55自分でやれよ
0274132人目の素数さん
2011/01/09(日) 19:58:41複素表示したのなら、計算誤差で虚数部がでないように
NしてChopせんかぃ!
0275132人目の素数さん
2011/01/09(日) 21:22:08いろいろ調べたりしてるんですが、どうしてもわからなくて・・・
>>274
NもChopもまだ習ってないコマンドですね・・・調べてみましたがどこで使えばいいのか今ひとつわかりません・・・
0276132人目の素数さん
2011/01/09(日) 23:55:40虚数部がないか?
このまま描画させた場合の結果に保証はない。
Nで実数化してChopで機械精度以下は丸める。
普通最初に学ばんかぁ?
どこでって、どこでもええがParametricPlot
なら引数の座標関数にかましとけ...
(Matheの7みたいですが、たぶん大丈夫かな)
0277132人目の素数さん
2011/01/09(日) 23:58:120278132人目の素数さん
2011/01/10(月) 00:47:34てか、この前までは5.2でしたorz。しかし、こりだと、
『ParametricPlot::pptr ***におけるex1の評価結果
が実数対になりません.』
と明示的な警告がでますが、最近のは無表示の応答が
多いので迷いますね。
0279132人目の素数さん
2011/01/11(火) 01:11:400280132人目の素数さん
2011/01/11(火) 15:29:55日本語版ver8の箱付きはまだ売られてないよね?
0281132人目の素数さん
2011/01/11(火) 18:17:45文部省、計三勝あたりが公開プロジェクトでやればいいのに
0282132人目の素数さん
2011/01/11(火) 19:17:210283132人目の素数さん
2011/01/11(火) 22:28:360284132人目の素数さん
2011/01/12(水) 09:23:51そんなのアメリカ人でも買わないだろ!
0285132人目の素数さん
2011/01/12(水) 09:43:51それがなんで日本では4800ドルで買わなきゃならんのだ?
0286132人目の素数さん
2011/01/12(水) 17:04:220287132人目の素数さん
2011/01/12(水) 17:46:25買ってもらえるからだよ
0288132人目の素数さん
2011/01/12(水) 18:53:380289132人目の素数さん
2011/01/12(水) 22:06:24予算を使い切る
とか
某映画でさらっと当然のように
0290132人目の素数さん
2011/01/12(水) 22:47:15アメリカのやつは英語にしか対応していない。
かといってこのレベルで10万オーダーの差をつけるのもどうかと思うが・・・。
まぁ、技術系ソフトではMathematicaは安いほうだよ。
数百万のソフトもざらにあるし、中には一千万級のソフトもある。
0291132人目の素数さん
2011/01/12(水) 22:49:070292132人目の素数さん
2011/01/13(木) 08:06:48日本語なんて要らねえよ!
安い英語版のhome edtionを買えないように邪魔するのいいかげんやめろ!
0293132人目の素数さん
2011/01/13(木) 20:55:450294132人目の素数さん
2011/01/13(木) 21:56:470295132人目の素数さん
2011/01/13(木) 22:31:160296132人目の素数さん
2011/01/13(木) 22:46:070297132人目の素数さん
2011/01/14(金) 16:19:040298132人目の素数さん
2011/01/14(金) 18:28:14へたすると、糞代理店が手を回して、放送大学の学生はstudent版買えないようになってるからな!
0299132人目の素数さん
2011/01/14(金) 23:41:110300132人目の素数さん
2011/01/17(月) 04:45:14Software may not be registered for use outside the country of purchase.
って書いてあるから、日本ではregisterできないのかも。
アメリカ/カナダ旅行の際にクレジットカードで購入して、registerすれば
大丈夫かな?
0301132人目の素数さん
2011/01/17(月) 10:55:18ttp://www.hulinks.co.jp/software/mathematica/
0302132人目の素数さん
2011/01/18(火) 16:12:570303132人目の素数さん
2011/01/21(金) 17:23:41/ ⌒ ヽ / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
| ●_ ● | < (*以外でコメントアウトにする方法ない?C言語みたいに // とか使って.
(〇 〜 〇 | | いちいち*)で閉じるのメンドイ・・ 特に1行だけコメントにするとき.一応バージョンは8使ってます.
/ | \_________
| |_/
0304132人目の素数さん
2011/01/21(金) 18:36:590305132人目の素数さん
2011/01/21(金) 19:26:07http://www.forest.impress.co.jp/docs/news/20110117_420893.html
0306132人目の素数さん
2011/01/21(金) 19:26:13もっと詳しく頼む いやお願いします.
0307132人目の素数さん
2011/01/22(土) 07:42:21セルをテキスト属性にする
0308132人目の素数さん
2011/01/22(土) 12:49:20サンクス!
0309132人目の素数さん
2011/01/23(日) 01:12:580310132人目の素数さん
2011/01/23(日) 16:06:37プログラミング板のほうは過疎すぎて人がいなさそうなのでこっちで聞きたいと思います。
場違いかも知れませんがお願いします。
使用者が任意で決めた3桁までの自然数をカウントダウンさせる機能を作っているのですが、
次のように記述したら、実行がいつまでも完了せず、原因がわかりません。ご指摘よろしくお願いします。
Clear[a, b, c, st, pre, clo, time, timeup, alarm];
{PopupMenu[Dynamic[a], {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}]
PopupMenu[Dynamic[b], {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}]
PopupMenu[Dynamic[c], {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}],
Dynamic[100*a + 10*b + c]}
pre := DateList[];
clo = 0;
timeup = False;
time[x_List, y_List] :=
IntegerPart[Part[x, 6] - Part[y, 6]+
60*(Part[x, 5] - Part[y, 5])+
60*60*(Part[x, 4] - Part[y, 4])+
24*60*60*(Part[x, 3] - Part[y, 3])];
alarm[z_, v_List, w_List] :=
While[timeup == False , If[z - clo > 0, If[time[v, w] != clo, clo = time[v, w]] , timeup = True]];
Button["スタート", st = pre ; alarm[100*a + 10*b + c, pre, st]]
Dynamic[100*a + 10*b + c - clo]
0311132人目の素数さん
2011/01/23(日) 16:07:41各変数、関数について
a,b,c:使用者が決める3桁までの自然数
pre:読み込まれた時点での時刻のリスト
timeup:使用者が決めた時間が経過し切ったかを判定する変数
time関数:第二引数から第一引数までに経過した時間に日付単位まで対応
alarm関数:第一引数とcloの差が0になるまで、1秒ごとにcloを増やし続ける
間違いのご指摘お願いいたしますm(__)m
0312132人目の素数さん
2011/01/23(日) 16:09:18俺が分かればいいんだけど
適当に関数積分してるだけの俺には全然・・・
0313132人目の素数さん
2011/01/23(日) 16:17:53http://hibari.2ch.net/test/read.cgi/tech/1100761346/
こっちはさらに過疎だったので・・・・・
0314132人目の素数さん
2011/01/23(日) 18:48:31そんなことを
なんでマセマティカでやるの?
0315132人目の素数さん
2011/01/23(日) 19:10:19>pre:読み込まれた時点での時刻のリスト
これをちゃんと理解してるか?読み込まれた時点での時刻のリストであって、
現在の時刻が常に更新され続けてpreに入ってるわけじゃないぞ?
だから当然ボタンが押されたときにstとpreは同一になる。
実行はいつまでも終わらないんじゃなくて、一瞬で終わってるんだ。
物事は複雑に考えちゃだめだ。なるべくシンプルに考えないと。
コストやメンテナンスが大変だからな。
おまえの要求を満たすプログラム↓
ctr = 0;
While[100 a + 10 b + c - ctr != 0, Pause[1]; ctr++]
Dynamic[100*a + 10*b + c - ctr]
0316132人目の素数さん
2011/01/23(日) 20:22:37学校での、数学科の課題研究なんです。
「それなら、先生に聞けよゆとり」と思うかもしれませんが、
先生もあまりマセマティカに詳しくないもので・・・・・・
発表が明後日と迫っているので、最終手段と思いここに書き込みました。
すいません。
0317132人目の素数さん
2011/01/23(日) 20:32:38alarm関数の中でtime関数をwhileでループしながら一回一回呼び出して、
なおかつ、time関数、preともに遅延定義なので
現在の経過時間が更新され続けると思うのですが・・・・・違いますか?
あと、st=preの部分ではstをpreで即時定義してボタンを押した時刻を記録しているつもりです。
違うかったらすいません。
0318132人目の素数さん
2011/01/24(月) 02:11:54というかおまえの目的は何?
要求を満たすプログラムを提示してやっただろ
あれをButtonで包んでMethodをいじれば課題研究終了だ。違うか?
どうしてもおまえの醜いプログラムを動かしたいわけ?
難しい問題に簡単な解法を与えることは賞賛されるけど、
簡単な問題に難しい解法を与えてもバカにされるだけだぞ。
ほれ。
alarm[z_, w_List] :=
While[timeup == False,
If[z - clo > 0, clo = time[DateList[], w], timeup = True]];
0319132人目の素数さん
2011/01/24(月) 02:34:010320132人目の素数さん
2011/01/24(月) 02:56:130321132人目の素数さん
2011/01/24(月) 18:46:49>学校での、数学科の課題研究なんです。
>「それなら、先生に聞けよゆとり」と思うかもしれませんが、
>先生もあまりマセマティカに詳しくないもので・・・・・・
その先生に、
「Mathematicaでこんなことやるなんてアホ」
と言ってやれ
0322132人目の素数さん
2011/01/24(月) 18:48:560323132人目の素数さん
2011/01/24(月) 21:07:00研究は無事完成しました。
>>318さん。
ご迷惑おかけしてすいません。
preを関数の引数にしてる時点で固定されてることに気づいてませんでした・・・
ソースコードが長ったらしい件についてですが、簡単にいうと、研究発表の際のネタを増やすためです。
ややこしいことをしてすいません。
>>319>>321さん
ほんとは、情報分野でプログラミングがやりたかったのですが
うちの学校は何故か情報分野はロボットしかやらないのです。(ちなみに高校です。)
ロボットよりソフトウェアのほうに興味があったので、数学科を選んだらMathematicaが使えたので
「せっかく学校側に高いソフトを購入してもらったんだし、使ってみよう」ということです。
ちなみに、プログラムは次のような感じでまとまりました。ご迷惑おかけしました。
limit = Input["自然数で数値を入力してください。"];
st = DateList[];
clo = 0;
Dynamic[limit - clo]
time := IntegerPart[Part[DateList[], 6] - Part[st, 6] + 60*(Part[DateList[], 5] - Part[st, 5]) + 60*60*(Part[DateList[], 4] - Part[st, 4]) + 24*60*60*(Part[DateList[], 3] - Part[st, 3])];
While[limit - clo > 0, If[time != clo, clo = time]];
EmitSound[Sound[{Play[Sin[6000 t], {t, 0, 1}]}]]
0324132人目の素数さん
2011/01/25(火) 11:17:07つまり最初のまっさらに戻りたいのです。
0325132人目の素数さん
2011/01/25(火) 18:50:15そのくらい、しらべろ
あほう
0326132人目の素数さん
2011/01/25(火) 18:52:34一括でクリアする方法は知らん
0327132人目の素数さん
2011/01/25(火) 21:11:530328132人目の素数さん
2011/01/25(火) 21:27:410329132人目の素数さん
2011/01/25(火) 22:49:16そうすれば連続してつかえるよ
0330132人目の素数さん
2011/01/25(火) 22:50:57>>328
ほんとはしらないんだろ
ふるえているぞ
0331132人目の素数さん
2011/01/25(火) 23:00:32おまえが有益な情報を提供すれば話は別だがな
0332132人目の素数さん
2011/01/25(火) 23:24:550333132人目の素数さん
2011/01/26(水) 02:59:240334132人目の素数さん
2011/01/26(水) 05:30:11Clear["Global`*"]
0335132人目の素数さん
2011/01/26(水) 10:45:58取り敢えずヘルプぐらい見ろよと思う.
Clear["Global`*"]も「クリア」で検索すればすぐ出てくるしね.
0336132人目の素数さん
2011/01/27(木) 11:02:010337132人目の素数さん
2011/01/28(金) 23:51:21ありがとうございます。
>>335
ClearAll だと思っていたので。。。
Clear["Global`*"]は、怖くてつかわなかった。
0338132人目の素数さん
2011/01/29(土) 00:11:290339132人目の素数さん
2011/01/29(土) 18:50:12おまえの人生まっくらだ
Remove["Global`*"]
0340132人目の素数さん
2011/01/29(土) 18:59:540341132人目の素数さん
2011/01/29(土) 19:04:140342132人目の素数さん
2011/01/29(土) 19:04:360343132人目の素数さん
2011/01/29(土) 19:09:51俺の方法の方がてっとりばやいんだよ>>339
>>338と>>340=>>342は初心者なんだからもう書き込むんじゃないぞ
0344132人目の素数さん
2011/01/29(土) 19:14:000345132人目の素数さん
2011/01/29(土) 19:20:35疑問がわいたらドキュメントをしっかり調査しろ
この条件をアンドで満たしてから初めてこのスレに書き込め
0346132人目の素数さん
2011/01/29(土) 23:59:500347132人目の素数さん
2011/01/30(日) 01:26:250348132人目の素数さん
2011/02/08(火) 18:16:00ベクトルbを
b={-Sin[t]、Cos[t]、2/9}とします
bのNormをマセマティカで計算したところ、
Norm[b]=√{(4/81)+Abs(Cos[t])^2+Abs(Sin[t])^2}
となって
Abs(Cos[t])^2+Abs(Sin[t])^2=1
と計算してくれないのですが、何故でしょうか
0349132人目の素数さん
2011/02/08(火) 18:22:40Simplify[Norm[b],Assumptions->Im[t]==0]
0350132人目の素数さん
2011/02/08(火) 18:26:44ありがとう
単に
Simplify[Abs(cos[t])^2+Abs(Sin[t])^2]
としても、1にはならないのですが、何故でしょうか
0351132人目の素数さん
2011/02/08(火) 18:30:43t が複素数の可能性を考える
0352132人目の素数さん
2011/02/10(木) 14:16:190353132人目の素数さん
2011/02/10(木) 15:47:020354132人目の素数さん
2011/02/10(木) 18:45:50せっかくの円高なのに10万はきついです。
Home Editionなら5万でもぼったくりと思うが、
それくらいならがまんして騙されてやってもよい。
0355132人目の素数さん
2011/02/12(土) 01:53:380356132人目の素数さん
2011/02/12(土) 12:05:200357132人目の素数さん
2011/02/12(土) 14:35:020358132人目の素数さん
2011/02/12(土) 14:57:210359132人目の素数さん
2011/02/14(月) 20:52:50http://blog.stephenwolfram.com/2011/01/jeopardy-ibm-and-wolframalpha/
0360132人目の素数さん
2011/02/14(月) 21:35:25■ このスレッドは過去ログ倉庫に格納されています