1001コメント340KB

〓Mathematica〓

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

0001１３２人目の素数さん

NGNG

ないので立てました。
Mathematicaについて語るスレです。

大学で初めて出会った時は感動したなぁ。(NeXT版…)
Plot3Dでよく遊んだものです。
四次方程式の一般解を出力して、壁に貼ったりしてました（ｗ

0367１３２人目の素数さん

NGNG

A.x=0 Aは係数行列　　ｘは変数ベクトルをあらわします。
この方程式をとくのに、最適な関数を、教えてください

0368通りがかり

NGNG

>367
NullSpace[A]:
Ax=0を満たす自明でない解となるベクトルのリスト

0369通りがかり

NGNG

>362
>367

>368 の方法で良いけど、ここも参考になるかも。
http://www53.tok2.com/home/xxxxxxxx/math/026.html

0370１３２人目の素数さん

NGNG

>362（=>367だとは思うが）

det(A)≠0なら
x=(0,0,0,0,0,0,0,0,0,0,0)'

det(A)=0なら
NullSpace[A]で基本解の導出

0371１３２人目の素数さん

NGNG

mathematica でPlotしたグラフをWordで表示する方法を教えてもらえませんか

0372１３２人目の素数さん

NGNG

プロットしたグラフを右クリックして
copy as より bitmap で保存して word に貼り付ければ？

0373１３２人目の素数さん

NGNG

372さん、ありがとうございます

0374１３２人目の素数さん

NGNG

ボイコット・ザ・Mathematica。
もっとフリーソフトをつかう、作るべし。
MathematicaにせよMapleにせよ囲い込まれるだけだし、
ある日突然サポートがとまったりするリスクを考えよ。
バージョンアップで毎年金を毟り取られるのに快感を覚えるな。
他と著しく違う変なシンタックスに染まっても、システムが
替われば、そのスキルは無用の長物。
　もっと全数式処理ユーザーが結束して、どうでもよいところは
共通仕様化することを要求していくべきだし、なるべくフリーな
ソースのある、内部で採用で採用されているアルゴリズムが
公開されているものをつかうようにしないと、本当に中世の
暗黒時代が再来するだけだよ。

0375１３２人目の素数さん

NGNG

どなたか
Mathematicaの入門書を教えてください
どうしても自力じゃ使いこなせません
よろしくお願いします
あるていど使いこなしてみたいんです

0376１３２人目の素数さん

NGNG

はやわかり　Mathematica　第２版　榊原　進
は、どうですか

0377１３２人目の素数さん

NGNG

メイプル　マスキャド

と比較してどうなんでしょ？

0378１３２人目の素数さん

NGNG

ますます出来るMathmatica　＝標準版＝って
どうですか
わかりやすいですか？
でも14000は高いですよね？

0379１３２人目の素数さん

NGNG

>374 じゃ、 MAXIMA ね。
まあ、正直僕も Mathematica の税金的な面は痛い所。
昔は３万円！でバージョンアップしてくれたのにね。。。
特に日本だと代理店経由しないとだめで、個人の気楽な
用途からどんどん遠ざかります。

>375
何したいのかによりますよ。
あ）とにかく操作入門レベル。コンピューター使用暦ゼロに近い
い）直面した問題に対処したい。コンピューター使用暦数年。
う）情報処理系的側面重視。コンピュータープログラミング要望。
でいろいろありますね。

まあ自分が知っている分野で、 Mathematica という言葉が
表題にあれば、大抵簡単な入門はのっているよ

0380１３２人目の素数さん

NGNG

理工系の教養としての情報科学―Mathematicaによる入門
ローマンメーダー (著), Roman Maeder (原著), 時田節 (翻訳)
http://www.amazon.co.jp/exec/obidos/ASIN/4894717751/qid=1044714600/sr=1-1/ref=sr_1_0_1/250-2915690-8097054

0381１３２人目の素数さん

NGNG

>>380
Mathematicaでのプログラミングにはお勧め

0382１３２人目の素数さん

NGNG

Mathematicaって
普通のアプリにあるようなバグフィックスのアップデータって無いの？
バグなんか無いって事なんだろうか。

0383１３２人目の素数さん

NGNG

>>382

バージョンアップ時に小出しにバグフィックス致します。
バージョンアップ料金は１０万円以上かかります。

0384１３２人目の素数さん

NGNG

俺の持ってるのは3.0.1.1xってなってる
3.0.0.0持ってる人もいるの？

0385１３２人目の素数さん

NGNG

MuPADってだめなの？

0386１３２人目の素数さん

NGNG

まてぃまてぃかで
世界征服したいんですけど？

0387１３２人目の素数さん

NGNG

Plot した図を　Showで表示します。
２つの違う関数を表示するのだけど、その線がどっちかって説明とA4に印刷するた
めの方法を教えてもらえませんか。
簡単に言えば、レポートに提出するためのものです

0388１３２人目の素数さん

NGNG

>>385
フリーなのは学生と教員だけだろ。

0389１３２人目の素数さん

NGNG

>387
help に線の太さやパターンを変える方法がのってるよ。
wolfram のサイトにいけば、日本語で読める可能性有り。

0390１３２人目の素数さん

NGNG

>>388
個人利用はフリーと聞いたが

0391１３２人目の素数さん

NGNG

http://risa.cs.ehime-u.ac.jp/index.html

0392１３２人目の素数さん

NGNG

mathematicaのstudent版って卒業してしまうと使えなくなってしまうのですか？
買ってから４年間、みたいな制約があるんでしょうか？

0393Lisper

NGNG

>>392 GNU Maximaなら永遠に無料でつ．シミュレーション板Maxima擦れを参照．
どうせMathematicaをそれ程クリティカルな業務に使ってないのでしょうから，Maximaで十分でつよ．
3Dグラフがマウスでぐりぐり回せますぜ．どうでつか．

0394山崎渉

NGNG

（＾＾）

0395１３２人目の素数さん

NGNG

0396とある馬鹿　 ◆BAKAB.w.so

NGNG

Mathematica　を早く使いこなせるように私はなりたい　ううう　( つДT)

大学でしかできないからなぁ・・・

やっぱり自腹で買ったほうがいいのかな
それとも研究室の金で買ったほうがいいのかな･･･

0397１３２人目の素数さん

NGNG

大学でできれば十分ジャン。

たまには家に帰りたいもんだ。

0398とある馬鹿　 ◆BAKAB.w.so

NGNG

>たまには家に帰りたいもんだ

なんか（・∀・）ｶｺｲｲ!!!!!

0399質問！

NGNG

（関数を定義する）
仮に・・・a_{i}:実数
s[a_{1},a_{2},....,a_{n}]:＝a_{n-1}　：　与えられた数のn-1番目を取り出す
という関数sを定義したいですが，変数をリストとしてではなく，
与えたいと思ってます．どうすれば良いのでしょうか？
ちなみに，一般のｎについてできるようにしたいです．
ちょうど，Max[a_{1},a_{2},....,a_{n}]の入力の仕方で
答えを得るようにしたいということです．
s[{a_{1},a_{2},....,a_{n}}]から，a_{n-1}を得るのは，簡単ですけど，
s[a_{1},a_{2},....,a_{n}]：これのときは？＃ｎ：一般の自然数＃

0400399

NGNG

誰かわかる方いませんか？

0401１３２人目の素数さん

NGNG

>>399-400
これでいいだろ。

In[10]:=
s[x__]:=List[x][[-2]]
In[11]:=
s[1,2,3,4,5,6]
Out[11]=
5

0402１３２人目の素数さん

NGNG

これでもいい。

In[16]:=
s[x__]:={x}[[-2]]
In[15]:=
s[1,2,3,4,5,6]
Out[15]=
{1,2,3,4,5,6}

0403402訂正

NGNG

In[16]:=
s[x__]:={x}[[-2]]

In[17]:=
s[1,2,3,4,5,6]

Out[17]=
5

0404399-400

NGNG

なるほど！！！
そういうことで回避できるんだー！
401-403 : ありがとうございました!
うーんこれは使える・・・

0405１３２人目の素数さん

NGNG

>>183
先生, 質問です.
StudentからProfessionalにUpgradeすると,
パスワードの発行形態は後者に準じたものに変わるのでしょうか?

0406１３２人目の素数さん

NGNG

>>393
使えるのなら、使っていいんじゃないの？
version3.0 for Students を持っているけど、いまだに使っているよ。
インストールしなおす時には、もちろん、きーじぇ・・・スミマセン。

0407kawabata君の友人

NGNG

>>405
はい、発行形態がかわります。
ただし、Proffessionalへアップグレードしても
　(１)ホームユース(名前は確かじゃないですが「一本」のライセンスで、
　　いつも使用している研究室や職場だけでなく、自宅でも使用することが
　　できるシステム)(この場合は自宅の端末専用に1年間有効のMathIDベースの
　　パスワードが発行されます。当然ＣＤもMathID仕様のものが追加で交付
されます。１年ごとに追加料金がかかります
　(２)そのほかにも北米ライセンスを、一時的に他の地域で使用する場合、
　　　または、その逆で、インターナショナルライセンスを北米で使う場合
　　　などにも、時限パスワードが追加交付されるはずです

0408１３２人目の素数さん

NGNG

マス　書いてもいいか

0409１３２人目の素数さん

NGNG

>>407
ということは,
For StudentからProffessionalへアップグレードしても"MathIDは常に必要"ということですか?
最初からProffessionalの場合みたく, 実質的には(自分の所有する)複数のPCに入れ放題ということにはならないのか……

0410kawabata君の友人

NGNG

>>409
プロフェッショナルはMathID依存でない１８桁～２５桁のパスワードがでる
はずです。しかしホームユースや地域外での利用に対しては、別途料金がかかり
その料金徴収、有効期限管理、追加で使用を認めるマシンを限定し特定する必要
があるため、MathID形態のＣＤ並びにパスワードを追加交付しているのでしょう。

0411baggio

NGNG

質問です。mathematicaを使って、非線形連立方程式を解きたいのですが、どうしたら
いいのでしょうか？初心者の質問で申し訳ないですが、教えてください。

0412１３２人目の素数さん

NGNG

>410
うーん。通常の Professional ではなく、プレミアサポート
（定価３０％、PC版なら約１０万）でホームユースが
出来る、と考えた方がいいでしょう。

0413１３２人目の素数さん

NGNG

>411

代数方程式なら
Solve[方程式のリスト，未知数のリスト]
とします。
それ以外の場合はFindRootを使います。
その場合は解の初期近似を与える必要があります。
FindRoot[方程式のリスト，{未知数,その初期値}のリスト]

0414１３２人目の素数さん

NGNG

Mathematicaで整数計画問題解けますか？

0415baggio

NGNG

>413 132人目の素数さんありがとうございます。
一回やってみます。わざわざ解答ありがとうでした。

0416１３２人目の素数さん

NGNG

Linux版のMathematicaで、スタンドアローンのプロフェッショナル版を
買おうかと思っているのですが、Ｌｉｎｕｘのバージョンをアップデート
したり、あるいはハードを変更したり、マザボードやＣＰＵをとりかえたり
ネットワークカードを変えたり、ＩＰアドレスを変えたりしたら、
使えなくなってしまうのではないかと恐れています。
　何が、保存されていれば（たとえばＭＡＣアドレスとかＩＰアドレス）、
環境を変化させても、ライセンスを取り直さなくても使えるのでしょうか？

0417１３２人目の素数さん

NGNG

MathematicaではLogListPlotやLogLogListPlotのような片対数グラフや両対数グラフを
表示できて便利なんですけど、エラーバー付きのLogListPlotやLogLogListPlotのような
ものはないんでしょうか？

対数表示でない通常のエラーバー付きグラフならErrorListPlotがあるんですが
ErrorLogListPlotやErrorLogLogListPlotのようなものがないのか知りたいです。

0418１３２人目の素数さん

NGNG

>>417
臭うぞ！ Q.manの臭いがプンプンするッ！

0419mathmania ◆uvIGneQQBs

NGNG

>> 417
Exp,Log,ErrorListPlotを組み合わせて自分で関数を作れ。
>> 418
417がQ.manならば、Q.manは変数変換の公式なぞろくに使えないだろう。

0420１３２人目の素数さん

NGNG

Q.manってだれ

0421Q.man

NGNG

ゎたすがQ.manです。

0422１３２人目の素数さん

NGNG

あっそ

0423P.man

NGNG

ゎたすがP.manです。

0424１３２人目の素数さん

NGNG

(･∀･)ｹﾞﾊﾊﾊﾊ

0425山崎渉

NGNG

　　 ∧＿∧
　　（　　＾＾）＜ぬるぽ（＾＾）

0426apico

NGNG

Mathematicaで３次元のグラフを表示させる方法を教えて下さい。
以前販売元へ質問状をFAXとメール送ったのですが、その後連絡がありません。
日本人には冷たいのかな？？
閑話休題、
[1]曲面z=Sqrt[x*y]と３平面z=0,x=2,y=3によって囲まれた立体を表示させたい
のと
[2]曲面z=Sqrt[a^2-y^2](y≧a/2)と４平面x=0,x=2a,y=a/2,z=0によって囲まれる
立体を表示させたいのです。
表示させようと思ってすでに半年。自分でもどうやって聞いたらよいのか分からな
いまま経ってしまいました。もしこれが無理なら日本語でこういった質問の出来る
メールアドレスを教えて下さい。御願いします。

0427mathmania ◆uvIGneQQBs

NGNG

>> 426
表示しようと思って半年もかかるくらいなら、手書きの方が正確で早い。
だが、それでもコンピュータで表示したいなら、
? Plot3D
を使うか、
あるいは
<< Graphics`をやって
? ParametricPlot3D
でヘルプを出して関数を理解してくれ。

0428１３２人目の素数さん

NGNG

>>426
誰でも、すぐできることだから。

0429１３２人目の素数さん

NGNG

はじめまして
今日mathematica 4.2 for students買ってきました
今後お世話になるかもしれませんがよろぴく

0430１３２人目の素数さん

NGNG

>>427, 428
「囲まれた立体」を表示させるのは
Plot3Dでは不可能だし
ParametricPlot3Dでも[1], [2]を表示するのはすくなくとも困難だ。
まぁ428には不可能だな。

0431１３２人目の素数さん

NGNG

>>426
? ClipFill

0432１３２人目の素数さん

NGNG

ClipFillねー
これでいいのかな？

Plot3D[Sqrt[x*y],{x,0,2},{y,0,3},
　PlotRange->{0,3},
　PlotPoints->30,
　ClipFill->Automatic,
　BoxRatios->{2,3,3}]

0433１３２人目の素数さん

NGNG

>>432
Clipしてないのだが？

0434１３２人目の素数さん

NGNG

mathematicaって将来性あるの？

0435１３２人目の素数さん

NGNG

MaximaやMuPADなど無料のソフトがもっと
グレードアップしてくると
今の商売は難しくなるね。
我々はその方が有り難いけど。

0436１３２人目の素数さん

NGNG

0437１３２人目の素数さん

NGNG

いまいち盛り上がらないので。
Mathematica programmingコンテスト。
お題は、

トランプ(Range[52])をシャッフルする関数を書け。

とか言ってみる。

0438１３２人目の素数さん

NGNG

＞４３７
ドナルド・トランプですか？

0439437

NGNG

>>438
普通のトランプです。
ドナルドさんが52人おられるのでしたらそれでも結構です。

0440１３２人目の素数さん

NGNG

>>437
こんなのとか。

Shuffle[x_List] :=
Prepend[Shuffle[Rest[#]], First[#]] &@
RotateLeft[x, Random[Integer, Length[x] - 1]]
Shuffle[{}] = {}

Shuffle[Range[52]]

0441山崎渉

NGNG

━―━―━―━―━―━―━―━―━[JR山崎駅（＾＾）]━―━―━―━―━―━―━―━―━―

0442１３２人目の素数さん

NGNG

0443山崎渉

NGNG

　　　　∧＿∧
ﾋﾟｭ.ｰ　(　　＾＾）＜これからも僕を応援して下さいね（＾＾）。
　　＝〔~∪￣￣〕
　　＝ ◎――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉

0444１３２人目の素数さん

NGNG

Mathematicaが原因でMATHEMATICA.EXEにエラーが発生しました。
Mahtmeticaは終了します。
問題が解決しない場合は、コンピュータを再起動してください。

と出たので再起動したのですが、何回再起動しても同じエラーが出て
起動してくれません。

フォント関係の設定をいじった後このエラーが出たので
元に戻したいと思っているのですが
設定ファイルはどこにあるかわかりませんか？
レジストリは探してみたのですが、わかりませんでした。

Windows MeでMathemtica4.2のシングルライセンスのを使っています。

0445１３２人目の素数さん

NGNG

再インストールしる!

0446１３２人目の素数さん

NGNG

Mathematicaって使いにくくない？ライブラリとか凄いとは思うけど

0447mathmania ◆uvIGneQQBs

NGNG

コマンドが長いのは確かに使いづらい。
もっとも、私は最近Mathematicaをやっていない。
C言語(ForTranも少し)を使ってる。
理由はというと、、、Mathematicaが使えなくなったから。
まぁ、使いやすさの面でいえば、大きなプログラムには、C言語の方がいいだろう。

0448444

NGNG

>>445
再インストールしても同じエラーが出るんです。
設定ファイルが残ってるんじゃないかと疑ってるのですが
その場所が分かりません。

0449１３２人目の素数さん

NGNG

>>446
原始的なプログラミング言語と不統一な仕様の
mapleよりは使いやすいと思う。
言語としてつかえてなんぼだから
素人にはお薦めできない、って感じはあるかもね。

>>447
補完機能をつかうべし。

0450１３２人目の素数さん

NGNG

初心者にお勧めのMathemticaの
本は何でしょうか？

0451１３２人目の素数さん

NGNG

>448
OSを再インストールしる!
それでだいじょうぶだ! 安心しろ

>450
白石さんのがいいぞ!
安心して買え

0452１３２人目の素数さん

NGNG

あなたが探してるのってこれだよね？二日間無料だしね♪

http://alink3.uic.to/user/angeler.html

0453１３２人目の素数さん

NGNG

mathmaniaスレかと思った

　　　　　　　　　　　　と言ってみる

0454１３２人目の素数さん

NGNG

>>450
Mathematicaプログラミング J.ゲイロード･N.カーミン･R.ウエリン
を読んで、その後で
プログラミングMATHEMATICA. Ｒ・メーダー著、時田節
を読むとよくわかると思われ。

特にメーダーの本は(全くの初心者以外には)一読の価値あり。
非常に下手な翻訳だけど。

0455１３２人目の素数さん

NGNG

>>248
Windows Me はやめた方がいいですよ。
2KかXPにしましょう。
（マジレス）

0456１３２人目の素数さん

NGNG

Mathematicaって有効数字が６桁の表示で、例えば
1.23456789とか1234.56789って直接入力すると
1.23456や1234.56と表示されます。

＃　表示だけがそうなるだけで内部的には入力した数のままです

これを以降の入力からすべて指定した有効数字で表示させたいのですが
どうやったら良いのでしょうか？NumberFormではそれで指定した場合だけ
表示されるのでこれを以降の入力すべてで有効にしたいのでよろしく
お願いいたします。

0457１３２人目の素数さん

NGNG

>>451 >>454

どうもありがとう！

0458１３２人目の素数さん

NGNG

>>456
ちょっと邪魔くさいけど、関数を定義すればどう？たとえば
　F[x_]:=N[x, 30];
　F[E^3]
とするとe^3が30桁表示されるはず。

0459mathmania ◆uvIGneQQBs

NGNG

456の方法でも有効数字は確かに表示される。
だが、SetPrecision[E^3,Infinity]か、SetAccuracy[E^3,Infinity]はどうだろう？
まぁ、分数表示になるが、その数に2^52(?)を掛ければ小数点表示がわかるだろう。

あぁ、それと、私はMathematica復活したわけではないので。

0460444

NGNG

>>451
結局OS再インストールしましたよ。。。
したくなかったけど。

>>455
大学のPCだから自由にできません。
経費で2000買ってくれなかった。

0461１３２人目の素数さん

NGNG

>>458-459
Mathematicaでの以降の入力すべてで指定した有効数字で表示させたいということ
でしょうから、その方法ではその関数内の引数にだけ有効であって意味がありません。
何かシステムの設定でできそうな気もしますがそれらしいものが見当たりませんね。
どうやるんだろうか？

0462１３２人目の素数さん

NGNG

>>461
SetPrecisionは計算精度を変更させるだけであってその表示は依然として
有効数字６桁です。

0463１３２人目の素数さん

NGNG

>>456
編集→環境設定→書式設定→式の書式→表示設定→PrintPrecision

0464１３２人目の素数さん

NGNG

>>463
書式設定でしたか。見落としてました。大変助かりました。ありがとうございます。

0465mathmania

NGNG

駄スレ漏れスレage

0466１３２人目の素数さん

NGNG

あなたが探してるのってこれだよね？この中にあったよ♪
http://endou.kir.jp/betu/linkvp/linkvp.html

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