〓 Mathematica 2 〓

1 名前：１３２人目の素数さん mailto:sage [04/03/06 09:51] 　　　　　　　　_....._{{ 〃 　　　　 　, - ' ,..､､.ヾ{{フ'⌒`ヽ､ 　　　　／　 ,:', -‐‐` ´ '´⌒ヽ　ヾ:､ .　　　,'　　 ,'´　,ィ ,ｨ ,' , 　 ｀ヽ',　 ',-< 　 　 ,' 　　.i　 /|. /.| { i,　 i,　　}.　 }_,,）) 　　　!　|　 ! .,'-.{ !　!|; |`､.}ﾞ!.!　|.　 !　ヽ. 　　　',　',　|Vｧ=､ﾞ､ ｀ﾞ､!-_:ﾄ,ﾘ', l !　| 　 ﾞ', 　　　 ヽ､', l:!Kノ}. 　 　 f:_.)iﾞi: ﾘ !　l　ル　 　　　　 | l!iヽﾞ- '　, 　　.!__:ﾉ ﾞ ,ﾘ l ﾘ'´ 　 　　 .　　　　 ',|!!､ 　 　r‐┐ 　 ｀ ノ'. /,ｲ　　　　／￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣ 　 　　　　　 'i!ﾞ､ヽ､　ﾞｰ'　　_, ィ,:',:''´　　　 ＜　 Mathematica に関する話題はここに書いてね！ 　　　　　　ﾞ:､ｨ､jヾｰ::: 'iﾍ　.ノ',ﾘ. 　 　 　　 ＼＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿ 　　　,､- '´　ヽ､ﾞ､　　 {　｀＞"､ 　 　　/＼＼　　　　',　　 }　　 //｀ヽ 　★前スレ 〓Mathematica〓 science2.2ch.net/test/read.cgi/math/985023298/ 830 名前：１３２人目の素数さん mailto:sage [05/02/22 16:25:36 ] >>829 バックダッシュは間違えやすいよね 831 名前：１３２人目の素数さん mailto:sage [05/02/22 19:15:36 ] >>830 バッククウォートと言います。 ダッシュってのは横線。'をダッシュというのは日本の中高校数学だけ。 832 名前：１３２人目の素数さん mailto:sage [05/02/23 02:32:07 ] ちなみに'の正式名称は"prime"ね。 833 名前：１３２人目の素数さん [05/02/27 19:33:25 ] 上の方と同じような質問なのですが << Graphics`ImplicitPlot` ImplicitPlot[x y - y^2 == 3, {x, -2, 2}] と打つと Set::"write": \ "\!\(Options[ImplicitPlot]\)のタグ\!\(ImplicitPlot\)\ はプロテクトされています．" とでるのですが何がいけなかったでしょうか･･ 834 名前：１３２人目の素数さん mailto:sage [05/02/27 22:21:26 ] >>833 俺んとこではでないぞ@Mathematica5 835 名前：１３２人目の素数さん mailto:sage [05/02/28 22:28:13 ] Mathematica link for Excel使っている人いる？ 836 名前：１３２人目の素数さん mailto:sage [05/03/02 21:39:17 ] すまへん。LOG[1+a x]にフェルミ分布関数の微分をかけたような 被積分関数を０から無限大まで数値積分したい。 そのとき、Methodはどれを選ぶと早いのでしょうか？実際は もっと複雑な被積分関数なので、まあまあのせいどで 現実的な時間に終わってほしい。台形？やっぱり？ リカーションとか分割とかナイスな設定あったら教えて。 837 名前：１３２人目の素数さん mailto:sage [05/03/03 05:56:09 ] >>835 持ってるけど使ってないぞ。 838 名前：１３２人目の素数さん [05/03/03 11:00:48 ] age 839 名前：１３２人目の素数さん [05/03/03 15:32:07 ] やっぱり計算が遅い。対数関数と指数関数の積をインテグランドに したものはやっぱり計算が遅い。前者の対数関数を ｘの多項式で近似し、後者をガウス関数で近似すればええのんかな？ 今のところ、積分区間をゼロから無限大まで引っ張っているけど どうせ重要な積分区間は限られているし、その狭い区間だけ 計算させるようにすれば格段に短縮されるのかな？もう本当 つらい。 840 名前：１３２人目の素数さん [05/03/03 16:59:32 ] Do[式, {i, min_i, max_i, step_i}] → step_i おきに i を min_i から max_i まで変えながら式を繰り返す． てなこっちゃけど、結果を対数表示させたいので、min_i*step_i^n ってループさせる方法は？ 841 名前：１３２人目の素数さん mailto:sage [05/03/03 19:46:19 ] >>840 式をそう書いたら言いやん。 842 名前：１３２人目の素数さん [05/03/11 15:57:38 ] ＞＞376 全く下らん問題やな。数値積分にして、メソッドのところを モンテカルロにしたら？次にインテグレートで出力結果をえる。 そして二つを比較。 843 名前：１３２人目の素数さん mailto:sage [05/03/12 01:59:26 ] >>842 230日前のレスにレスする君に脱帽。 844 名前：１３２人目の素数さん mailto:sage [05/03/12 15:33:27 ] 5.1.1のうpでーたが来たよう 845 名前：１３２人目の素数さん [05/03/13 07:05:41 ] Mathematicaってどこの数学科でも授業で使い方教えてくれるんですか？ 846 名前：１３２人目の素数さん [05/03/18 22:57:03 ] 円周率の平方根は有理数だそうです。 In[1] := Limit[x - Sqrt[Pi], x -> 19151686109235253480650512155425821931577/ 10805181810206786582137323831443648757793] Out[1] = 0 847 名前：１３２人目の素数さん mailto:sage [05/03/18 23:26:28 ] >>846 Block[ {$MaxExtraPrecision=100}, Limit[x-Sqrt[Pi], x-> 19151686109235253480650512155425821931577/ 10805181810206786582137323831443648757793] ] 848 名前：１３２人目の素数さん mailto:sage [05/03/19 03:48:57 ] >>846 4.2だとそうはならんな。 849 名前：１３２人目の素数さん mailto:sage [05/03/19 17:04:04 ] 昨年卒業したので、Ｓｔｕｄｅｎｔ版からＰｒｏ版へのアップグレード 期限がもうすぐなんだけど、卒業証明書って必須なの？実家に置いてきちゃったよ・・・。 850 名前：１３２人目の素数さん mailto:sage [05/03/19 23:37:44 ] >>849 バーシティーウェーブに問い合わせしたら？ 851 名前：１３２人目の素数さん [2005/03/24(木) 17:06:51 ] 保守上げ 852 名前：１３２人目の素数さん mailto:sage [2005/03/24(木) 22:16:56 ] >>849 後輩か教授に金渡して買ってもらえ。 853 名前：１３２人目の素数さん [2005/03/28(月) 07:56:51 ] interpolation function 良い感じ。 しかし NIntegrateInterpolatingFunction　意味不明 どうやったら積分収束がはやくなるの 854 名前：１３２人目の素数さん [2005/03/29(火) 03:50:46 ] MATLAB とかMAPLEをサイトライセンスで入れていると、 MATHEMATICAのサイトライセンスの料金を高くするというような 公正な競争を阻害するライセンスの販売システムになっている。 大学ではみんなボイコットして、MAPLEに乗り換えよう。 855 名前：１３２人目の素数さん mailto:sage [2005/03/30(水) 22:12:03 ] Mathematicaが直感的に操作できて（ﾟдﾟ）ｳﾏｰ　 856 名前：１３２人目の素数さん mailto:sage [2005/03/31(木) 01:37:06 ] Mathematica 高すぎ 857 名前：１３２人目の素数さん mailto:sage [2005/03/31(木) 14:09:32 ] Export[ , ,"GIF"] が動きません。 こんなエラーが出ます。 Export::fmterr: 無効なPNM形式です "GIF" 以外はJPEGでもBMPでも動くようです。 documents.wolfram.com/v4-ja/RefGuide/Export.html 一体なにが問題なのか分るかたお教えください。 858 名前：つづき mailto:sage [2005/03/31(木) 14:14:15 ] documents.wolfram.com/mathematica/functions/Export ここを見ても、正しいことをしているようです。 バージョン5.1です 859 名前：１３２人目の素数さん [皇紀2665/04/01(金) 14:51:23 ] >>818 昔作った関数でこういうのがあった。 TF = TableForm[PaddedForm[#, {6, 5}] & /@ # & /@ #, Alignments -> Right, TableSpacing -> {0, 0}] &; Table[…]//TF みたいな使い方をしてる。 もう忘れたから、 Mathematicaに貼り付けて 「選択項目のヘルプ」でしらべてちょ。 860 名前：１３２人目の素数さん [2005/04/02(土) 21:13:23 ] 二分木なデータ構造をMathematicaでやろうとしたらどう実装すればいいですか？ Lisp風なリスト？ 861 名前：１３２人目の素数さん mailto:sage [2005/04/02(土) 23:30:44 ] Mathematica自体がLisp風な訳だが。 862 名前：１３２人目の素数さん [2005/04/03(日) 11:01:02 ] >>861 でも、リストの深いところを破壊しようとすると全部書き換える事になって遅くなりませんか？ 863 名前：862 mailto:sage [2005/04/03(日) 11:24:11 ] つうかリストの破壊が基本的にできない気がしてきました。書き換えしかない。 864 名前：１３２人目の素数さん mailto:sage [2005/04/03(日) 12:19:28 ] >>862 二分木のデータを変更すると、そこに至るための上の部分の木も再生成されるが、log(n)だ。 だから、普通Schemeで二分木使う時はset!でデータ書き換えたりしないと思うのだが。 Mathematicaでは「書き換え」はシンボルに対してしかできないだろう。 一部を書き換えると全部が「コピー」または「再生成」される。 どうしても書き換えたいなら、シンボルによる二分木を作っておいて、あとでシンボルに値を アサインするようにすればいいんじゃないか。 865 名前：862 mailto:sage [2005/04/03(日) 22:19:37 ] >>864 そうですよね、「コピー」または「再生成」しかできない。 （ちょっとこっちな言語の用語に詳しくないもんで、すいません。） Unique[]ってのがあるみたいなんで、それでノードを乱打して繋げてみます。 ありがとうございます。 #今日リストの大コピー合戦で実装してみたら、 #Length[Flatten[リスト]] = 10000あたりでもう超ウルトラ遅い。 #ノード数は200ぐらいなのにorz 866 名前：１３２人目の素数さん mailto:sage [2005/04/06(水) 23:34:24 ] 教えてください Simplify[Abs[a + b*I], {a ∈ Reals, b ∈ Reals}] とすると， Abs[a + I b] という答えが返ってきて困っています．aもbも実数と言ってるんだから，もっと簡単になるだろ！ Sqrt[a^2 + b^2] という解を得るには，どうしたらよいのでしょうか？ 867 名前：１３２人目の素数さん mailto:sage [2005/04/07(木) 00:35:10 ] >>866 機械にとっては、次のどちらが簡単だと考える方が自然かね？ Abs[Plus[a, Times[Complex[0, 1], b]]] Power[Plus[Power[a, 2], Power[b, 2]], Rational[1, 2]] 868 名前：866 mailto:sage [2005/04/07(木) 01:36:28 ] 自己解決しました．867さん，ご意見ありがとう ComplexExpand[Abs[a + b*I]] でやってくれました 869 名前：１３２人目の素数さん [2005/04/08(金) 13:02:41 ] >>868 > 自己解決 自己解凍みたいw 870 名前：博士 ◆OBpuRHyGa. mailto:もっちーＡＧＥ [2005/04/08(金) 14:58:47 ] lim f(x)=sin∫f(x)となるようなf(x)をヒルベルト空間を用いて x→∞ 求めよ。バナハ空間でもよい。 871 名前：１３２人目の素数さん [2005/04/08(金) 15:17:58 ] >>870 積分の範囲は？ 872 名前：博士 ◆OBpuRHyGa. mailto:もっちーＡＧＥ [2005/04/08(金) 16:12:06 ] 0→∞ 873 名前：１３２人目の素数さん mailto:sage [2005/04/08(金) 20:41:10 ] >>870 なんでヒルベルト空間なんているんだよ。 lim[n→∞]f(x)=0 ∫[0,∞]f(x)dx=0 にすればいいだけじゃん。 たとえば f[x]=(-1)^[x]/[1+x/2] 874 名前：873 mailto:sage [2005/04/08(金) 20:45:48 ] >>873 lim[n→∞]f(x)=0 ↓ lim[x→∞]f(x)=0 875 名前：１３２人目の素数さん [2005/04/14(木) 15:41:02 ] >>868 MyRe[H_] := 1/2*(ComplexExpand[H, TargetFunctions -> {Re, Im}] + ComplexExpand[Conjugate[H], TargetFunctions -> {Re, Im}]) 876 名前：１３２人目の素数さん [2005/04/24(日) 10:50:44 ] 保守のため、上昇 877 名前：１３２人目の素数さん [2005/04/28(木) 00:33:04 ] Simplify[Conjugate[a + I b], a ∈ Reals && b ∈ Reals]で Conjugate[a + I b]となり, a-I bにならないのですがどうしてでしょう？ ちなみに、 Simplify[Conjugate[I b], a ∈ Reals && b ∈ Reals]は -i b　になるし、 Simplify[Conjugate[a+I ], a ∈ Reals && b ∈ Reals]は -i+a　になります。 878 名前：１３２人目の素数さん mailto:sage [2005/04/28(木) 19:14:20 ] >>877 Simplify[Conjugate[a + I b], a ∈ Reals && b ∈ Reals]でa - I bになるが。 @Mathematica 5.0 879 名前：１３２人目の素数さん [2005/04/28(木) 19:55:03 ] >>878 Mathematica4.0.1 mac版 では Simplify[Conjugate[a + I b], a ∈ Reals && b ∈ Reals]は Conjugate[a + I b] です。878さんのはwindows版ですか？ 880 名前：878 mailto:sage [2005/04/29(金) 19:29:24 ] >>879 Win版だけど、バージョンの違いだと思われ。OS変えるだけで わざわざカーネルのソース書き換えないだろう。 881 名前：１３２人目の素数さん mailto:sage [2005/05/01(日) 10:16:29 ] Simplify[Conjugate[a + I b], a ∈ Reals && b ∈ Reals, ComplexityFunction -> LeafCount] V4系にはConjugate[..]のほうが単純に見えるんだろう。 882 名前：１３２人目の素数さん [2005/05/03(火) 10:00:50 ] age 883 名前：１３２人目の素数さん [2005/05/10(火) 20:25:40 ] hos 884 名前：１３２人目の素数さん [2005/05/11(水) 19:13:01 ] ちょっと質問なのでが Mathematicaを使ってアイパターンを描画させたいのですがMathematicaでできるでしょうか？ gnuplot使っていたのですがアイパターンを描けずMathematicaに移行したいと思っています 885 名前：１３２人目の素数さん mailto:sage [2005/05/11(水) 21:38:09 ] gnuplotでできなかったのは、誰にも聞かなかったからで、 Mathematicaでできたとしたら、それは誰かに教えてもらえたからでしょうね。 886 名前：１３２人目の素数さん [2005/05/12(木) 17:56:57 ] プログラム板でレスなかったのでこちらで質問させてください。 CUIで使ってるときに、1行に表示される文字数を変更する方法はありませんか？ 例えば、 In[1]:= N[Pi,100] Out[1]= 3.1415926535897932384626433832795028841971693993751058209749445923078\ > 16406286208998628034825342117068 としたときに、結果を改行せずに表示してほしいのですが。 887 名前：１３２人目の素数さん mailto:sage [2005/05/12(木) 18:51:26 ] Mathematica 5.01のMac版とSolaris版で試したのですが、 In[22]:= 1. 10^(-309) +0.0 Out[22]= 0. 上のようになるのはバグでなく機械精度の問題ですか？ また、この結果を 1. 10^(-309) となるようにする方法ってありますか？ 888 名前：887 mailto:sage [2005/05/12(木) 19:18:22 ] すいません In[22]:= 1. 10^(-309) +0.0 Out[22]= 0. こうなるのは、有効桁数のこと考えたら当たり前ですね。逝ってきまつ 889 名前：１３２人目の素数さん mailto:sage [2005/05/12(木) 21:03:13 ] >>886 無理 890 名前：１３２人目の素数さん [2005/05/15(日) 10:27:27 ] さっきランダムウォークの コードを書いた。はろうか 891 名前：１３２人目の素数さん [2005/05/15(日) 10:57:05 ] 今起きたばかりで 　コンドームと一瞬読めてしまった俺ｶﾞｲﾙ 892 名前：１３２人目の素数さん mailto:sage [2005/05/15(日) 16:55:26 ] 迷ってるのなら、貼れ 893 名前：１３２人目の素数さん [2005/05/19(木) 22:01:32 ] >>892 今日また、コードを書いた。 894 名前：１３２人目の素数さん [2005/05/20(金) 18:44:08 ] Ver.5.1　９ラック版ある？ 895 名前：１３２人目の素数さん mailto:sage [2005/05/20(金) 20:06:58 ] 　　　　　　〃〃　ｶﾞｯ 　　　 ＿__〃　 ∧＿∧ 　　 　|　　|　　（・∀・ ,,） 　　 .=|　　|==○○=　 ヽ 　　从|＿_|∩　ヽ　　､(⌒)っ 　 （　｀Д´）/　　 ヽ＿） 　　　　　　/ ←>>894 896 名前：１３２人目の素数さん mailto:sage [2005/05/21(土) 21:57:03 ] >>894 刑務所行って探して来い 897 名前：１３２人目の素数さん [2005/05/25(水) 18:10:48 ] おまいらMathematicaMark 2004の結果教えてくり やり方は <<Utilities`Benchmark` BenchmarkReport[] おいらはﾁﾝｺﾊﾟｯﾄﾞ T42 PenM 1.7GHz 512MB Mathematica5.1.1で1.59 898 名前：１３２人目の素数さん mailto:sage [2005/05/31(火) 12:33:44 ] ３点O(0,0,0)、A(1,0,0)、B(0,1,1)を通る平面上に、 Aを中心とする半径１の円をｙ軸の周りに１回転してできる回転体を Mathematicaを使って書きたいんですけど どんなコマンドにしたらいいですか？ 899 名前：ChaosicSoul ◆/yaJbLAHGw [2005/05/31(火) 12:50:54 ] Re:>>898 パラメータ表示で曲面を描くコマンドがあったはずだ。一個のパラメータで円を作って、もう一個のパラメータは回転用に使えばいいだろう。 円のパラメータ表示は、(1+cos(t),√(2)sin(t)/2,√(2)sin(t)/2)でいいだろう。 これに回転用の行列を掛ければ完成だ。パラメータ表示を縦ベクトルにして、 ((cos(s),0,-sin(s)),(0,1,0),(sin(s),0,cos(s)))^T を左から掛ければいいだろう。 900 名前：ChaosicSoul ◆/yaJbLAHGw [2005/05/31(火) 12:51:19 ] ちなみに正しいスペルは chaotic のようで。 901 名前：８９８ mailto:sage [2005/05/31(火) 12:55:36 ] コピペでMathematicaに貼り付けたらできちゃうように コマンドを作ってもらってもいいでしょうか… 902 名前：ChaosicSoul ◆/yaJbLAHGw [2005/05/31(火) 13:02:29 ] Re:>>901 今Mathematicaが手元に無いから何とかして自分で作ってくれ。 903 名前：８９８ mailto:sage [2005/05/31(火) 13:07:28 ] >902 ありがとうございました。 自分はあんまりMathematicaは使いこなせないんで、 ChaosicSoulさんがMathematicaを使えるようになったり、 他の方でも、できるようならコマンドを書いていただけるとうれしいです。 皆さんお願いします。 904 名前：１３２人目の素数さん mailto:sage [2005/05/31(火) 15:26:04 ] そこまで人に頼るのかよ 905 名前：Zeno ◆5nZQbNmQPs [2005/05/31(火) 17:56:11 ] Reply-to:>>903 　　　　　　　　　　　　　 君は将来性がない人間だな。 　　　　　　　　　 そんな簡単なグラフは自分で書くようにしろ。 ________________________________________________________ セオドア・カジンスキー 「産業社会とその未来」 (aka. マニフェスト) の抜粋 www.cnn.com/US/9509/unabomber/09-19/am/excerpt.html 906 名前：１３２人目の素数さん mailto:sage [2005/05/31(火) 18:25:23 ] >>903 何故かこっち(Methematica 5.0)では途中で固まるが、これであってるはず ParametricPlot3D[Transpose[{{Cos[s], 0, -Sin[s]}, {0, 1, 0}, {Sin[s], 0, Cos[s]}}].{1 + Cos[t], Sin[t]/Sqrt[2], Sin[t]/Sqrt[2]}, {t, 0, 2π}, {s, 0, 2π}]; 907 名前：８９８ mailto:sage [2005/05/31(火) 21:37:46 ] >>905 英語ばっかりだ〜 読めん… >>906 ありがとー！ やってみます。 908 名前：１３２人目の素数さん mailto:sage [2005/06/01(水) 00:12:28 ] 学校の宿題を代わりにやってくれるスレはここですか 909 名前：ねえねえ [2005/06/01(水) 09:57:48 ] science3.2ch.net/test/read.cgi/math/1051275230/l50 >>297 誰か私にちからを… 910 名前：ChaosicSoul ◆/yaJbLAHGw [2005/06/01(水) 10:37:09 ] Re:>>909 Cのファイル入出力でバイナリモードを使えばできる。何が改行コードかに注意。 911 名前：ねえねえ [2005/06/01(水) 11:14:48 ] 承知!! 912 名前：ねえねえ [2005/06/01(水) 11:27:30 ] >>910 ありがとー 出来そうです。 913 名前：１３２人目の素数さん [2005/06/02(木) 13:40:42 ] u, v を実数, k を定数としたとき、 -5u^{4}v + 10u^{2}v^{3}-v^{5} = k のグラフをUV平面に書きたいのですが， 方法が分かりません。 とりあえず k=1 の時を書こうとしましたが、 Plot を使うには v について解く必要がありそうですし， Solve とか試してみましたがエラーで全然動きません。 どなたか教えて下さい。 914 名前：913 mailto:sage [2005/06/02(木) 14:31:55 ] Plot[{{Root[1 + 5*u^4*#1 - 10*u^2*#1^3 + #1^5 &, 1]}, {Root[ 1 + 5*u^4*#1 - 10*u^2*#1^3 + #1^5 &, 2]}, {Root[ 1 + 5*u^4*#1 - 10*u^2*#1^3 + #1^5 &, 3]}, {Root[ 1 + 5*u^4*#1 - 10*u^2*#1^3 + #1^5 &, 4]}, {Root[ 1 + 5*u^4*#1 - 10*u^2*#1^3 + #1^5 &, 5]}}, {u, -10, 10}] とかしてみたらそれらしいのが出ました(k=1)。 何か違う気もしますが，もう少しいじってみます。 915 名前：１３２人目の素数さん mailto:sage [2005/06/02(木) 15:06:21 ] >>913 ImplicitPlotで。 UVP[k_] :=    ImplicitPlot[ - 5 u^4 v + 10 u^2 v^3 - v^5 == k, {u, -10, 10}, {v, -10, 10}] UVP[1] 916 名前：915 mailto:sage [2005/06/02(木) 15:07:04 ] <<Graphics`ImplicitPlot` ね。 917 名前：１３２人目の素数さん mailto:sage [2005/06/02(木) 22:11:37 ] >>915 うまいね、UVPという関数を作る感じか。 918 名前：918 [2005/06/02(木) 23:00:40 ] 9=1+8 9-1=8 919 名前：919 mailto:sage [2005/06/02(木) 23:02:02 ] ｸｲｯｸ　ワイパー 920 名前：１３２人目の素数さん [2005/06/07(火) 11:13:05 ] 今日、大学生協行ったら5.2へのフリーアップグレードつきのパッケージが出てた。 俺が2週間前に買ったときは無かったのに 　　　　　　　　　　　　　　　　　┌─┐ 　　　　　　　　　　　　　　　　　｜も.｜ 　　　　　　　　　　　　　　　　　｜う　| 　　　　　　　　　　　　　　　　　│来│ 　　　　　　　　　　　　　　　　　│ね│ 　　　　　　　　　　　　　　　　　│え .| 　　　　　　　　　　　　　　　　　│よ .| 　　　　　　　　　　　　　　　　　│ !!.│ 　　　　　　ｼｮﾎﾞｰﾝ　　　ﾊﾞｶ 　└─┤　　　　ﾌﾟﾝﾌﾟﾝ 　　　　　ヽ(´･ω･`) ﾉヽ(`Д´)ﾉ　　(`Д´)ﾉ　　　 （　`Д） 　　　　　　|￣￣￣|─|￣￣￣|─|￣￣￣|─□（ ヽ┐U 　　〜 〜　￣◎￣　　.￣◎￣　　￣◎￣　　 ◎−>┘◎ 921 名前：１３２人目の素数さん [2005/06/07(火) 16:51:27 ] ここは大学で出た宿題がわかんないんだけど聞いてもいいのかな? 922 名前：１３２人目の素数さん mailto:sage [2005/06/07(火) 17:21:59 ] 5.2ってまだ出てないよね いつ出るんだろ 923 名前：１３２人目の素数さん mailto:sage [2005/06/07(火) 18:05:57 ] >>921 いいんジャマイカ？ 924 名前：９２１ [2005/06/07(火) 23:07:59 ] やったね＾＾ありがと 定点A（a,0）と楕円(x^2/2)+y^2=1上の動点Pとの距離APの最小値ｂを求めよ また、aを横軸、ｂを縦軸にとって、aとｂの関係をグラフに示せ っていう問題なんですが、条件を置いてからのそこから先の展開ができません。 925 名前：１３２人目の素数さん mailto:sage [2005/06/08(水) 02:15:02 ] スレ違いだから簡単に Pを(√2 cosθ,sinθ)と置いて距離APの2乗を導き、微分=0を調べればいいんでは つか高校レベルじゃない？arccosとか出てくるから大学なのか 926 名前：１３２人目の素数さん mailto:sage [2005/06/09(木) 18:57:38 ] 5.1.1がリリースされたみたい。　5.1自体つい半年前に出たばかり。 ただいま、某サイトからダウソ中。 927 名前：１３２人目の素数さん mailto:sage [2005/06/09(木) 20:22:38 ] 5.1.1は前からあるよ。 つかワレ厨は氏ね！ 928 名前：１３２人目の素数さん mailto:sage [2005/06/09(木) 20:47:05 ] ウルフラムのホムペからも金払えばダウソ出来るよ。 929 名前：１３２人目の素数さん mailto:sage [2005/06/10(金) 02:35:20 ] 既知 930 名前：１３２人目の素数さん [2005/06/15(水) 18:34:10 ] m 931 名前：１３２人目の素数さん [2005/06/17(金) 02:36:27 ] LiveGraphics3Dで3Dグラフィクスを作ってるんだが、Mathematicaでちゃんと PlotRange使ってプロット範囲指定してるのにWriteLiveFormで変換してHTMLで見ると PlotRangeで指定したことがまるっきり無視されるんだが、どうすればいいんだ？ 932 名前：１３２人目の素数さん mailto:sage [2005/06/17(金) 08:12:56 ] jisaku.u-satellite.net/uploader/files/869.gif 933 名前：１３２人目の素数さん [2005/06/17(金) 12:26:16 ] ｲﾝﾃﾙｵﾜｯﾄﾙ 934 名前：１３２人目の素数さん mailto:sage [2005/06/17(金) 20:17:49 ] ｿﾝﾅｺﾄﾜｶｯﾄﾙ 935 名前：１３２人目の素数さん [2005/06/18(土) 12:28:34 ] matlabにしてもmathematicaにしても、ここまで差が出るとは。 理系の研究室にopteronが売れまくるのも当然だな 936 名前：１３２人目の素数さん mailto:sage [2005/06/18(土) 16:28:56 ] すいません，質問なんですが， ListPlot[{{x1,y1},{x2,y2},…]のように， 3次元のデータ点{x1,y1,z1},{x2,y2,z2},…を 3Dプロットする方法はないですか？ 937 名前：１３２人目の素数さん mailto:sage [2005/06/18(土) 22:21:02 ] >>936 Graphics`Graphics3D`のScatterPlot3D 938 名前：１３２人目の素数さん [2005/06/21(火) 20:01:05 ] x≧0かつy≧0かつx+y≦3のとき z=x-2-2xy+2y^2-2x-2y+6　のグラフを書きたいんですがどうしたらよいでしょうか もう一つ同じく不等式系とグラフで 2x^2+3xy+2y^2≦7のとき正の定数aを用いて z=(x+a)(y+a) のグラフも教えていただけると幸いです お願いします 939 名前：939 mailto:sage [2005/06/21(火) 20:24:37 ] 939 ｿｹｯﾄ 940 名前：１３２人目の素数さん mailto:sage [2005/06/22(水) 02:31:11 ] >>938 その不等式くらい解け。 Plot3D[x - 2 - 2x y + 2y^2 - 2x - 2y + 6, {x, 0, 3}, {y, 0, 3}]; 941 名前：１３２人目の素数さん [2005/06/22(水) 19:54:15 ] 938 2x^2の不等式の奴はむりだとおもわれ 942 名前：１３２人目の素数さん mailto:sage [2005/06/22(水) 22:02:53 ] >>938 region[x_, y_] /; 2 x^2 + 3 x y + 2 y^2 <= 7  = 1 region[x_, y_] = Infinity Plot3D[region[x, y] (x + a) (y + a) /. a -> 3, {x, -3, 3}, {y, -3 , 3},    PlotPoints -> 80] 手抜きだが、エラーメッセージは無視してくれ。 943 名前：１３２人目の素数さん [2005/06/23(木) 16:04:48 ] mathematicaって途中の式を表示する機能ってありますか？ 944 名前：１３２人目の素数さん mailto:sage [2005/06/23(木) 16:55:07 ] >>943 Traceは？ 945 名前：１３２人目の素数さん mailto:sage [2005/06/23(木) 19:31:21 ] >>944 これなら数学の勉強にも使えそうでつね、ありがとん。 946 名前：１３２人目の素数さん [2005/06/29(水) 21:50:40 ] ３次元のデータ(x,y点での値) を2次元平面状に色であらわしたいのですが、どうすればいいでしょうか？ たとえば、 f(x,y) = 1000 なら赤色 f(x,y) = 100 なら青　 みたいに大きいほど赤　すくないほど　青　みたいに表したいです。 947 名前：１３２人目の素数さん [2005/06/29(水) 22:09:29 ] 安定な特異点と不安定な特異点を各１つ以上もつ非線形なベクトル場を考え、Mathematica でプロットせよ。 ってどうやればいいんですか？ 948 名前：１３２人目の素数さん mailto:sage [2005/06/29(水) 22:31:50 ] >>946 ContourPlot と ColorFunction 949 名前：１３２人目の素数さん [2005/06/29(水) 22:50:05 ] age 950 名前：１３２人目の素数さん mailto:sage [2005/06/29(水) 22:53:15 ] >>947 Graphics`PlotField3D` PlotVectorField3D 951 名前：１３２人目の素数さん [2005/06/29(水) 23:25:32 ] >>950 詳しく教えてもらえたら嬉しいです！ 952 名前：１３２人目の素数さん mailto:sage [2005/06/30(木) 10:04:30 ] >>951 > 安定な特異点と不安定な特異点を各１つ以上もつ非線形なベクトル場 はもう考えてあるの？ 953 名前：１３２人目の素数さん [2005/06/30(木) 11:47:01 ] >>951 それすらわかりません。模範解答みたいなの教えてもらえませんか？ 954 名前：１３２人目の素数さん [2005/06/30(木) 11:52:38 ] ↑>>952でした 955 名前：１３２人目の素数さん [2005/06/30(木) 15:27:59 ] age 956 名前：１３２人目の素数さん mailto:sage [2005/07/01(金) 01:22:30 ] V5の日本語版の尻おしえてくれぇぇ 957 名前：１３２人目の素数さん mailto:sage [2005/07/01(金) 02:21:51 ] 　　　　　　　　　　　 　　 ＿＿＿＿ 　　　　　　　　　　　.／, - ､, - ､　　￣ ヽ 　　　　　　　　　　./-┤　｡|｡　 |――-､　ヽ 　　　　　　 　 　　|　ヽ｀- ○- ´ ／　　ヽ　 | 　　　　　　 　 　　|　-　　 |　 　 　―　　 |　 | 　　　　　　 　 　　|　 ´　　|　 　　｀ヽ　 .　|　 |ヽ 　　∩　　　　　　人｀､ _ 　|　 　　＿.- ´ |　.|　　＼ 　　|　　⌒ヽ　／　 ＼　￣￣￣　 　　 ノノ 　 　 　 ＼ 　　|　 　 　 |´　 　 　　|￣―--―― ´ヽ 　 　 ＿　　／⌒＼ 　　＼_ 　 _/-―――.|　（ Ｔ ）　　　　　　｀l 　 　 Τ（　 　 　 ） 　 　 　 ￣　　　　　　 |　　￣　　　　　　 　}　 　 　 |　＼＿／ 　　　　　　　　　　　　 | ､--―　￣|　 　　/ ＦＵＣＫ　ＹＯＵ ぶち殺すぞ・・のび太・・・・！ お前は、大きく見誤っている。 この世の実態が見えていない。 まるで３歳か４歳の幼児のように､この世を自分中心・・ 求めれば､回りは右往左往して世話を焼いてくれる､そんなふうに、 まだ考えてやがるんだ・・。臆面もなく・・・・！ 甘えを捨てろ。 お前の甘え・・その最もたるは、 毎日のように叫んでいる､その、「ドラえもぉ〜ん！」だ。 泣きつけば道具を出してくれるのが当たり前か・・・・？ なぜそんなふうに考える・・・・？ バカがっ・・・・！ とんでもない誤解だ。世間というものはとどのつまり、 誰も他人の助けになど応えたりはしない。 飢餓で苦しむアフリカの子供たち・・戦争で住む家を失った者たち・・ 食べ物を持て余し､馬鹿げたことに金をつぎこむ日本人は、彼らの求めに応えてやったか？ 応えちゃいないだろうが・・！ これは身近にないからだとか、そういうことじゃあない。目前にあってもそうなのだ。 何か得られるものでもない限り､他人を救ったりしない。それが基本だ。 その基本をはき違えているから、わざわざ２２世紀からオレが来る羽目になったんだ・・・・！！ 無論中には、助けるものもいる。 しかしそれは自分にとって都合がいいからであって・・つまりは・・のせられてるってことだ。 なぜ・・それがわからない・・？ なぜ・・それに気付かない・・・・？ 958 名前：１３２人目の素数さん mailto:sage [2005/07/01(金) 02:31:03 ] >>956 素直に、英語版使いな。。　偉そうな顔をしている自称苦楽屋がいるけど、連中に そんな腕はない。 959 名前：１３２人目の素数さん mailto:sage [2005/07/01(金) 08:56:34 ] 　　　　　　　　_....._{{ 〃 　　　　 　, - ' ,..､､.ヾ{{フ'⌒`ヽ､ 　　　　／　 ,:', -‐‐` ´ '´⌒ヽ　ヾ:､ .　　　,'　　 ,'´　,ィ ,ｨ ,' , 　 ｀ヽ',　 ',-< 　 　 ,' 　　.i　 /|. /.| { i,　 i,　　}.　 }_,,）) 　　　!　|　 ! .,'-.{ !　!|; |`､.}ﾞ!.!　|.　 !　ヽ. 　　　',　',　|Vｧ=､ﾞ､ ｀ﾞ､!-_:ﾄ,ﾘ', l !　| 　 ﾞ', 　　　 ヽ､', l:!Kノ}. 　 　 f:_.)iﾞi: ﾘ !　l　ル　 　　　　 | l!iヽﾞ- '　, 　　.!__:ﾉ ﾞ ,ﾘ l ﾘ'´ 　 　　 .　　　　 ',|!!､ 　 　r‐┐ 　 ｀ ノ'. /,ｲ　　　　／￣￣￣￣￣￣￣￣￣￣　 　　　　　 'i!ﾞ､ヽ､　ﾞｰ'　　_, ィ,:',:''´　　　 ＜　 >>956氏ね、ヴォケ！ 　　　　　　ﾞ:､ｨ､jヾｰ::: 'iﾍ　.ノ',ﾘ. 　 　 　　 ＼＿＿＿＿＿＿＿＿＿＿ 　　　,､- '´　ヽ､ﾞ､　　 {　｀＞"､ 　 　　/＼＼　　　　',　　 }　　 //｀ヽ 960 名前：１３２人目の素数さん mailto:sage [2005/07/01(金) 23:53:14 ] 英語版のシリアルを入力し、英語になってしまったんで、 シリアルを変えたいんですが、どうやったらできるんですか？ 961 名前：１３２人目の素数さん mailto:sage [2005/07/02(土) 00:19:16 ] 5.1の場合、 C:\Documents and Settings\All Users\Application Data\Mathematica\Licensing\mathpass を消す。　それ以前の場合は、 　Wolfram Research\Configuration\Licensing\mathpass を消す。　mathpassってファイルにパスワードが書いてあるから、そのファイルを関係有りそうな フォルダから検索すれば見つかる。 962 名前：１３２人目の素数さん mailto:sage [2005/07/02(土) 01:09:19 ] 1+2 ってかいて、SHIFT+ENTERおしたら、ウィンドウズのエラーが表示されて計算しないんだけど・・・ なんでかわかりませんか？ 963 名前：１３２人目の素数さん mailto:sage [2005/07/02(土) 07:45:47 ] エラーの内容ぐらい書けよ つか、呪われてるんとちゃうｗ 964 名前：１３２人目の素数さん mailto:sage [2005/07/03(日) 00:05:34 ] >>962 kernelから壊れてるんじゃないのか？ 965 名前：１３２人目の素数さん mailto:sage [2005/07/05(火) 10:34:04 ] 5.2ﾏﾀﾞｰ? ﾁﾝﾁﾝAA略 966 名前：１３２人目の素数さん [2005/07/06(水) 19:36:00 ] age 967 名前：１３２人目の素数さん [2005/07/08(金) 21:43:37 ] ある複素関数の実数部を取り出して、それをPlot3Dしたいのですが、 うまくいきません。 例えば(x+yI)^3の実数部の関数をxとy、それぞれ0から5までの範囲で 3次元プロットしたい場合、次のようにやってみたのですがエラーが出て しまいます。 Plot3D[Re[(x+yI)^3],{x,0,5},{y,0,5}] どのようにすればいいでしょうか？ 968 名前：１３２人目の素数さん mailto:sage [2005/07/08(金) 22:06:10 ] yI != y I。下のをコピペしてみよう。 Plot3D[Re[(x + y I)^3], {x,0,5}, {y,0,5}] 969 名前：１３２人目の素数さん [2005/07/08(金) 22:14:16 ] >>968 あー、できました！ありがとうございます！ 初心者で基本も分かっておらず、すいませんでした。 970 名前：犬笠銀次郎 mailto:http://www6.speednet.ne.jp/〜91nj1r0 [2005/07/08(金) 22:16:48 ] Mathematica は高いらむ〜〜〜〜〜。 971 名前：１３２人目の素数さん [2005/07/09(土) 23:01:45 ] 計算して出した関数の逆関数のグラフをプロットさせてみたいとき、 どうすればいいでしょうか？ 例えば Plot[InverseFunction[x^2], {x, 0, 10}] ではダメでした。これは逆関数が一意に決定しないからですか？ しかし、 Plot[InverseFunction[x], {x, 0, 10}] でもダメでした。 どうかアドバイスをお願いします。 972 名前：１３２人目の素数さん mailto:sage [2005/07/10(日) 01:59:06 ] Plot[InverseFunction[# &][x], {x, -3, 3}] 973 名前：１３２人目の素数さん mailto:sage [2005/07/10(日) 03:26:59 ] >>971 ImplicitPlot 974 名前：１３２人目の素数さん mailto:sage [2005/07/14(木) 19:52:09 ] ver5.1が出てからだいぶ経ちましたが、ver5.0以前には無い機能でこれはイイという機能はありますか？ 975 名前：１３２人目の素数さん [2005/07/14(木) 21:36:02 ] Ver5.2 発表　下げ 976 名前：１３２人目の素数さん [2005/07/14(木) 21:44:29 ] A,B,C,D,E,Fの６個の玉に糸を通して首飾り を作るとき何通りの作り方があるか？ （⇒回転以外に裏返して同じになるもの も全部同じ首飾りとして考える。） 円順列ではないようなので、 どうやって解けば良いのかわかりません。 教えてください。 977 名前：１３２人目の素数さん mailto:sage [2005/07/14(木) 21:49:50 ] 高校生に聞け 978 名前：１３２人目の素数さん [2005/07/14(木) 21:50:19 ] コンビ屋の超難問です 979 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 00:40:41 ] www.wolfram.com/products/mathematica/newin52/ Athlon 64 X2が欲しくなってきた 980 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 03:12:13 ] >>976 (6-1)!/2 981 名前：１３２人目の素数さん [2005/07/15(金) 10:39:29 ] (d^2x)/(dt^2)+μ(x^2-1)(dx/dt)+x=a+εcos(bt)の数値計算プログラム作成は どうやればいいのでしょう？ 982 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 15:01:09 ] ﾙﾝｹﾞ･ｸｯﾀ! 983 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 16:38:14 ] 次ｽﾚ science3.2ch.net/test/read.cgi/math/1121413040/ 984 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:17:11 ] 985 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:17:18 ] 986 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:17:39 ] 987 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:17:57 ] 988 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:18:42 ] 989 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:18:45 ] 990 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:19:15 ] 991 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:19:17 ] 992 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:19:37 ] 993 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:19:38 ] 994 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:19:59 ] 995 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:20:00 ] 996 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:20:19 ] 997 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:20:21 ] 998 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:20:39 ] 999 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:20:59 ] 1000 名前：１３２人目の素数さん mailto:sage [2005/07/15(金) 18:21:02 ] 〓 Mathematica 3 〓 science3.2ch.net/test/read.cgi/math/1121413040/ 1001 名前：１００１ [Over 1000 Thread] このスレッドは１０００を超えました。 もう書けないので、新しいスレッドを立ててくださいです。。。

---

---

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef