トップページ⇒math
1001コメント340KB

〓Mathematica〓

■ このスレッドは過去ログ倉庫に格納されています
0001１３２人目の素数さんNGNG
ないので立てました。
Mathematicaについて語るスレです。

大学で初めて出会った時は感動したなぁ。(NeXT版…)
Plot3Dでよく遊んだものです。
四次方程式の一般解を出力して、壁に貼ったりしてました（ｗ
0159　　　　　　　　　　　　　　　　　　NGNG
WebMathematicaって何がどうなってるの？
0160１３２人目の素数さんNGNG
>>158
買えば良いじゃん。
0161１３２人目の素数さんNGNG
Mathematica for Mac OS Xリリースage
http://www.wri.com/news/mformacosxj.ja.html
「Mac OS X用 Mathematica の動作は実に美しい．効率的で目的のはっきりしたソフトウェア．．．確かに，入手可能な最高のプラットフォームで起動する世界でも最も優れたアプリケーションの1つだ．まるで光沢のあるロシア産のミンクのようだ」
今まで大学のｳｲｿで使ってただけだけど、これは買ってしまいそう。

でもこのスレにはﾏｶｰはあまりいなさそうだ。
0162　　　　　　　　　NGNG
MAXIMAがソース突きでGPLだから、いいぞ。
0163１３２人目の素数さんNGNG
MaTX ってどうなの？

ttp://www.matx.org/
0164１３２人目の素数さんNGNG
Mathematicaのバージョンアップってどうなってるのか良く分からない。
Mac用の3.0日本語版、スチューデントを買ったんだけど、
Mac OS X版にバージョンアップするには、幾らかかかるんだろう？
0165Wi○MXNGNG
○in○XでMa○hemaica4.0と日本語化○ット2を手に入れてインストールは
できたのですが、「現在使用中のMathematica用パスワードでは、英語以外
の言語を使うことができません。・・・」と表示され日本語化できません。
どうか解決方法を教えてください。
0166１３２人目の素数さんNGNG
>>164
http://software.univcoop.or.jp/products/mathematica/math_upgrade.html
盛況のページにかいてあった。
0167１３２人目の素数さんNGNG
積分方程式が解けるソフトない？
0168１３２人目の素数さんNGNG
age
0169１３２人目の素数さんNGNG
>>167
解いてやるから、式書いてAmsLaTeXでいいよ
0170１３２人目の素数さんNGNG
>>167
なんだか、昔「TeXというソフトがあって、聞くところによると
論文を書いてくれるそうだ。それをつかうと誰でも完璧な論文が
自動的にできて、あっというまに印刷されるとか。アメリカの
人工知能はすごいねえ」という笑い話に似ている。
0171ポコチン大王NGNG
Mathematica3.0 は WindowsXPで動くのか？動かないのか？
誰か答えろやｺﾞﾙｧ！
0172１３２人目の素数さんNGNG
>>171
2000なら動いたよ。
0173　NGNG
＞164
バージョンアップするよりヤフオクで最新版買う方が安くつく場合もある。
今試しに検索してみたが、マカー用は3.0しかでてないね。Winなら4.1あったけど。

でも、ヤフオクのアラート機能で"mathematica"に反応するように設定しておくと、出物が出たときにメールで知らせてくれるよ。
0174１３２人目の素数さんNGNG
＞171
2000で動くソフトは大概XPで動くと思われ。
割れじゃないのならサポートに聞いてみれば？
0175１３２人目の素数さんNGNG
ﾏｶｰ用って結局Carbonアプリなんだよね。
Cocoaになったら飼おう。
0176１３２人目の素数さんNGNG
>>173
何たら用って言うのは、マニュアルが違うだけでCD-ROMの内容は同じじゃないかな？
少なくとも3.0 for MacにはWindows用、Linux用etc全種類のMathematicaが入っていた。
0177名無しさん＠ＥｍａｃｓNGNG
>>176
そのとおりなのだが、Licence NumberとMath IDがね。
0178１３２人目の素数さんNGNG
>171

普通に動きます。
0179１３２人目の素数さんNGNG
>165
多分、尻アル生成ソフトで尻を生成したのでしょうが、
その尻アル生成ソフトを作ったのがフランス人（だったと思う）
なので英語版にしか対応していません。
0180１３２人目の素数さんNGNG
プログラムを書けば計算できます。
ただ、ソースを載せたいのですが積分方程式の種類によって
多少処理が違うので・・・。
多分ラプラス変換あたりの計算方法でＯＫと思われますので
計算手順をそのまま書いてください。
0181１３２人目の素数さんNGNG
↑
>>167 さんへ
0182１３２人目の素数さんNGNG
>>169

数値的に解くアルゴリズムが欲しいです。
解析的にはどうも無理そうなので・・・
（核の部分には、数値積分しかできない部分が
山のように入っています）

>>170

なるほど。Mathematicaでも解けないんですね。

>>180

第一種volterra型積分方程式の数値解を求めたいのです。

いまは、微分して、第二種に変形して、積分を
台形公式で近似して微分方程式にしてRungeKutta法で解いています。
概ね答えがでているように見えるのですが最大誤差
の評価がうまくできないので不満が残ります。

他にも第一種のままで、解y(t)を、
y(t0),t(t0+dt),y(t0+2dt)・・・というベクトル
に、積分を行列で近似して解く方法も考えましたが、
うまく解がでませんでした。

他にどんな方法があるのですか？
ラプラス方程式の方法が気になります。
0183kawabata君の友人NGNG
>>164　>>173
Mathematicaフルバージョンには複数の種類のCDがあります
フルセット版，アカデミック版（ここで言うアカデミックとは大学の教職員
向けのものであってMathematica for Studentsではありません）この２つの版
が１種類，もう１種類は見かけは全くそっくりでTeacher'sEditionやClassroom
Packにつかわれるものです。

じゃあ，見かけはそっくりで実際のところナニが違うかというと，パスワード
の発行形態がちがうのです。
前者は１５けた程度からなる 39889-*****-*****-***というパスワードがLicense
Certificateにあらかじめ印刷されており，これを入力すればすぐに使い始めること
ができます。またWindowsからMacといった異人種でないかぎり，お友達の
マシン上でも，お得意先でもどこでもポータブルですから，すぐにMathematica
が起動します

一方Teachersや学生版のＣＤは総背番号制です。
実際に使用するマシン固有の$MachineIDが表示されますから，これをＷＲI
に伝えます，すると「あなたのマシンだけで使用できる10けたのﾊﾟｽﾜｰﾄﾞ」を
教えてくれます。これを打ち込めば「あなたのマシン」でだけ起動します
ﾃﾞフラグをかけたりすると「もういちど」新しいMachineIDが表示され
ﾊﾟｽﾜｰﾄﾞを取り直しとなります

どちらがよいかは，好みが分かれるでしょうね
0184１３２人目の素数さんNGNG
>>182
Numerical Recipes に書いてある方法じゃだめなの？
0185１３２人目の素数さんNGNG
昔、Mathematicaをつかってリーマン予想を解くというような論文があると
聞いたことがあるけど、どうやって攻略できるのかな？
0186１３２人目の素数さんNGNG
mathmediaはいかが？

0187１３２人目の素数さんNGNG
>>162
http://phe.phyas.aichi-edu.ac.jp/~cyamauch/maxima/
を見てMaxima（Windows版）を入れてみたのだが、
すんません、１＋１＝２を計算させるにはどうすればいいんですか？
0188MaximaNGNG
>>187
1+1;

そんなことより、
t:5;
とやってしまったあとに、integrate(t,t);
を求めたくなったときの処理をおしえてたも。
0189１３２人目の素数さんNGNG
Interateの途中式を得ることは出来ますか？

http://www.calc101.com/japanese/では、Mathematicaを使っていて
積分過程の英語による解説がつくんですが。

どなたかご教授願えませんでしょうか。
0190189NGNG
無理っぽいですね。
ありがとうございました。
0191１３２人目の素数さんNGNG
age
0192１３２人目の素数さんNGNG
0193１３２人目の素数さんNGNG
(;´Д`)ﾊｧﾊｧ
0194１３２人目の素数さんNGNG
(;´Д`)ﾊｧﾊｧ
0195１３２人目の素数さんNGNG
Maxima --- GNU Macsyma!!!!!!!!!!!!!!!!!!!
0196１３２人目の素数さんNGNG
保守。

うちの高校には、Mathematicaの使えるパソコンが
何台かあるんだけど、「パソコン室」という迷宮の奥深くに封印され、
その姿を目にした者は数えるほどしかいないという罠。
0197nanashiNGNG
195のやつ、知らなかったんだけどなかなか良さげ。

使ってる人いる？
0198１３２人目の素数さんNGNG
聞かないねぇ
0199１３２人目の素数さんNGNG
0200１３２人目の素数さんNGNG
MAXIMA
http://science.2ch.net/test/read.cgi/sim/1011102458/l50
0201１３２人目の素数さんNGNG
0202１３２人目の素数さんNGNG
Mathematicaを極めたいんだけど
どうしたらいい？
あとどっかお勧めのサイトおしえて？
0203１３２人目の素数さんNGNG
0204１３２人目の素数さんNGNG
0205１３２人目の素数さんNGNG
0206１３２人目の素数さんNGNG
海女損からA NEW KIND OF SCIENCE届きますた
おもい
0207１３２人目の素数さんNGNG
Mathematicaっていくらすんの？
そして，どこでどうやって入手すんの？
0208１３２人目の素数さんNGNG
生協で買え!
0209１３２人目の素数さんNGNG
>>208
売ってねー．(京大）
0210円周率で彼女ができました！【ﾅｼﾞ】NGNG
マジなんですよ～。
円周率を２にするのは問題がある、という教育上の理念が一致して
彼女になったんだ。これがまたSEX能力が高いので毎日が楽しいでやんの！
0211１３２人目の素数さんNGNG
>209
とりよせてもらえるしょ
大学生協事業連合はいってるら
0212１３２人目の素数さんNGNG
mathematica関連のお薦め本

①mathematicaハンドブック　木村
②はやわかりmathematica第２版　榊原
③Mathematica プログラミング技法　メーダー
0213１３２人目の素数さんNGNG
>>212
①mathematicaハンドブック　木村
これさースゲー間違い多いよ
買って損した
0214１３２人目の素数さんNGNG
どこに間違いありました？教えて

英語のメーリングリストに登録すると、たくさんメールがくるよ。
初心者も投稿しているし、親切に答えてくれるし、すごくいいよ
0215１３２人目の素数さんNGNG
>>214
ここにいけばわかる
http://www.melt.kyutech.ac.jp/~hkim/math-book/

0216１３２人目の素数さんNGNG
x<0の時はf(x)=2で、x≧0の時はf(x)=1となる関数を定義したいんですが、
どうやればいいでしょうか？

----------
　　　　　|
　　　　　|
　　　　　|
　　　　 ------------

グラフを書くとこんな感じの関数です。
0217１３２人目の素数さんNGNG
↑
UnitStepって知ってるか?
0218１３２人目の素数さんNGNG
I(x)とW(x)をxの関数とし、
O(x)=I(x)*W(x)　(*はたたみ込み積分)で、-1≦x≦1でO(x)のグラフを
書きたいんですが、次のようなエラーが出ました。

Plot::plnr: O is not a machine-size real number at x = -1..
General::"stop": "Further output of Plot :: plnr will be suppressed during this calculation.

下の様に書いたんですが、どこが間違ってるんでしょうか？

W = 2 * x
I = Exp[x]
O = FourierTransform[I, t, ω, FourierParameters -> {-1, 1}] *
FourierTransform[W, t, ω, FourierParameters -> {-1, 1}]
Plot[O, {x, -1, 1}]
0219nanashiNGNG
>>216

UnitStep 使っても良いし、
f[x_]:=If[x<0,2,1]
とやっても良いと思うのだが。
0220nanashiNGNG
>>218
なんか、突込みどころの多い式だな。

・I は虚数、O はオーダを表す予約語だから、使うな。
・W,I,Oは関数だから、宣言するときはW[x]=.... のように書け。
・というか、：＝で定義しておいた方が良い。
・FourierTransform,Plot の中で関数を呼び出すときも、I[t]、W[t]などの
　ように書く。
・IやOの引数がxだったりtだったりしているが、統一した方が良い。結果には
　影響ないが。
・そもそも、I*Wはグラフに描けるような関数なのだろうか・・・(無限大に発散
　するのでは？)
0221218NGNG
>>220
式をそのように直してやってみたんですが、

Plot::plnr: O is not a machine-size real number at x = -1..
General::"stop": "Further output of Plot :: plnr will be suppressed during this calculation.

このエラーが消えてくれません。フーリエ変換の部分をこのように

Syu[t] := Integrate[w[t - x] * Nyu[x], {x, -∞, ∞}]

-∞から∞(もしくは負の大きい数から正の大きい数)
に直してやってみても同じでした。これは結果が発散しているということ
なんでしょうか？

http://www.elc.nias.ac.jp/~nagasaka/lect/ic/1999/OHP/I05/sld017.htm
こんな感じで、入力I(x)と重み関数W(x)から出力O(x)I(x)*W(x)を
求めたいんですが…。
0222nanashiNGNG
>>221
ちゃんと
Plot[Syu[t]・・・・
になってる？O がどーのこーのっていうエラーが出てるから、
そのまま残っているのではないかと。
0223218NGNG
あ、>>218と同じエラーだったんで上からコピーしてきて
その部分直すの忘れてました。上のエラーでOの部分がSyu[t]となってます。
0224nanashiNGNG
すまん、
定義のときの左辺は_ をつけた方が良いな。ヘルプ参照。
f[x_]:=・・・
みたいに。

あと、畳み込み積分なら、最後に逆フーリエ変換しなきゃだめだよ。
ちょっと作ってみた。

f[t_] := Sin[t]
g[t_] := 1/(1 + t*t)
a[tt_] :=
InverseFourierTransform[
FourierTransform[f[t], t, w]*FourierTransform[g[t], t, w], w, tt]
Plot[a[t], {t, -10, 10}]

統一した方が良いって書いたけど、a の定義では区別しなきゃ
いけないから別の変数を使わなきゃいけなかった。
0225nanashiNGNG
直接たたみこみ積分やるばあいは、

a[t_] = Integrate[f[x]g[t - x], {x, -Infinity, Infinity}]
Plot[a[t], {t, -10, 10}]

こんな感じ。＝と：＝が入り乱れているけど、このあたりは
ヘルプ読んで。
0226１３２人目の素数さんNGNG
各分野毎にお勧めの書籍ってないですか？
上では はやわかりmathematica と Mathematica プログラミング技法があがってましたが
0227218NGNG
フーリエ変換を使う方法でやってみたところ、以下のようなエラーが出ました。
I(x)は短形波、W(x)はx=0から遠ざかるにつれて、x<0なら正の方向から、
x>0なら負の方向から0に限りなく近づく関数で、x=0のときは約2.3となります。
これらをたたみ込み積分して、-5から5の範囲でPlotしたんですが…。

Integrate::optx: Unknown option WorkingPrecision in (Integrate[
<< 1 >>]).

NIntegrate::precw :
The precision of the argument function
(e^(0.x(10^-15)i×(-1.593892×10^-23)[x]) is less than
WorkingPrecision (25).

NIntegrate::inum :
Integrand 4.0000000000000000
(-1.593892×10^-23)[-1.00000000000000000]
is not numerical at {x} = {-1.000000000000000000000}.

NIntegrate::precw :
The precision of the argument function
(2.71828^(0.x(10^-15)i×(-<<24>>)[x]) is
less than WorkingPrecision (25).

General::stop: Further output of NIntegrate :: precw will be
suppressed during this calculation.

General::stop: Further output of NIntegrate :: inum will be
suppressed during this calculation.

Integrate::optx: Unknown option WorkingPrecision in Integrate[
<< 1 >>].

Integrate::optx: Unknown option WorkingPrecision in << 1 >>.

General::stop: Further output of Integrate :: optx will be
suppressed during this calculation.

NIntegrate::slwcon: Numerical integration converging too slowly; suspect
one of the following: singularity, value of the integration being 0,
oscillatory integrand, or insufficient WorkingPrecision. If your integrand is
oscillatory try using the option Method->Oscillatory in NIntegrate.

NIntegrate::ncvb :
NIntegrate failed to converge to prescribed accuracy after 7
recursive bisections in x near x =
-2.28833×10^56).)

General::stop: Further output of NIntegrate :: slwcon will be
suppressed during this calculation.


General::stop: Further output of NIntegrate :: ncvb will be
suppressed during this calculation.

Plot::plnr: Syu[t] is not a machine-size real number at t =
-4.999999.

General::stop: Further output of Plot :: plnr will be suppressed
during this calculation.
0228１３２人目の素数さんNGNG
質問。Mathematica for MacOS Xって
なんかすごいグラフィックができた気がするんだけど、誰か
そのソースきぽんぬ。
0229１３２人目の素数さんNGNG
>>228

>>2より凄いやつ？
0230１３２人目の素数さんNGNG
>229
ゼリービーンズみたいな奴がたくさん
ぐにゅぐにゅするのです。
0231１３２人目の素数さんNGNG
Mathematica 4.1で TeX形式で保存したやつを Windowsで表示したいのですが
フォントの zwcymとか zwcvbとかが表示できません。
これらのファイルはどこで手にはいるんでしょうか。
0232１３２人目の素数さんNGNG
0233１３２人目の素数さんNGNG
Mathematica
0234１３２人目の素数さんNGNG
Mathematica 4.1 for win を一旦立ち上げちゃうと、
IME が激重になるんだけど、
対処の仕方誰か教えてください。
win2000 です。

確定 enter 押してから、ちゃんと入力完了するまで
とても待たされます。

Mathematica 終了させても症状が続く。
enter 押さなきゃいいみたいなんだけど・・・
0235１３２人目の素数さんNGNG
>>234
アンインストールという言葉を知っていますか？
0236１３２人目の素数さんNGNG
アンインストール以外の対処法を (T_T)
0237１３２人目の素数さんNGNG
Mathematicaはトラブル多い印象だね
カーネルがOS引きずってハングするし。
必要だから使ってるけど鎖、なんとかしてほしいぞ
げろげろWolfram
0238235NGNG
>>236
確かMathematicaは、Mathematica Kernel (計算機構) と
フロントエンド (ワープロ風の操作を実現している見かけコントロールソフト)
の2つのソフトの間を、Mathlinkとかいう技術で通信しながら
働いていたはず。
そのKernelの方が正しく終了せずに悪さをしているのでは？
Ctrl+Alt+Deleteでプロセスが残ってないか確かめてみたら？
もちろん、プロセスをちゃんと見ることのできるソフトを持ってれば
もっと正確にわかるわけだけど。
Unix系の移植にいくつかあったけど、純粋なWin2K用も ttp://www.vector.co.jp/
で探せばあるのでは？
0239１３２人目の素数さんNGNG
座標データを与えて、それをListPlot[data, PlotJoined -> True]で
グラフを書いたんですが、できたグラフをコピーしてBMP形式にしたところ、
Texに貼って印刷すると、グラフがガタガタというかギザギザというか、
滑らかでなくなって、グラフとして機能しなくなってしまいました。
BMPにした後にTexで拡大したのが原因だと思うので、Mathematicaで
グラフを描く時点で、印刷するときの大きさまで拡大して描けば問題ないと
思うのですが…。FormatのMagnificationで拡大しても駄目なようです。
Mathematicaで描いたグラフを都合の良い大きさに引き伸ばして印刷するためには
どのようにすればいいんでしょうか？
0240１３２人目の素数さんNGNG
かりきゅれーしょん・せんたー2ってのが売っていたが、
あれもMathematicaみたいにpassword入れんと動かんのか
教えちくり
0241１３２人目の素数さんNGNG
初心者の為 困っています．どなたかMathematicaに詳しい方が
いらっしゃいましたら教えてください．

やりたいことは，変数を純実数として定義することです．
これができないと，例えば，


x=I*a;
Re[x]

Out[1]=-Im[a]

となってしまいます．（これはaが複素数として扱われているからです）
私としては，aを純実数として扱って，Re[x]=0という解に
なって欲しかったのです．
（aには数値を代入したりするのではなく，文字の変数として扱います．）

どなたか博識な方，教えていただけませんでしょうか？
0242１３２人目の素数さんNGNG
あげ
0243１３２人目の素数さんNGNG
>>241
ここにも立ててたんか。
とりあえずこれ参照。

http://documents.wolfram.com/v4-ja/MainBook/1.4.6.html
0244１３２人目の素数さんNGNG
>>243
どうもです．
結構切羽詰ってるもんで．
仮眠とってから，色々試してみます．
0245１３２人目の素数さんNGNG
3つ以上の二次元座標データを与えて、左から3点を放物線の
始点、頂点、終点として、いくつかの放物線が連結されたグラフ
(というかニュートン・コーツの複合シンプソン則のグラフ)を
描きたいんですけど、Listplotでは座標を直線で結ぶことしかできない
みたいなんですが、どうすればできますか？
最初スプライン曲線で書こうと思ったんですが、調べてみたらそれも
できないみたいだし・・・。
レポートの締め切りがあれなんでちょっと急いでます（；´Д`）
0246１３２人目の素数さんNGNG
age
0247１３２人目の素数さんNGNG
演算子の差を作りたいんです。
(f-g)[x]
を計算させてやりたんですが Through すると
f[x] + (-g)[x]
になってしまいます。
どーやったら
f[x] - g[x]
なんてのを返してくれるようになりましょう？
0248１３２人目の素数さんNGNG
0249１３２番目の素数でしゅ。NGNG
agetemimasu,mazuha
0250１３２番目の素数でしゅ。NGNG
graph=Plot[Sin[x],{x,0,2Pi}];
Show[Graphics[{Thickness[0.001],Map[Line[{{#[[1]],0},#}]&,graph[[1,1,1,1]]]}],Axes->True]
上のようなプログラムを打つと、実はSinカーブのグラフとそのPlotPointsの位置を調べるものなのですが、Map以降のこのプログラムの動き方がよくわかりません。
誰か、教えてください。
0251１３２番目の素数さんNGNG
サッカーボールの描き方を教えてください。ちゃんと白黒２色刷りのものです。お願いします。
0252１３２人目の素数さんNGNG
>>251
紙とコンパス、定規、鉛筆、カッターは用意できましたか？
それでは (以下略)
0253１３２番目の素数さんNGNG
ありがとう。がんがります。
0254１３２人目の素数さんNGNG
>>251
サッカーボール描くのに、カッターは何に使うのでしょうか？
0255１３２人目の素数さんNGNG
いや、描いたらその後組み立てるのだとばかり。











R.マドリードの読売G軍化はんたーい。
0256１３２人目の素数さんNGNG
５万円以内で買う方法ないですか？はっきりいって余計な機能は
要らない。計算エンジンだけがほすい。

昔はStudent pack とかいって2-3万で売ってたよな。今は無いです…
それに学生じゃないし。
0257１３２人目の素数さんNGNG
どうしてもmathmaticaでないとダメなの？
無料の数式処理ソフトなら他にも色々あるよ
0258１３２人目の素数さんNGNG
数学記号をクリックで入力できるパレットが表示できん！
表示の仕方教えて-。
明日提出なのー。
■ このスレッドは過去ログ倉庫に格納されています