5ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

mathematicaによるシミュレーション教えてください

1 :名無しさん@1周年 :2000/09/26(火) 22:20
mathematicaを使って時間を変数としてもつ関数を
求めたのですが,この関数の例えば0.1秒刻みの値を
出力させるにはどうしたらよいのでしょうか?
できれば,Exelに出力させたいのですが。
ご存知の方,教えていただけませんか。

47 :仕事の欲しい奴集まれ!:02/07/13 00:27
センチュリーホームのドン大橋としきに感謝!
 私は一軒5万円払うだけで仕事をたくさんもらっています!!
こんなに儲かっていいのでしょうか?困っている人はぜひ大橋まで!
                    03−3548−0061

48 :Mathematica愛好家:02/07/18 22:24
>>46
Interpolatingした関数でも
Table[{t,f[t]},{t,1,10,1}]
f[t]:Interpolateした関数
{t,1,10,1}:1から10まで1きざみでTable作る。
とし、ListPlotすればいいです。

49 :名無しさん@1周年:02/07/23 14:10
f={{1},{1,2},{1,2,3},{1,2}}
のようなリストからf[[1]]から一つを取り出し、f[[2]]から一つを取り出し、
f[[3]]から一つを取り出し、f[[4]]から一つを取り出すことを考えるとき
のすべての組み合わせを出すにはどうすればよいですか?
教えてください!!

50 :あぼーん:あぼーん
あぼーん

51 :Mathematica愛好家:02/07/23 22:36
>>49
Product[Length[f[[i]]],{i,1,Length[f]}]
とすればいいのでは?
だめ?意味が違う?
質問の答えが12でよいのなら、僕のやりかたででます。

52 :49:02/07/23 22:53
>>51
ありがとうございます。
すべての組み合わせの個数を出すのではなく、すべての組み合わせを表示させたいのです。
どうすればよいですか?
{{1,1,1,1},{1,1,1,2},{1,1,2,1},{1,1,2,2},{1,2,1,1},{1,2,1,2},
{1,2,2,1},{1,2,2,2},{1,3,1,1},{1,3,1,2},{1,3,2,1},{1,3,2,2}]
のような解がほしいのです。
よろしくおねがいします

53 :名無しさん@1周年:02/07/24 00:52
Outer[List, {1}, {1, 2}, {1, 2, 3}, {1, 2}]

54 :49:02/07/24 07:33
>>53
ありがとうございます
それだと、n番目の要素がi個の場合だとできませんよね
{{1}, {1, 2}, {1, 2, 3}, {1, 2}}
の最初と最後の{をとるひつようがありますよね
わからないんですよ。そこが。
教えていただけませんでしょうか。
よろしくおねがいします

55 :あぼーん:あぼーん
あぼーん

56 :Mathematica愛好家:02/07/24 21:06
>>49
In:=
f = {{1}, {1, 2}, {1, 2, 3}, {1, 2}};
myOuter[l_, {s__}] := Outer[l, s];
myOuter[List, f]

Out:=
{{{{{1, 1, 1, 1}, {1, 1, 1, 2}}, {{1, 1, 2, 1}, {1, 1, 2, 2}}, {{1, 1, 3,
1}, {1, 1, 3, 2}}}, {{{1, 2, 1, 1}, {1, 2, 1, 2}}, {{1, 2, 2,
1}, {1, 2, 2, 2}}, {{1, 2, 3, 1}, {1, 2, 3, 2}}}}}
これででます。Mathematicaのユーザー会のメーリングリスト参照

57 :49:02/07/25 02:12
>>56
ありがとうございます。
さんこうになりました。
mathematicaユーザーの会のメーリングリストは調べてみたんですけど、
有料なんですよね?
たまにしか使わないので・・・。

f={{{a, b}}, {{a, b}, {a, c}}, {{a, d}, {a, e}}, {{e, f}}};
のとき、
out:={{{a,b},{a,b},{a,d},{e,f}},{{a,b},{a,b},{a,e},{e,f}},
{{a,b},{a,c},{a,d},{e,f}},{{a,b},{a,c},{a,e},{e,f}}}
のような結果を得るのはどのようにすればいいのでしょうか?
>>56さんの示していただいた例でやってみましたがすべての深さまでの外積
をとってしまいますよね。むずかしいです・・・。
どうすればいいでしょうか?


58 :49:02/07/25 02:25
49です
よくメーリングリストの入会案内を見たら無料でした。
すいません。
で、早速登録しました。
過去のメールは参照できるのでしょうか?



59 :名無しさん@1周年:02/07/25 09:07
質問なんですけど、
siki=i〜nまでの四則演算
で式からi〜nの文字を読み出して、下の式に代入して
それぞれの文字についてテーブルを作るとかできませんか?
Table[siki,{i,10},{j,100},,,{n,5}]
よろしくお願いします。どなたか教えてください


60 :Mathematica愛好家:02/07/25 14:25
>>49
mug-ctl@jp-mathusers.org
にタイトルなしで、本文に
get (番号)
をいれると過去の記事がみれます。
本文には英語と数字しか入れてはいけません。
本文に
summary
といれて送ると過去の記事の番号の表が送られてきます。
記事の内容と番号を照らし併せてget文でメールすれば過去の記事が手に入ります。
ちなみに
get 1082-1088
を本文に入れてメールを送れば49さんの質問の内容がのっています。

61 :Mathematica愛好家:02/07/25 20:23
49さんへ。

In:=
g = {{{a, b}}, {{a, b}, {a, c}}, {{a, d}, {a, e}}, {{e, f}}};
Outer[List, Apply[Sequence, g], 1]

Out:=
{{{{{{a, b}, {a, b}, {a, d}, {e, f}}}, {{{a, b}, {a, b}, {a, e}, {e, f}}}},
{{{{a, b}, {a, c}, {a, d}, {e, f}}}, {{{a, b}, {a, c}, {a, e}, {e, f}}}}}}
になります。Outerの深さを引数として指定すればよいのです。

62 :Mathematica愛好家:02/07/25 20:33
>>59
siki=i~nまでの四則計算ってのは具体的にどういった計算ですか?
よくわからなくて.......
+,-,*,/がランダムなのですか?

63 :名無しさん@1周年:02/07/26 00:24
Apply[List, Unevaluated[{1 + 3 + 4, 2 + 2}], 1]
とすると

{{1, 3, 4}, {2, 2}}と出るので、あとはOuterでリストは
作れるでしょう

64 :名無しさん@1周年:02/07/26 01:08
mathematicaにはexcelのテキストボックスのようなものは
ついていないのでしょうか?

65 :49:02/07/26 02:39
>>Mathematica愛好家さん
ありがとうございます。こうすればよいんですね。
今月このプログラムに苦しんでいたんですよ。


66 :59:02/07/26 09:43
siki={a*b*c,d/e+f-g,s*t/u}
でsiki[[1]]からsikiの長さまで
それぞれの変数(siki[[1]]ならa,b,c)についてその変数をさがして
a,b,cそれぞれについて1からnまで代入したすべての組み合わせを出したいのです。
すなわちn=3としてsiki[[1]]は
{1*1*1,1*1*2,1*1*3,1,2*1,1*2*2,1*2*3,1*3*1,,,3*3*2,3*3*3}={1,2,3,2,,18,27}
のような結果を得たいのです
よろしくお願いします

67 :mathematica愛好家:02/07/26 16:02
>>49
よかったです。

68 :mathematica愛好家:02/07/26 21:51
>>59さん
仕事の合間に少しずつ考えてるんですけど、スマートな方法が思いつきません。
もうちょっと、考えてみます。

69 :mathematica愛好家:02/07/26 21:58
>>64さん
Mathematicaで関数すくって、Exelで図にしたいのですか?
それだったら、たとえば任意の関数f[x]に対して、
xが0から10まで0.1きざみで図を書きたい場合、

list=Table[{x,f[x]},{x,0,10,0.1}];
Export["/(好きなDirectory)/aaa.txt", list, "Table"];

でasciiテキストにしてExelで読み込めばいいです。
Directoryの階層についてはsystemによって違うのでhelpでみてください。


70 :名無しさん@1周年:02/07/29 00:38
違います。
エクセルでテキストボックスを作ると自由にレイアウトができます
同じようにマセマティカで文章を書いてレイアウトをうまくやるには
どうすればいいかという質問です。

71 :mathematica愛好家:02/07/29 10:23
>>70
テキストボックスはMathematicaにはありません。
ただ、Mathematicaでは座標の位置やフォント情報を指定すれば、graph上
で軸に名前を付けて表示したりできますが難しくて結構、ストレスがたまります。
私は、Mathematicaで関数など処理したデータをきれいに印刷したりレイアウトを行う際は、
テキストとして出力してExcel,kaleida graph等で改めてプロットし直しています。
テキストでx,yカラムで出力する方法は69でかきましたが、この方法が一番きれいにプロット
できるとおもいます。
お役に立てずにすみません。

72 :mathematica愛好家:02/07/29 13:28
>>70
あっ、図のレイアウトじゃなくて文章のレイアウトですか?
ワープロソフトではないのでテキストボックスのようにレイアウトするのは
かなり困難でしょう。
様々な人が.nbのNote Bookを公開してますがレイアウトのきれいさはあれくらい
が限界でしょう。
Mathematicaにはいろいろテンプレートとしてスタイルシートがあります。
フォントも変えたりしてレイアウトできますがテキストボックスのような
便利なものはありません。多分。

73 :あぼーん:あぼーん
あぼーん

74 :名無しさん@1周年:02/07/31 23:38
>>72さん。おひさしぶり。
ウルフラムサイトでarXivの形式で文章を作るスタイルシートや
サンプルがダウンロードできます。サンプルをみると数式が
traditionalよりも数式らしく書かれています。4.1じゃないと
完全対応じゃないみたいですが。

4.1になって、4.0とレイアウトがより高度になったのですか?



75 :mathematica愛好家:02/08/01 12:24
>>74さん。こちらこそ、お久しぶりです。
先ほどwolframのホームページをチェックしてみました。
arXivは論文投稿用のstyle sheetなのかな?
Publiconも投稿用のものですが使ったことがありません。
私はMacOSXを使用してますがOS9でしかうごかないのでまだ試してませんが、デモをみると確かにふつうのスタイルシートより”論文らしさ”がましているような気がします。
ただ、数式のパレットとスタイルシートを組み合わせれば同程度のものはできるとおもいます。
この数式パレットは4.0でも4.1でもあるのでかなりふつうの数式として出力できるので試してみてください。
確かに4.0より4.1のほうがレイアウトがきれいになり、より見やすくなりました。
74さんはMathematicaのノートブックそのままで論文投稿するような仕事をしている人ですか?
私は、学会発表などでもPowerPointに出力(グラフなど)を貼り付けてやっているのであまりスタイルシートも活用していません。
参考にならなくてごめんなさい。

76 :59:02/08/07 01:21
やっぱり、上記の問題が解けません。
引数として[siki,n]としたいのです。
教えていただけないでしょうか?
どんな方法を使ってもかまいません。
よろしくお願いいたします

77 :名無しさん@1周年:02/08/08 23:52
もとの問題と、教えて貰ったものをまとめて書いて教えを請わないと
わからないよ。>>76

78 :あぼーん:あぼーん
あぼーん

79 :名無しさん@1周年:02/08/09 14:14
スレ違いかもしれませんが、
VC++でMathematicaを使うことはできますか?
できればプロットした絵なんかを表示したいんですが。

80 :あぼーん:あぼーん
あぼーん

81 :名無しさん@1周年:02/08/09 17:37
だれかMathematicaを一から勉強するのに最適な本教えて。

82 :mathematica愛好家:02/08/09 19:33
>>59さんへ
あんまり期待した答えかもしれないけどかいときます。
In[ ]:=
n = 3;
data = Table[i, {i, 1, n}];
list1 = Partition[Flatten[Outer[List, data, data, data]], 3];
list2 = Partition[Flatten[Outer[List, data, data, data, data]], 4];
list3 = Partition[Flatten[Outer[List, data, data, data]], 3];

Clear[a, b, c, d, e, f, g, s, t, u];
Flatten[Table[{siki[[1]] //. {a -> list1[[i, 1]], b -> list1[[i, 2]],
c -> list1[[i, 3]]}}, {i, 1, Length[list]}]]
Flatten[Table[{siki[[2]] //. {d -> list2[[i, 1]], e -> list2[[i, 2]],
f -> list2[[i, 3]], g -> list2[[i, 4]]}}, {i, 1, Length[list]}]]
Flatten[Table[{siki[[3]] //. {s -> list3[[i, 1]], t -> list3[[i, 2]],
u -> list3[[i, 3]]}}, {i, 1, Length[list]}]]

Out[ ]:=
{1., 2., 3., 2., 4., 6., 3., 6., 9., 2., 4., 6., 4., 8., 12., 6., 12., 18., \
3., 6., 9., 6., 12., 18., 9., 18., 27.}

{1., 0., -1., 2., 1., 0., 3., 2., 1., 0.5, -0.5, -1.5, 1.5, 0.5, -0.5, 2.5, \
1.5, 0.5, 0.333333, -0.666667, -1.66667, 1.33333, 0.333333, -0.666667, \
2.33333, 1.33333, 0.333333}

{1., 0.5, 0.333333, 2., 1., 0.666667, 3., 1.5, 1., 2., 1., 0.666667, 4., 2., \
1.33333, 6., 3., 2., 3., 1.5, 1., 6., 3., 2., 9., 4.5, 3.}

です。nを変えれば、3だけではなく4でも5でもいいです。
でも、list1,2,3は変数の数によるので注意が必要です。
ちなみに、//Nはレスを書き込む際にコピーペーストがうまくいかないので
小数ででるようにするために入れたものです。実際に計算するときははずすと分数表示になってみやすいです。
時間がだいぶかかってごめんなさいね。

83 :mathematica愛好家:02/08/09 20:12
>>79さん
Mathematicaの上でC++を使いたいのですか?
それとも、C++の上でMathematicaを使いたいのですか?
MatheLinkとかlibraryをつかえばC++の上でlibararyとしてMathematicaの組み込み関数などをつかえますよ。

84 :mathematica愛好家:02/08/09 20:31
>>81さん
Mathematicaを学ぶ方法としてもっとも適していると思うことは、
自分がしたい計算(たとえば微分積分など)についてMathematica Book
(アプリケーションの中にもあるし、製本したものもある、高いけど)
を丁寧によんでいろいろ試してみることだと思います。
いろいろな人がMathematicaの本を書いてるけど、基礎ができてからでないと挫折してしまうおそれがあります。
Mathematica Bookが一番のテキストだと思います。目次をみておもしろそうなのを自分で実行してみて勉強してみましょう!


85 :59:02/08/09 22:36
>>mathematica愛好家さん
ありがとうございます
いまから、試してみます
この計算結果がどうしても学会に使いたいのです

86 :81:02/08/09 23:08
>>mathematica愛好家さん
親切にありがとうございます。
自分が使っているのはstudent版だからMathematica Bookの本は持ってないので
アプリケーションの中にあるのでコツコツやっていこうと思います。

87 :あぼーん:あぼーん
あぼーん

88 :mathematica愛好家:02/08/10 11:40
>>59さん
よかったです。お役にたてて。
学会頑張ってください!

89 :mathematica愛好家:02/08/10 11:48
>>81さん
Mathematicaいいやつなんで、頑張ってみてください。
ある程度わかってきたら各分野でMathematicaの本が出版されているので
専門書でさらに磨きをかけたり、Mailing Listに登録して(無料)
みんなにいろいろ質問してみてください。
もちろんこのスレでみんなに質問することもいいことだと思いますよ。

90 :59:02/08/11 05:17
>>mathematica愛好家さん
やっと、さきほど自分の研究用のものに教えていただいたプログラムを
改良することができました。
結果は学会の要旨に載せられそうです。

Flatten[Table[{siki[[1]] //. {a -> list1[[i, 1]], b -> list1[[i, 2]],
c -> list1[[i, 3]]}}, {i, 1, Length[list1]}]]

こうすれば、よかったのですね
siki[[i]]の変数がn個の時にも使用できるようにがんばって改良してみます。

91 :Mathematica愛好家:02/08/14 20:53
>>59さん
Length[list]って以前は書いてしまったけどどこにもlistは作ってませんでしたね。
うっかりレスを書いているときにまちがえてしまいました。
Length[list1]等にしないといけませんね。間違いに気付いてくれて良かったです。
要素がn個の時はなんだかややこしそうですね。
要旨がんばってください!
ちなみに、
In[]:=
Clear[list1, list2, list3, siki];
siki = {e1[[1]]*e1[[2]]*e1[[3]], e2[[1]]/e2[[2]] + e2[[3]] - e2[[4]], e3[[1]]*e3[[2]]/e3[[3]]};
siki[[1]]
siki[[2]]
siki[[3]]
sub1 = Table[e1[[j]] -> list1[[i, j]], {j, 1, 3}];
sub2 = Table[e2[[j]] -> list2[[i, j]], {j, 1, 4}];
sub3 = Table[e3[[j]] -> list3[[i, j]], {j, 1, 3}];
n = 3;
data = Table[i, {i, 1, n}];
list1 = Partition[Flatten[Outer[List, data, data, data]], 3];
list2 = Partition[Flatten[Outer[List, data, data, data, data]], 4];
list3 = Partition[Flatten[Outer[List, data, data, data]], 3];
Flatten[Table[{siki[[1]] //. sub1}, {i, 1, Length[list1]}]]
Flatten[Table[{siki[[2]] //. sub2}, {i, 1, Length[list2]}]]
Flatten[Table[{siki[[3]] //. sub3}, {i, 1, Length[list3]}]]
として置換リストsub1-3までつくり、要素をe1[[j]]などで一般型でかくといいかもしれません。
結果はsikiが前と同じ定義なので同じ結果が出力されるはずです。

92 :あぼーん:あぼーん
あぼーん

93 :あぼーん:あぼーん
あぼーん

94 :Mathematica愛好家:02/08/14 23:22
>>59さん
追加です。
e[[j]]として要素を定義しますが、演算子は
siki={Sum[e[[j]],{j,1,n}],Product[e[[j]],{j,1,n}],...}
等にすればいいのでしょうか?
またうまくいけば教えてください。

95 :59:02/08/18 15:56
>>Mathematica愛好家さん
ご教授ありがとうございます

式はほかのソフトウエアから取り込みます。
式の要素はn個で、式の数もi個です。
それを区別するには区切り子として*,/,+,-などをとらえる必要があると思っています
もう少し考えて見ます。

96 :あぼーん:あぼーん
あぼーん

97 :名無しさん@1周年:02/09/06 23:20
MAXIMAやMATHLABは比較的盛況なのに、
Mathematicaはなぜこんなに閑古鳥が泣いているのだろうか?

98 :名無しさん@1周年:02/09/09 01:35
JLink使ってる人はいませんか?

99 :名無しさん@1周年:02/09/19 16:59
スレの趣旨とは全然関係ないですが、スチューデント版って注文から納品まで
どのくらいかかるものなんでしょう?

最初、注文したときは「一週間くらい」といわれ、2週間たったのに連絡して
こないから聞きにいったら「二、三週間くらい」といわれたのですが、たかが
ソフトの注文にそんなにかかるもんなんでしょうか?
単に生協のおばちゃんが忘れてただけじゃないかと・・・

100 :名無しさん@1周年:02/09/19 18:51
>>99
多分、生協のおばちゃんがすぐに卸業者に電話しなかったためでしょう。
ふつう、注文したら一週間ちょっとで、きます。
Mathematica 4.1を注文したときはそれくらいでした。
卸業者の在庫がなくて、という話なら別ですが…

101 :名無しさん@1周年:02/09/19 19:14
堺屋太一が恐ろしいシミュレーションをしています。
http://www.geocities.co.jp/WallStreet-Stock/7553/

中国の需要拡大に伴い、世界的な資源危機が発生、
エネルギー資源、希少金属、食糧の国際価格が跳ね上がる。

また、日本は少子高齢化によって若年労働力が激減するため輸出競争力が低下し、
中国の輸出に押される。貿易赤字が急拡大し、2018年には1ドル300円にまで円安が進む。

国内の平均物価は現在の3倍に急騰、消費税は20%に近づく。その上、燃料税も増税されるため
ガソリン市販価格はリッター千円になる。・・・ということらしいのですが。


102 :λφ³:02/09/20 01:34
>>99
わたしもバージョンアップを頼んでますが、Mathematica4.2日本語版は
WolframResearchの出荷の遅れがあって出荷は10月になるって言って
ました。


103 :名無しさん@1周年:02/09/20 13:03
となると、私の注文も10月まで待たされることになる可能性が高いって
ことでしょうか。それならそうと生協のおばちゃんもちゃんと報告して欲
しい、、、つーかそもそも約束の期日を越えても連絡してこないってのも
普通の社会なら許されないことでしょうけど。

104 :λφ³:02/09/21 02:55
>>103
生協の人も怒ってました。WolframResearchに抗議するとか言ってたけど
音沙汰ないなぁ。どうなってんだか。


105 :あぼーん:あぼーん
あぼーん

106 :名無しさん@1周年:02/09/21 16:01
>MAXIMAやMATHLABは比較的盛況なのに、
MAXIMAって別スレッドにありますけどね。
やっぱり世界的に見て人気ある数式処理はMathematica/Maple/Mathcad
数値演算はMatlab
MATHLABって何?

107 :97:02/09/21 21:07
>>106
Matlabの間違いです。すみません。。。。。。


108 :あぼーん:あぼーん
あぼーん

109 :あぼーん:あぼーん
あぼーん

110 :あぼーん:あぼーん
あぼーん

111 :あぼーん:あぼーん
あぼーん

112 :あぼーん:あぼーん
あぼーん

113 :名無しさん@1周年:02/10/18 22:38
mgのメーリングリスト(英語版マセマティカメーリングリスト)

でどんなことが話題になっているか、簡単(触りだけ)に紹介しましょう。
登録していない人は
http://smc.vnet.net/mathgroup.html
を開けて、そこのImportant MathGroup Email Addressesの節の中の
Subscribe to MathGroup をクリックすることをお薦めします。

114 :名無しさん@1周年:02/11/01 18:22
教えてください.mathematicaで不等式ってできますか?
どうやればいいのですか?初心者なんでお願いします!

115 :名無しさん@1周年:02/11/02 02:18
<<Algebra`InequalitySolve`
InequalitySolve[x (x^2 - 2) (x^2 - 3) > 0, x]

とすると答えがでます。その他いろんなことは、ヘルプで
Master Index のボタンをおして、inequalityとしてみてはいかが?

116 :114:02/11/03 16:29
115さんありがとうございました.ヘルプ見ましたが,お教えいただいたように入力したのですが,動きません.
パッケージが足りないとかあるんですかね?

117 :あぼーん:あぼーん
あぼーん

118 :あぼーん:あぼーん
あぼーん

119 :名無しさん@1周年:02/11/09 21:04
`InequalitySolve`はごらんのとおり前と後ろにバックスラッシ「`」がついて
います。そのままコピーペーストするとうごきます

120 :あぼーん:あぼーん
あぼーん

121 :114:02/11/09 23:21
119さんありがとうございます.
ところで,ヘルプを参考にしつつ,
実行してみました.
その手順としては,
<<Algebra`InequalitySolve` (enter)
(反応なし)
InequalitySolve[x (x^2 - 2) (x^2 - 3) > 0, x](enter)
ヘルプではこれで解がでるはずなんですが,次のようにアウトプットされます.
InequalitySolve[x (x^2 - 2) (x^2 - 3) > 0, x]
つまり,解が出てきません.何か足りないのでしょうか?
ちなみにmathematica3.0です.



122 :114:02/11/12 10:45
119さん,バージョン4.0だったら,不等式解けました.
ありがとうございました.


123 :名無しさん@1周年:02/11/13 18:49
age

124 :名無しさん@1周年:02/11/13 19:28
mathematica日本語キットをインストールしても日本語になりません。
なんで?

125 :名無しさん@1周年:02/11/13 20:18
>>124
いや、日本語キットをいれて立ち上げるとすぐに日本語になりますよ。
ちなみにわたしはMac使ってますけど、OS9では問題なく日本語キット
が動きますよ。OSXでは、OSの環境を日本語にしていれば、
本体をインストールするだけで日本語が表示されます。
ただ、工場から出荷する際、間違えて英語版を日本語版のパッケージに
いれたというミスを聞いたことがありますが、
インストールした際に日本語が表示されないときは英語版なので
交換してくれるそうです。(当たり前ですが)
Windowsにインストールしたのであれば全て再インストールしたほうがいいかも知れませんね。
ただ、再インストールすると、Math IDが変ったりしてPasswordの再発行が必要になるかも知れませんが…


126 :名無しさん@1周年:02/11/13 21:25
Windowsで再インストールしても日本語化できない。

127 :名無しさん@1周年:02/11/14 17:02
>>126
Mathematicaで使用する言語をJapaneseにしてる?

128 :名無しさん@1周年:02/11/15 20:29
オプションインスペクターで日本語にしましょう

129 :名無しさん@1周年:02/11/15 23:42
>>128 それってどこの機能?

130 :名無しさん@1周年:02/11/16 22:22
age

131 :名無しさん@1周年:02/11/17 19:28
ファイル->パレット->言語設定
でも駄目か?

132 :名無しさん@1周年:02/11/17 22:57
ファイル->パレット->
に言語設定っていうのがない!
パレットには7つ選択肢があって、
言語設定って英語でなんていいます?
Language Preference とかじゃないですか?
そういうのはないですが。


133 :名無しさん@1周年:02/11/20 05:07
age

134 :名無しさん@1周年:02/11/20 06:08
>>132
ver4.1 では、GengoSettei になってる。

135 :名無しさん@1周年:02/11/20 14:13
mathmaticaでYの字のように2方向から進行する波が
一つに収束するようなものをアニメーションするにはどうるればいいんでしょうか?

136 :名無しさん@1周年:02/11/22 20:35
>>134 GengoSetteiなんてない

137 :名無しさん@1周年:02/11/22 20:36
>>134 GengoSetteiなんてない。ver4.0です。

138 :名無しさん@1周年:02/12/01 10:42
あげ

139 :名無しさん@1周年:02/12/01 21:14
mathematicaで有限要素法電磁界解析って無謀ですか?
Cでやるよりかなり時間かかりそうなんですが。

140 :名無しさん@1周年:02/12/01 22:04
>139
なんの目的でそういう事をするのか?

1)結果だけ欲しく、物設計用
仮に Mathematica を持っている、としても
無謀です。実行スピード、メモリサイズで
割に合いません。 Mathematica が動くスパコンを
持っているとしても、構築の手間が膨大です。
教科書コードの丸移植でもコンパイラでしょう。

2)離散化手法自体をあれこれ試す
数学が得意ならば Mathematica でもよいかも。。。
まあそういう人が作ってくれたら神でしょうがね。

141 :名無しさん@1周年:02/12/02 09:43
x y A
のようなデータの等高線を描かせて、囲まれた面積(たとえばA=20の面)
の面積を計算させることは可能でしょうか?
等高線を描かせたのはいいが、そこで行き詰っています。。。

142 :名無しさん@1周年:02/12/03 04:50
>>141
x,yが均等な間隔なら、A>=20となる点の数を数えれば良いかな。
そうでないなら、ちょっとめんどい。


143 :名無しさん@1周年:02/12/03 16:07
>>141
なんかの三次元関数z[x,y]とz=Aの切片がなす閉曲線の面積?
閉曲面の表面の面積?
何をもとめたいの?

144 :名無しさん@1周年:02/12/10 23:15
4.2やっと購入しました。OSXの上で動かしています。
何となく全ての動作がはやくなりました。すごいです。
4.0->4.1より4.1->4.2のほうがパワフルです。

145 :名無しさん@1周年:02/12/10 23:16
でももう二年たつんですね。このスレ…


146 :名無しさん@1周年:02/12/11 00:03
前までmathematicaつかっていたけど、やっぱcやフォートランのほうが
なにぶんやりやすいぞ。

53 KB
■ このスレッドは過去ログ倉庫に格納されています

★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.04.00 2017/10/04 Walang Kapalit ★
FOX ★ DSO(Dynamic Shared Object)