トップページtech
89コメント22KB

mathematicaってどうなの?

■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさんNGNG
 
0083デフォルトの名無しさんNGNG
sim板スレ http://science2.2ch.net/test/read.cgi/sim/1011102458/315
で訊いてみたけど返事がないから、まだなんでは?
0084GO MAXIMANGNG
>>82
axiom (the Scientific Computation System) by richard D.Jenks ,Robert S.Sutor
ISBN 0387978550
ISBN 3540978550
今ではamazonのアメリカから中古本を購入するしかないかも。P700くらいで
まあまあのできと思うね。大学の図書館にはあるでしょう。
0085デフォルトの名無しさんNGNG
Octaveってどうなのよ。
0086デフォルトの名無しさんNGNG
おお、先生こんなところにまで出張ですか。乙です。
0087デフォルトの名無しさんNGNG
マスマティカで きれいに需要曲線の変化を描きたい
たとえば  ケインジアン交差図と投資関数から導かれるIS曲線
Y=C(Y-T)+I(r)+G = a+b(Y-T) + c-dr + G
⇔Y=(1/1-b){a+c+G-bT-dr}
流動性選好理論から導かれるLM曲線
Ld(r.Y)=eY-fr≡Ld(M/P)
⇔r=(e/f) - (1/f)(M/P)
これらを (r.p.y)空間上で交差させて
この交点から導かれる総需要曲線
Y=(z/1-b)[a+c+G-bT-{d/f-fb)}(M/P)}]
z=f/[f+de/(1-b)] をその接点を切り取る形で表示して
これに 政府がマネーサプライを増加させたときや
租税を増加させたときどのような変化がおこるかわかりやすく図示
またピグー効果が起こった時 C(Y-T,M/P) = a+b(Y-T) +ν(M/P)
と消費関数がなるわけですが
このとき 総需要関数がどのように変化するかもわかりやすく
示したいんです
でもmatematica で 数理的に説明するよりも
自分で勝手に三次元グラフを作ってしまったほうが手っ取り早いんですね
Y=(z/1-b)[a+c+G-bT-{d/f-fb)}(M/P)}] この式から見て Mの増加や
C(Y-{T+kY}) = a+b(Y-{T+kY}) となる累進課税時に 曲線の傾きがどうなるかは簡単にわかりますが
実際にグラフで視覚的に体験して見たいのです
Mの増加は LM曲線を左方にシフトさせますが
それが需要曲線の変動とどうつながるか
三次元グラフを使って立体的に示したいんです
0088デフォルトの名無しさんNGNG
例えば コブダグラス型の生産関数です
z = 60 x^0.6 y^0.4
g = Plot3D[z, {x, 0, 10}, {y, 0, 10}, ViewPoint -> {-1, -3, 0.7}]
ContourPlot[z, {x, 0, 10}, {y, 0, 10}, PlotPoints -> 30]

これを応用して

r = 4 - 0.5y (is曲線)
g = Plot3D[r, {x, 0, 10}, {y, 0, 10}, ViewPoint -> {1.5, 0.5, 0.7}]
ContourPlot[r, {x, 0, 10}, {y, 0, 10}, PlotPoints -> 30]
164 名前: 132人目の素数さん 投稿日: 04/06/25 11:35
s = 10y - p^2 (lm曲線 1/pではエラーなので-p^2にした)
g = Plot3D[r, {p, 0, 10}, {y, 0, 10}, ViewPoint -> {1.5, 1, 0.7}]
ContourPlot[r, {p, 0, 10}, {y, 0, 10}, PlotPoints -> 30]
t = Show[r, s]
とすると
Show::"gcomb": "\!\(Show[\(\(2, \
y\)\)]\)のグラフィックオブジェクトの合成処理においてエラーが発生しました."


なってしまう
0089デフォルトの名無しさんNGNG
解決しました
http://www.geocities.jp/toritsumacro2004/
■ このスレッドは過去ログ倉庫に格納されています