- 1 名前：１３２人目の素数さん [2001/03/20(火) 02:34]
- ないので立てました。
Mathematicaについて語るスレです。
大学で初めて出会った時は感動したなぁ。(NeXT版…)
Plot3Dでよく遊んだものです。
四次方程式の一般解を出力して、壁に貼ったりしてました（ｗ
- 592 名前：１３２人目の素数さん mailto:sage [03/08/01 11:58]
- 高校生でこんなことをやってるのか。
凄いな
- 593 名前： mailto:sage [03/08/01 12:39]
- え〜今までMathematicaなんて使ったことないのに、卒研で使えと言われまして・・・
さっぱりわからないんで教えていただけないでしょうか？
ワイブル分布において
平均Mean[dist] == 1と標準偏差StandardDeviation[dist] ==1/3の連立方程式を
αとβについてSolveで解こうとしたんですが、
『逆関数が使用されています．値は多価逆関数のため失われている可能性があります．』
と出て解けないんですよ。
これってどうすればいいのでしょうか？
- 594 名前：１３２人目の素数さん [03/08/01 16:39]
- Play[Sin[700 t + 25 t Sin[350 t]], {t, 0, 4}]
- 595 名前：１３２人目の素数さん mailto:sage [03/08/01 16:53]
- >>593
解けないんじゃなくて、そのメッセージの後に代表値は出てるよな？（ｗ
- 596 名前：１３２人目の素数さん mailto:sage [03/08/01 17:07]
- Mathematicaとは関係ない話なんだけどwolfram reserchの日本語の
トップページ(www.wolfram.co.jp/)ってさ、リロードするたびに違う
種類の画像とキャッチコピーが表示されるじゃん。キャッチコピーは
「世界の計算方法」とか「数学、科学、工学、教育における革新的言語」
とか色々あるんだけど。あれの中の一つに「技術計算の未来を定義」
ってのがあったのね。それを読んだときに「未来を予測する最良の方法
は、それを発明してしまうことだ」っていうAlan C. Kayの言葉を思い出し
て、「ああそうか、数学で何か発明するってはまさしく何か定義すること
だな」と思って少し感慨を覚えたんだよ。どうでもいい話だけど。
ってか英語の方のトップページ見たらMathematica5って書いてあるじゃん！
6/23に出たのか。全く知らなかった。
- 597 名前：１３２人目の素数さん [03/08/01 17:31]
- 例えば、
p1=Plot[Sin[x],{x,-10,10}];
というように最後にセミコロン「；」を付けてもグラフが表示されてしまうのですが
これを表示させないようにするにはどうすればよいのですか？
- 598 名前：ビッグバン宇宙論は完全に間違いでした！！！！！ [03/08/01 18:39]
- 科学者よ、恥を知れ！
ビッグバン宇宙論は完全に間違いだった！
科学の原則を無視した、デタラメのインチキ理論だったのだ。
そして、そのビッグバン宇宙論の世界的な浸透は
アメリカ、ユダヤ・キリスト教勢力による世界支配のための思想的な戦略なのだ！
また、ビッグバン宇宙論の思想によって戦争が起こり、
貧富の差がひらき、終末的な絶望感が世界に蔓延しているのだ。
ビッグバン宇宙論は世界の平和を揺るがす、悪の元凶となっているのだ。
ビッグバン宇宙論とは、
「宇宙は『無』からビッグバン（大爆発）によって誕生した」という理論である。
この理論は、ユダヤ・キリスト教の創造神話（神が天地を創造した）そのものである。
ビッグバン宇宙論の実態は、科学理論ではなく宗教思想なのである。
『無』は科学的に証明できるものではなく、
そして、『無からの誕生』も科学では証明できるものではないのだ。
ビッグバン宇宙論が科学の正統であるという思想を、世界中の人々に
浸透させる戦略が成功したことにより、ユダヤ・キリスト教勢力の
世界における優位性が確立されていったのだ。（２０世紀に）
そして、その思想的支配の最大の例が、アメリカやイギリスによる
イラク戦争なのだ。
ビッグバン宇宙論の浸透により、世界中に終末思想（世界の終わり）が蔓延してしまっている。
そのことにより、自己中心的、せつな的、短絡的な考え方が社会に広がっている。
科学的に間違っているビッグバン宇宙論から脱却しなければならない。
そして、宇宙は無限だということを理解しなければならない。
人間は本当の宇宙観、世界観を構築し、
新しい時代に進んでいかなければならないのだ。
ビッグバン宇宙論が世界を支配している限り、平和な世界にはならないのだ。
そのことを科学者は重く受けとめるべきである。
平和な世界を！！！！！！！！！！！！！！！！！！！！！！！
- 599 名前：１３２人目の素数さん [03/08/01 18:49]
- ,-rヽ、 __,.- 、
/ ）ｧﾍ / }
／ ,ｨ ,.ﾆｨ /´ヽo‐´
／＿〈 ﾚ'´∠-‐‐- ､__ / ｌ
ﾄ<,__,＞ _ ,,,,, _ ＜/ |
（ ＼_ ､__∠-､‐､‐ヽ ､ .l ｌ /
〉／ _.ィ‐'´ヽﾄ､Alヽﾄ､ヽｌヽl |
イァ ﾉ.ｲ'"_ ;==､ ヽ ｌ L._
,ｲ | ｌ /lﾊ }Viゝ } /| ｌ:.:.ヽ
／.:L.ヽﾊ ﾄﾞ上! ﾞ‐' ﾉ ﾄ､ レ' {
〈-‐'´.-'´ >ゝ" ` _ ....、´ ´7/､ ｀ー'´ .ｲ
ヽ‐'´,-／ィヘ、 ヽ _ﾉ ,彳 ｀ｰ-‐'´ /
｀´l ﾉィﾍｨ＞､__,.. ‐'´ { l. /
l ! /〈__.L..､ﾉ __.-‐'´| ! 〈
. l ! ＞'´-､イ⌒'ｰ-‐'´ 、 /
| /＿,ィ´i l. . : : : : . . ,' ｀ｰ./
〉､: : :.l _,イ: : : : : : : : ! /
/. :! : ´ : : : : : :/ /
l: : : /
/. : _. -‐- ._ . : : : :.〈
／_,.ィ´ ｀ ｰ-､;_: : : :|
＼::ﾉ j __. -‐ ‐- エ＞
/‐ '' "__,... -‐‐ｒｰ､-､_|
／-‐ｧ' ´/ | l ヽ ` 、
.／ ／ / l ! `、 ヽ、
- 600 名前：１３２人目の素数さん mailto:sage [03/08/01 19:29]
- おい、そのAAはロリスレに貼れ
- 601 名前：ぼるじょあ ◆yBEncckFOU mailto:（＾＾） [03/08/02 03:01]
- ∧＿∧ ∧＿∧
ﾋﾟｭ.ｰ （ ・３・） ( ＾＾ ） ＜これからも僕たちを応援して下さいね（＾＾）。
＝〔~∪￣￣￣∪￣￣〕
＝ ◎――――――◎ 山崎渉&ぼるじょあ
- 602 名前：１３２人目の素数さん mailto:sage [03/08/02 03:41]
- >>591
> n = 2000; a = 0; b = 1; While[n >= 1,
> ...
論外なのでコメントできん。一冊以上Mathematicaの本を読め。
末尾再帰を用いた解答
f[n_] := f[n, 0, 1];
f[0, r1_ , r2_ ] := r1;
f[n_, r1_, r2_] := f[n - 1, r2, r1 + r2];
> f[n_]:=a = 0; b = 1; While[n >= 1,
a = 0;のセミコロンで文が切れている。
f[n_] : = a
b = 1;
と入力しているのと同じだ。
- 603 名前：１３２人目の素数さん mailto:sage [03/08/04 00:48]
- >>602
論外ですかｗ
そうゆう本高そうで…。今度学校の図書館で詠んでみます。
ありがとうございました。
- 604 名前：１３２人目の素数さん [03/08/04 08:23]
- 597に応えてあげて
- 605 名前：１３２人目の素数さん mailto:sage [03/08/04 20:18]
- >>604=>>597
- 606 名前：１３２人目の素数さん mailto:sage [03/08/04 23:22]
- >595
日本国内向けに日本語文書作業中。
もっとも買う人がいないから強制バンドル
価格Up 中。
日本は非英語で高度な技術内容が学べ得るけど
その分仲介業者が入る余地が多くなってしまった。。。。
- 607 名前：１３２人目の素数さん mailto:??? [03/08/05 23:48]
- Ver.5使ってます。
起動直後にガイドが出るくらいで
見た目はそんなに変わってない。
- 608 名前：１３２人目の素数さん [03/08/05 23:49]
- ★おまんこナビ登場！！★日本の美しきオマンコ★
endou.kir.jp/marimo/link.html
- 609 名前：１３２人目の素数さん [03/08/05 23:50]
- あなたの近所のあの娘が出てるかも
いつもすまして歩いてるあの娘が
乱れまくり！！
www.j-girlmovie.com/
- 610 名前：１３２人目の素数さん mailto:sage [03/08/06 15:32]
- Sin[a°]=1/2なるaを求めるにはどうすればよいでしょうか？
Solve[Sin[a°]==1/2]では求められませんでした。
- 611 名前：１３２人目の素数さん mailto:sage [03/08/07 00:11]
- Solve[Sin[a] == 1/2, a]
- 612 名前：１３２人目の素数さん mailto:sage [03/08/07 14:32]
- >>611
違う。
- 613 名前：１３２人目の素数さん mailto:sage [03/08/07 14:59]
- >>612
Solve[Sin[a Degree] == 1/2, a]
で
Solve[Sin[a] == 1/2, a]
と同じ程度に、求めることができているので、
質問者が何を求めているのかよくわからない。
Solve[Sin[a Degree] == 1/2, a] // N
ってのが欲しいのか。
- 614 名前：１３２人目の素数さん mailto:sage [03/08/07 15:25]
- >>613
スペースが必要だったのか。ありがとう。
- 615 名前：１３２人目の素数さん mailto:sage [03/08/09 12:52]
- >>614
そういう誤解か。
a\[Degree]はそれ自体がシンボルだから、
Solve[Sin[a\[Degree]] == 1/2, a\[Degree]]
はできるが、aは求められない。
スペース(かけ算)が見た目に嫌なら、
a\[InvisibleTimes]\[Degree]とすればよし。
- 616 名前：１３２人目の素数さん mailto:sage [03/08/09 15:56]
- >>597
だれも書かないな。
$DisplayFunction = Identity
- 617 名前：１３２人目の素数さん [03/08/12 22:43]
- >616
正確にいきましょう。
p1 = ListPlot[Table[{i, i*Random[]}, {i, 1, 8}],
PlotStyle -> RGBColor[1, 0, 0], DisplayFunction -> Identity];
p2 = Plot[Exp[x], {x, -2, 2},
PlotStyle -> RGBColor[0, 0, 1], DisplayFunction -> Identity];
Show[{p1, p2}, DisplayFunction -> $DisplayFunction];
- 618 名前：１３２人目の素数さん mailto:sage [03/08/13 00:54]
- >>617
それのどこが正確なんだ？
PlotStyleなんて何の関係もないし。
# 意味がわかってないままコピペしているようにしかみえないのだが。
で、これのどこが正確でないんだ？
$DisplayFunction = Identity;
Plot[Sin[x],{x,0,1}];
# オプションの方がいい場合「も」あるがな。
- 619 名前：１３２人目の素数さん mailto:sage [03/08/13 01:56]
- >>617-618
要はオプションを関数の中で指定しているかグローバルに指定しているかの違いだろ。
- 620 名前：１３２人目の素数さん mailto:sage [03/08/13 03:57]
- >>619
違う。
$DisplayFunction は DisplayFunctionというオプションのデフォルト設定
を与えるものであって、オプションそのものではない。
オプションを設定することと、
(オプションが省略された時の)デフォルトを変更することは、厳密には別のことだ。
オプションを関数の外で設定するというのは
SetOptions[Plot, DisplayFunction -> Identity]
だ。
- 621 名前：山崎 渉 mailto:（＾＾） [03/08/15 18:32]
- (⌒V⌒)
│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
⊂| |つ
（＿）（＿） 山崎パン
- 622 名前：１３２人目の素数さん mailto:??? [03/08/18 18:59]
- おーい、Ver5持ってる奴
x^100-1==0
を解いて、根の絶対値を調べてくれ。
１にならないから。
- 623 名前：tebe [03/08/18 19:06]
- 半年間もかけてMathematicaの使い方を学ぶという
非常にエグイ授業を大学でやったよ。
Mathematicaって機能ありすぎて、僕みたいな素人
には宝の持ち腐れって感じだな
- 624 名前：１３２人目の素数さん [03/08/18 19:11]
- ｢今私のオッパイ見てたでしょう。｣ってそりゃ見ますって。
これだけの立派なオッパイが目の前にあったら。
淫乱女教師がフェラ、パイズリで同僚の先生を責めまくります。
挿入部のアップも豊富なのでオマンコもモロ見えですよ。
無料動画をどうぞ
www.exciteroom.com/
- 625 名前：１３２人目の素数さん [03/08/18 19:19]
- Mathematicaの有名なバグ
Integrate[1/x^2, {x, -1, 1}]
古いバージョンだと２と評価してくれるんですが
新しいバージョンだと∞になってしまいます。
Ｖｅｒ５だとどうなんでしょうか？
- 626 名前：１３２人目の素数さん mailto:sage [03/08/18 21:50]
- >>625
はぁ？
バグってるのはあなたの頭では？
- 627 名前：１３２人目の素数さん mailto:sage [03/08/20 01:54]
- 1 1
∫(1/x^2)dx＝-1/x｜＝-1/1-(-1/(-1))＝−２
-1 -1
じゃないの？
- 628 名前：１３２人目の素数さん [03/08/20 01:56]
- >>627
ずれた
1 1
∫(1/x^2)dx＝-1/x｜＝-1/1-(-1/(-1))＝−２
-1 -1
じゃないの？
- 629 名前：１３２人目の素数さん [03/08/20 01:59]
- >>628
1/x^2>0だから積分値は正だろ？
- 630 名前：_ mailto:sage [03/08/20 02:03]
- homepage.mac.com/yamazaki8
- 631 名前：１３２人目の素数さん [03/08/20 02:06]
- >>625-629
ｘ＝０で発散しているから∞だろ
- 632 名前：１３２人目の素数さん mailto:??? [03/08/20 08:37]
- 625がまぬけだったということでよろしいでつか
- 633 名前：１３２人目の素数さん [03/08/20 10:12]
- >>632
否、これは確かに古いバージョンでは２ではないが−２と評価しているぞ。
いまのバージョンだと∞に修正されてはいるが。
- 634 名前：supermathmania ◆ViEu89Okng [03/08/20 10:50]
- 発散積分の有限部分は確かに-2になる。
Integrate関数は超関数積分なども一部サポートしている。
これとは関係ないが、主値積分もオプション指定でできる。
ついでに、Integrate[Exp[1/(1-x^2)],{x,-1,1}]と
NIntegrate[Exp[1/(1-x^2)],{x,-1,1}]の結果を報告していただきたい。
期待しないで待っているぞ。
- 635 名前：１３２人目の素数さん [03/08/20 18:05]
- >>625は古いバージョンと新しいバージョンの挙動の違いを言ってるだけだろ
積分値が正しい間違ってるの話をしているわけではないと思われ
- 636 名前：132人目の素数さん [03/08/20 19:54]
- >>634
NIntegrate[Exp[1/(1-x^2)],{x,-0.998,0.998}]=3.88057*10^103でつた。
Integrate[Exp[1/(1-x^2)],{x,-1,1}]は、答えが帰ってきません（；＿；）
mathematica 4.2 for Linux-PPC
- 637 名前：１３２人目の素数さん mailto:??? [03/08/20 20:50]
- ちなみにMapleの結果
int(exp(1/(1-x^2)),x);
/infinity \
| ----- 2 |
| \ hypergeom([1/2, _k1], [3/2], x )|
x | ) --------------------------------|
| / GAMMA(1 + _k1) |
| ----- |
\_k1 = 0 /
- 638 名前：１３２人目の素数さん [03/08/21 01:41]
- オクで割れマセマティカを5000円で売ってるやつがいる。
タイーホされてほしい。
- 639 名前：１３２人目の素数さん mailto:sage [03/08/21 01:55]
- >>638
通報すれ
- 640 名前：１３２人目の素数さん [03/08/21 02:06]
- >>637
そんなの超幾何関数使って元の積分を表現しただけじゃん。
- 641 名前：１３２人目の素数さん mailto:sage [03/08/21 03:33]
- 0.11111111111111111111111111
って入力して実行すると
0.11111111111111111111111111
って出て、それをクリックしてエンター押すと
0.1111111111111111111111111099999999999964597
って出るんですがどうゆう意味があるのでしょうか？かなり気になるんですが。
- 642 名前：１３２人目の素数さん [03/08/21 03:40]
- 意味はない。Mathematicaが糞なだけ。（ｗ
- 643 名前：１３２人目の素数さん mailto:sage [03/08/21 05:45]
- >>641
ネタで言ってるのかどうか知らんが・・・
機械精度の演算がどういう仕組みで行われているかを一度考えて見れ。
- 644 名前：１３２人目の素数さん mailto:sage [03/08/21 07:45]
- それにしてもクソですな。そのくらい改善できそうなものだが。
- 645 名前：supermathmania ◆ViEu89Okng [03/08/21 15:58]
- Integrate[Exp[1/(x^2-1),{x,-1,1}]
NIntegrate[Exp[1/(x^2-1),{x,-1,1}]
と云おうとしたら、間違えてしまった。
これなら計算できるのかな？
- 646 名前：１３２人目の素数さん mailto:sage [03/08/21 19:01]
- >>644
あのさ、Mathematica では小数点を付けた数値は機械精度
で計算されるとマニュアルに書いてあるから、
0.11111111111111111111111111
と書いた時点でこれは
11111111111111111111111111/100000000000000000000000000
とは全然違う値になるわけだ。だから、もし
0.11111111111111111111111110000000000000000000
とかになったら、Mathematicaは機械精度の計算を唄っておきながら
実際にはサポートされていないことになる。
この前も同じような質問があったけど、今の大学って数値計算の理論
とか教えないんだろうか。もし習ったことが無いなら、そういう技術者や
科学者にとって必要最小限のことも教えない大学なんて行く意味がないよ。
>>641や>>642、>>644が通っている大学の学長は、こういう不祥事（と
言っても良いよね）に対する記者会見を開いても良いぐらいだと思う。鶴を
燃やした事件みたいにさ。高校生だったら、まあ仕方ないけど。
いや、今日は社会人になっても、２次方程式の解を計算するルーチンで
解の公式をそのまま使うような馬鹿に遭遇したんで、イライラしてるのかも
しれん。桁落ちが起きるだろ、アホが！お前の先輩の文型出身の奴でも
ちゃんと場合わけして回避してたぞ。
- 647 名前：１３２人目の素数さん mailto:??? [03/08/21 20:13]
- NIntegrate[Exp[1/(x^2-1)],{x,-1,1}]
=0.443994
ですな。
- 648 名前：１３２人目の素数さん mailto:??? [03/08/21 20:14]
- 数値解析の講義なんか、あったって選択だろ。
そんなもんやってる時間があったら、
純粋数学やるわいな
数学専攻ならな
- 649 名前：１３２人目の素数さん mailto:sage [03/08/21 20:35]
- >>646
俺は高校生です。仕方ないです。
- 650 名前：１３２人目の素数さん mailto:sage [03/08/21 22:29]
- >>646
> あのさ、Mathematica では小数点を付けた数値は機械精度
> で計算されるとマニュアルに書いてあるから、
こんなことは書いてない。
おまえの書いた
0.11111111111111111111111111
はArbitrary-Precision Numberだ。
つまり、多倍長数の内部表現が二進であるか十進であるかという実装の問題だ。
偉そうなこと書くんだったらもっと勉強しろ。
一目見たらdoubleで書けないことぐらいわかれよ。
64bit以上のCPUつかってんだったら機械精度かも知れんがどっちにしろ
嘘だしな。
- 651 名前：650 mailto:sage [03/08/21 22:34]
- 一応書いとくが、二進で結構だと考えてるよ。
# 上の馬鹿といっしょにされてはかなわん
- 652 名前：１３２人目の素数さん [03/08/22 05:18]
- このスレ、人を罵倒するやつが多いな。
- 653 名前：644 mailto:sage [03/08/22 06:20]
- >>646
おいおいパターソン&ヘネシーくらい読んだことあるぜ。
0.1111111111111111111111111 != 111111111111111111111/1000000000000000000
(桁は適当ね)になっている実装がクソだと言ってるの。
機械精度なんて本来は一切要らないんだから。
そんなものこの時代のマシン特有の都合だろ？
もちろんMathematicaブックを読めば$MachinePrecisionや
N[]や12.3`なんかについてあれこれ載っている(はず)。
しかし、精度という基本的なことがらに付いてあれこれ頭を悩ませる実装および
言語体系が「クソですな。改善できそうなもんだが」というわけ。
掲示板の書き込みで憂さ晴らすのは不健康だね。
- 654 名前：１３２人目の素数さん [03/08/22 06:49]
- よくわからんがマスマティカはくそってことでつか？
- 655 名前：１３２人目の素数さん [03/08/22 06:50]
- >>653
６４６は書きすぎだと思うが、
> 機械精度なんて本来は一切要らないんだから。
> そんなものこの時代のマシン特有の都合だろ？
それは無いだろー
- 656 名前：１３２人目の素数さん mailto:sage [03/08/22 11:57]
- >>646
知りもしないものを「クソ」あつかいか…
それに少し上のレスぐらい読め。
機械精度なんて関係ないんだよ。
計算機の上では有限の精度しか実現できないことをしっているよな？
0.1111111111111111111111111 == 111111111111111111111/1000000000000000000
にしたところで何か計算したとたんにほぼ確実に10進数表示での
数学的な等号は成立しなくなるんだぞ。
何か意味があるか？
精度の保証だけしとけば十分だろ。
Precision, Accuracyについてマニュアルを読め。
- 657 名前：１３２人目の素数さん mailto:sage [03/08/22 12:09]
- >>646
この時代のマシンのことを無視してプログラム書いてどうすんだよ。
おまえが書くプログラムってどれも実用には耐えないんだろうな。
- 658 名前：１３２人目の素数さん mailto:sage [03/08/22 20:32]
- 私は高校生なので優しくしてください。
0.1111111111111111111111111を任意精度として扱ってもらう簡単な方法はないですか？
いちいち111111111111111111111/1000000000000000000のように入力しなおさいと正しい結果が得られないのは不便なんですけど。
- 659 名前：644 mailto:sage [03/08/22 21:53]
- さあ香ばしくなってまいりました。これも5発売フィーバーか？
>>658 に優しいアシストをすると、そういう小数でどんな計算したいのかを言えば、
より有益なレスがつくのではないかな？ていうか小数なの？有理数なの？
ちなみに手もとのMathematicaブックには「0.142が近似値でなく
厳密な値であるならば、142/1000と有理数として入力しなければならない」
という記述をハケーン。
あと0.11111111111111111111`200 で200桁の有効数字が、
0.1111111111111111111111''200で小数点以下200桁までの正確さが保証されるんだと。
それで十分かな？どうよ？
>>656
> にしたところで何か計算したとたんにほぼ確実に10進数表示での
> 数学的な等号は成立しなくなるんだぞ。
おいおいそれこそ「計算」次第だろ。アタマ疲れてない？
>>657
> おまえが書くプログラムってどれも実用には耐えないんだろうな。
CやF90で書くのとMmaで書くのとには違いが出て当然だろ。言語3〜4種しか知らん人？
- 660 名前：１３２人目の素数さん mailto:sage [03/08/22 22:35]
- >>659
ありがとう。
- 661 名前：１３２人目の素数さん [03/08/22 23:36]
- こんなところでしかストレス発散できないやつ。
- 662 名前：１３２人目の素数さん mailto:sage [03/08/22 23:55]
- >>659
つっこみどころ満載だけどおまえにはどんな反論しても
無駄みたいだからやめとく
- 663 名前：１３２人目の素数さん mailto:sage [03/08/23 00:51]
- ＞ つっこみどころ満載だけどおまえにはどんな反論しても
というと
＞ さあ香ばしくなってまいりました。これも5発売フィーバーか？
の辺りか？(w >659のカキコそのものはべつに間違った内容はないんじゃないの？
ていうか5出るのか。洩れのマスマティカブック4.2版どうなるんだろう。
5対応版買った人に〜とか＋'の項目だけ写させてもらおうかな。
みなさんどうしますか？ちなみに洩れはサイトライセンスで使ってる人ね。
- 664 名前：１３２人目の素数さん mailto:sage [03/08/23 00:53]
- なんでこんなにｲﾀｲんだろう・・・
自覚ないのか？
- 665 名前：１３２人目の素数さん mailto:sage [03/08/23 01:17]
- >>663
大分前に出たかと
- 666 名前：１３２人目の素数さん [03/08/23 02:48]
- Mathematicaを持ってない貧乏人がひがんでるスレってここでつか？（ｗ
- 667 名前：１３２人目の素数さん mailto:sage [03/08/23 14:08]
- >>659
>> にしたところで何か計算したとたんにほぼ確実に10進数表示での
>> 数学的な等号は成立しなくなるんだぞ。
> おいおいそれこそ「計算」次第だろ。アタマ疲れてない？
だからほぼ確実に、ってかいてんだよ。日本語ぐらい読めるようになろうね。
割算もできないしSinやCosも計算できないし、かけ算したらどんどん
桁が増えてくし、どうすんの？
> CやF90で書くのとMmaで書くのとには違いが出て当然だろ。言語3〜4種しか知らん人？
Mathematicaの設計の話をしてんだよ。
>>660
0.1111111111111111111111111は>>656で書いてあるように自動的に任意精度と
してあつかわれている。
例えば、
x = 0.1111111111111111111111111
y = 1000 x - 111
Precision[x]
Precision[Sin[x]]
Precision[y]
とか入力すると、Mathematicaが精度保証して計算してるのがわかるよ。
高校生だからわからないのだろうが、>>644はアホだぞ。
- 668 名前：１３２人目の素数さん mailto:sage [03/08/23 15:31]
- なんかこのへんのフレームは、任意精度と厳密数値(Schemeでいうexactnum)との
混同に基づいているような気がする。
ということで、高校生君に
> 0.11111111111111111111111111
> って出て、それをクリックしてエンター押すと
> 0.1111111111111111111111111099999999999964597
> って出るんですがどうゆう意味があるのでしょうか？かなり気になるんですが。
の理由を分かりやすく教えてあげれ > 誰か
多倍長整数や高精度近似数は2^16または2^32進数(整数要素の配列)らしい。
あとMathematicaBookの「3.1数」には
123.4 機械精度
123.4567890123456789 システムによっては任意精度 <- なんじゃそりゃ
123.4567890123456789` 機械精度
123.456`200 200桁の任意精度 <- precision
123.456``200 200桁の任意確度 <- accuracy
1.234*^6 機械精度
1.234`200*^6 200桁の精度 <- 任意精度ととっていいのか？
とあるね。しかしこの例が微妙に分かり辛い...
リファレンス「入力の文法」にはdigits.digitsは「近似数」としか書かれてない。
これは任意精度なの？機械精度？だれか教えてくれますか？
わたしは普段整数しか扱わないので知らないままだった。
- 669 名前：１３２人目の素数さん mailto:sage [03/08/23 16:23]
- 0.111... を 1/2^n の和で作ってみると一番近い数が
そのゴミがついた数字になる、というのが一番簡単な
説明だよね。
まあいくつ項を取るかというのは気になる点だろうけどね。
- 670 名前：１３２人目の素数さん mailto:sage [03/08/23 16:54]
- どうも高校生です。
1-0.999999999999=9.99978*10^-13
ってなるのが嫌なんです。これは分数で書くしかないですよね。
999999999999/1000000000000って書いたりするには桁数数えなければなりません。
かなり苦痛なので分数に書き換えるプログラムを書いてみました。
For[i = 0, x ≠ IntegerPart[x], x *= 10; i++]; Rationalize[x]/10^i
xに厳密な数値に直したい小数を入れて、実行すればOKです。
- 671 名前： mailto:sage [03/08/23 19:37]
- ある演算をさせて結果がたとえば
If[x>0,・・・,〜〜〜]
のようになったとき、・・・の部分だけをある変数に代入するにはどうすればいいのでしょうか？
- 672 名前：１３２人目の素数さん mailto:sage [03/08/23 20:33]
- >>668
> 123.4567890123456789 システムによっては任意精度 <- なんじゃそりゃ
わかってて書いてるのかも知れないが、システムによって機械精度の桁が違うから。
計算速度のために機械精度で扱える時はあつかおうとするという
Mathematicaの設計の結果。
> リファレンス「入力の文法」にはdigits.digitsは「近似数」としか書かれてない。
digits.digitsって？
>>670
そのプログラムバグってるぞ。
x = 0.9999999999999999999999999
で試してみ。
# というかRationalize[x,0]の不完全版を回りくどくやっているだけ。
欲しいのは
FromDigits[RealDigits[x], 10]
あたりか？
>>671
状況が良くわからないが、
If[x > 0, ..., ...][[2]]
とか、もしかしたら
Simplify[If[x > 0, ..., ...], x > 0]
とか。
- 673 名前：１３２人目の素数さん mailto:sage [03/08/23 20:36]
- >>668
わかった > digits.digits
機械精度にしろ任意精度にしろ近似数、ということ。
# 内部表現が2進なら必然的にそうなるな。
- 674 名前：671 mailto:sage [03/08/23 21:46]
- >>672
Simplify[If[x > 0, ..., ...], x > 0]
でできました！
ありがとうございました
- 675 名前：１３２人目の素数さん mailto:sage [03/08/23 22:40]
- >>672
あれー、なんぜバグっちゃうんだろー。
Rationalize[0.42857142857142857142857142857]とかの場合3/7になっちゃうから
そうならない版を作ったつもりだったんだけど…。
FromDigits[RealDigits[x], 10]かあ。すごいです。つーか、こんな関数しらなかった…。
- 676 名前：１３２人目の素数さん [03/08/24 16:33]
- Mathematicaで平方完成する方法を教えてください
- 677 名前：１３２人目の素数さん [03/08/24 17:41]
- 降ベキの順に表示させる方法ってないの？
- 678 名前：１３２人目の素数さん mailto:sage [03/08/24 20:18]
- >>676
H[f_, x_] /; PolynomialQ[f, x] :=
Module[{r, b, c},
r = (x - b)^2 + c; r /. Flatten[SolveAlways[f == r, x]]]
Example: H[x^2 + 3 x + 2, x]
>>677
TraditionalFormか、別の方法としては、
HoldFormをもちいた並び替え関数を書く。
- 679 名前：１３２人目の素数さん mailto:??? [03/08/24 20:56]
- 二次の係数は?
- 680 名前：１３２人目の素数さん mailto:sage [03/08/24 21:09]
- >>679
それぐらいは自分で直せよ…。
- 681 名前：１３２人目の素数さん mailto:sage [03/08/24 21:11]
- 日本語ﾍﾙﾌﾟ欲しーーーーーーーーーーー！。
いちいちmathematicaの公式サイトみるの大変…。
つーか、日本語版欲しい。
- 682 名前：１３２人目の素数さん mailto:sage [03/08/24 22:12]
- >681
日本語キット(Help 日本語) が \50k ぐらいで売ってるよ。
というか、もう日本語ヘルプ強制バンドル品しか買えない。
Mathematica のヘルプの英語ぐらいは読めるように
しておいた方が何かと便利だと思うんですけど。。。
やっぱり日本語ヘルプのニーズは多いのかなぁ。
- 683 名前：１３２人目の素数さん mailto:sage [03/08/25 00:02]
- >>682
高すぎ…。
- 684 名前：１３２人目の素数さん [03/08/25 00:36]
- >>678
Mathematicaの関数としては、ないわけですね。自分で作るしかないってことか。
ありがとうございました。
- 685 名前：１３２人目の素数さん mailto:sage [03/08/25 01:37]
- このソフトの中の人って頭良いけどちょっと融通が利かないというか…。
- 686 名前：１３２人目の素数さん [03/08/25 02:29]
- >>685
人が入ってたのかよｗ
- 687 名前：中の人 mailto:??? [03/08/25 12:20]
- ユーザにもっと勉強してもらいたいものだ
- 688 名前：１３２人目の素数さん mailto:sage [03/08/25 16:52]
- >>687
sin[x]とかやった時に
「Sin[x]じゃないですか？」
とか言ってる暇があったらそれで計算しろカス
- 689 名前：１３２人目の素数さん mailto:sage [03/08/25 17:29]
- >>688みたいなカス(例えば>>644)が多いなこのスレ。
実際はMathematicaの中の人は他の同系統のソフトの人と比べると、
「頭(知識)は普通(以下？)だが凄く融通が効く」
人だよ。
- 690 名前：１３２人目の素数さん mailto:sage [03/08/25 18:22]
- >>689
人の平均から比べたら融通が利かない方だと思われ
- 691 名前：１３２人目の素数さん mailto:sage [03/08/25 18:46]
- >>689は日本語を覚えたウルフラム
- 692 名前：１３２人目の素数さん mailto:sage [03/08/25 22:32]
- まあ日本国内在住人にとっては腹の立つほど値段が高いこと、
それ以外は悪くないと思いますけどね。
もっともあの英語マニュアルを通して読めたのは
暇だった学生だったからなので、普通の生活では
ちと厳しいかな。
国産の RISA/ASIR も１０万くらい払っていいから
他の商用並の使い勝手にならんかな。
|
 |
