〓Mathematica〓 - 暇つぶし2ch

〓Mathematica〓 ..

655:１３２人目の素数さん
03/08/22 06:50
>>653
６４６は書きすぎだと思うが、

> 機械精度なんて本来は一切要らないんだから。
> そんなものこの時代のマシン特有の都合だろ？

それは無いだろー

656:１３２人目の素数さん
03/08/22 11:57
>>646
知りもしないものを「クソ」あつかいか…
それに少し上のレスぐらい読め。
機械精度なんて関係ないんだよ。

計算機の上では有限の精度しか実現できないことをしっているよな？
0.1111111111111111111111111 == 111111111111111111111/1000000000000000000
にしたところで何か計算したとたんにほぼ確実に10進数表示での
数学的な等号は成立しなくなるんだぞ。
何か意味があるか？
精度の保証だけしとけば十分だろ。

Precision, Accuracyについてマニュアルを読め。

657:１３２人目の素数さん
03/08/22 12:09
>>646
この時代のマシンのことを無視してプログラム書いてどうすんだよ。

おまえが書くプログラムってどれも実用には耐えないんだろうな。

658:１３２人目の素数さん
03/08/22 20:32
私は高校生なので優しくしてください。
0.1111111111111111111111111を任意精度として扱ってもらう簡単な方法はないですか？
いちいち111111111111111111111/1000000000000000000のように入力しなおさいと正しい結果が得られないのは不便なんですけど。

659:644
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:１３２人目の素数さん
03/08/22 22:35
>>659
ありがとう。

661:１３２人目の素数さん
03/08/22 23:36
こんなところでしかストレス発散できないやつ。

662:１３２人目の素数さん
03/08/22 23:55
>>659
つっこみどころ満載だけどおまえにはどんな反論しても
無駄みたいだからやめとく

663:１３２人目の素数さん
03/08/23 00:51
＞　つっこみどころ満載だけどおまえにはどんな反論しても
というと
＞　さあ香ばしくなってまいりました。これも5発売フィーバーか？
の辺りか？(w >659のカキコそのものはべつに間違った内容はないんじゃないの？

ていうか5出るのか。洩れのマスマティカブック4.2版どうなるんだろう。
5対応版買った人に～とか＋'の項目だけ写させてもらおうかな。
みなさんどうしますか？ちなみに洩れはサイトライセンスで使ってる人ね。

664:１３２人目の素数さん
03/08/23 00:53
なんでこんなにｲﾀｲんだろう・・・
自覚ないのか？

665:１３２人目の素数さん
03/08/23 01:17
>>663
大分前に出たかと

666:１３２人目の素数さん
03/08/23 02:48
Mathematicaを持ってない貧乏人がひがんでるスレってここでつか？（ｗ

667:１３２人目の素数さん
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:１３２人目の素数さん
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:１３２人目の素数さん
03/08/23 16:23
0.111... を 1/2^n の和で作ってみると一番近い数が
そのゴミがついた数字になる、というのが一番簡単な
説明だよね。
まあいくつ項を取るかというのは気になる点だろうけどね。

670:１３２人目の素数さん
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:
03/08/23 19:37
ある演算をさせて結果がたとえば
If[x>0,・・・,～～～]
のようになったとき、・・・の部分だけをある変数に代入するにはどうすればいいのでしょうか？

672:１３２人目の素数さん
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:１３２人目の素数さん
03/08/23 20:36
>>668
わかった > 　digits.digits
機械精度にしろ任意精度にしろ近似数、ということ。
# 内部表現が2進なら必然的にそうなるな。

674:671
03/08/23 21:46
>>672
Simplify[If[x > 0, ..., ...], x > 0]
でできました！
ありがとうございました

675:１３２人目の素数さん
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:１３２人目の素数さん
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:１３２人目の素数さん
03/08/24 20:56
二次の係数は?

680:１３２人目の素数さん
03/08/24 21:09
>>679
それぐらいは自分で直せよ…。

681:１３２人目の素数さん
03/08/24 21:11
日本語ﾍﾙﾌﾟ欲しーーーーーーーーーーー！。
いちいちmathematicaの公式サイトみるの大変…。
つーか、日本語版欲しい。

682:１３２人目の素数さん
03/08/24 22:12
>681
日本語キット(Help 日本語) が \50k ぐらいで売ってるよ。
というか、もう日本語ヘルプ強制バンドル品しか買えない。

Mathematica のヘルプの英語ぐらいは読めるように
しておいた方が何かと便利だと思うんですけど。。。
やっぱり日本語ヘルプのニーズは多いのかなぁ。

683:１３２人目の素数さん
03/08/25 00:02
>>682
高すぎ…。

684:１３２人目の素数さん
03/08/25 00:36
>>678
Mathematicaの関数としては、ないわけですね。自分で作るしかないってことか。

ありがとうございました。

685:１３２人目の素数さん
03/08/25 01:37
このソフトの中の人って頭良いけどちょっと融通が利かないというか…。

686:１３２人目の素数さん
03/08/25 02:29
>>685
人が入ってたのかよｗ

687:中の人
03/08/25 12:20
ユーザにもっと勉強してもらいたいものだ

688:１３２人目の素数さん
03/08/25 16:52
>>687
sin[x]とかやった時に
「Sin[x]じゃないですか？」
とか言ってる暇があったらそれで計算しろカス

689:１３２人目の素数さん
03/08/25 17:29
>>688みたいなカス(例えば>>644)が多いなこのスレ。

実際はMathematicaの中の人は他の同系統のソフトの人と比べると、
「頭(知識)は普通(以下？)だが凄く融通が効く」
人だよ。

690:１３２人目の素数さん
03/08/25 18:22
>>689
人の平均から比べたら融通が利かない方だと思われ

691:１３２人目の素数さん
03/08/25 18:46
>>689は日本語を覚えたウルフラム

692:１３２人目の素数さん
03/08/25 22:32
まあ日本国内在住人にとっては腹の立つほど値段が高いこと、
それ以外は悪くないと思いますけどね。

もっともあの英語マニュアルを通して読めたのは
暇だった学生だったからなので、普通の生活では
ちと厳しいかな。

国産の RISA/ASIR も１０万くらい払っていいから
他の商用並の使い勝手にならんかな。

693:１３２人目の素数さん
03/08/25 22:36
>>690
それはそうだな。でもプログラミング言語ってのは厳密さがいいんだよ。
「sin?どうせSinと同じだろ」とか「+? ここは普通-だろ」とかやられたら
実際困る。

694:１３２人目の素数さん
03/08/25 22:48
>>692
要はMathematicaの買えない貧乏人のひがみだろｗ

695:１３２人目の素数さん
03/08/25 23:23
>>693
もちろんそんなのは分かってる。所謂ジョークだよ。

696:１３２人目の素数さん
03/08/26 14:19
list={{Aaa[a],Aaa[b],Aaa[c]},{Aaa[d],Aaa[e],Aaa[f]},{Aaa[g],Aaa[h],Aaa[i]}}
というリストがあって(ホントはもっと長い)、こいつを
{{a,b,c},{d,e,f},{g,h,i}}
にしたいのですが、エレガントな方法を教えてつかあさい。
Tableは使わないでね。

697:１３２人目の素数さん
03/08/26 15:32
>>696
(#[[1]] & /@ # &) /@ list

698:697
03/08/26 15:35
>>696
Map[First, list, {2}]
のほうがいいな。

699:１３２人目の素数さん
03/08/26 20:09
>697
>698
できました。Thanks
さすがですねぇ

700:１３２人目の素数さん
03/08/26 20:23
教えてつかあさい。

701:１３２人目の素数さん
03/08/27 01:40
mathematicaの初心者講座やって下さい。

702:１３２人目の素数さん
03/08/27 02:54
yada

703:１３２人目の素数さん
03/08/27 07:25
>>701
Shift+Enter

704:１３２人目の素数さん
03/08/27 10:06
MacではEnterだけで実行!

705:supermathmania ◆ViEu89Okng
03/08/27 11:35
Re:>701 MathematicaにはHelpが付いているはずだ。それを読むといいだろう。
まずは、Shift+EnterとExit[]と、+-*/^という演算子と、関数の引数は四角括弧で採ることを覚えよう。

706:１３２人目の素数さん
03/08/27 19:21
>>705
Exit[]知らなかった！！

707:706
03/08/27 19:22
つーか、何の意味があるの？DOSみたいに終了するのかと思いきやしないし。

708:１３２人目の素数さん
03/08/27 20:22
Quit[]
とすると、カーネルが終了するのだ
わかったかね

709:１３２人目の素数さん
03/08/27 20:41
>>708
カーネルってなんですか？あとそれ以前にExitはどんなときに役に立つのですか？

710:abc
03/08/27 21:37

おかねもうけ情報見つけました

URLﾘﾝｸ(pocket.muvc.net)

711:１３２人目の素数さん
03/08/28 02:03
Windowsです
[スタート]の[プログラム]メニューにあるMathematicaでカーネルを２まで同時に立ち上げることができる。
（プロフェッショナル版）

712:１３２人目の素数さん
03/08/28 07:48
xyではなくてx*yを使うの？

713:１３２人目の素数さん
03/08/28 09:37
カーネルってのは、
フライドチキンのおじさんのことだ
覚えておけよ

714:１３２人目の素数さん
03/08/28 22:04
普通乗算はスペースだよな。

715:１３２人目の素数さん
03/08/31 21:04
Random[]で出る結果は何通りくらいある？

716:１３２人目の素数さん
03/09/01 06:52
>>715
意味わかんね

717:１３２人目の素数さん
03/09/01 18:06
>>716
Random[]で出る数は何種類から選ばれるかということです。
多ければ多いほど優秀、と。

718:１３２人目の素数さん
03/09/01 23:07
>715
Help に書いてないか？

まあ書いてないとして高々二桁 bit なんで十進数で
33 桁程度ではないか？基本的には剰余だろうから。。。

719:１３２人目の素数さん
03/09/03 03:14
>>718
ありがとう。
ピッタリ1とかピッタリ0ってありますか？

720:１３２人目の素数さん
03/09/03 17:31
SeedRandom[Random[]]ってやるとかなり増える？

721:１３２人目の素数さん
03/09/03 22:21
>719
ぴったりですか。。。原理的にはあるんだけど
実数乱数なら無いとしたほうがよく
整数乱数なら有りそうね。でもこれも Help に書いて無いか？

>720
基本的には Random[] は余りを周期的に利用していると考えて
そう外れがない。
SeedRandom は、この周期のどこから始めるかを指定する
だけなので、増えんよ。

722:１３２人目の素数さん
03/09/05 15:45
Mathematica Ver.5日本語版リリース! あげ
URLﾘﾝｸ(www.wolfram.com)

でも代理店はどこもVer.4のままれす

723:１３２人目の素数さん
03/09/11 18:05
Ver.5
クラスルームってのは特別定価４万６千円だとよ

724:１３２人目の素数さん
03/09/17 09:30
mathematicaで計算実行したら、
”Internal counter overflow.
Some expression evaluations may not run to their
final fixed points. Try redoing your computation
on a 64-bit enhanced version of Mathematica.”
こんなエラー出てしまって計算やってくれないのですが、これってどういうことですか？
ちなみにVer.4です

725:EXCITE 翻訳
03/09/18 03:00
内部カウンタのオーバーフロー。いくつかの表現評価はそれらの最終固定
小数点で実行不可能かもしれません。Mathematicaの64ビット増強された
バージョン中のあなたの計算をやり直してみてください。

726:１３２人目の素数さん
03/09/18 14:35
k1=1/12; k2=1/6;

g[t_] = 2.30743*Exp[t^3.30352]*t^2.30352

h[t_] = (t*(k2+Sqrt[k2^2-t*k1^3]))^(1/3)

k[t_] = h[g[t]] + k1*g[t]/h[g[t]]

のとき、

NSolve[Integrate[h[t], {t, 0, tk}] == 1, {tk}]

を解きたいのですが、式が複雑すぎてエラーの嵐でした。
FindRootでもできませんでした。
先生によれば工夫すればできるらしいのですが、さっぱりわかりません・・・
どなたか教えていただけないでしょうか？

あと、g[t]の値はある計算結果なのですがそのままだと
2.30743*Exp[0.t^3.30352]*t^2.30352
となっているんですが、
0.t^3.30352　= t^3.30352
でいいんですよね？見たことない表現なので戸惑ったのですが・・・
なんでこんな表現になるんでしょうか？

727:１３２人目の素数さん
03/09/18 22:18
>>726
g も k も関係ない。

解けないのは式が複雑だからじゃなくて、使いかたが間違っているから。
NSolveはpolynomialを解くものであって、一般の式は解けない。

数値解は
FindRoot[NIntegrate[h[t], {t, 0, tk}] == 1, {tk, {1, 2}}]
等。(ただし、Sqrtの中身が負にならないtの範囲で)

0.t に見えたのは0. tで、0. * tだろう。その解釈は間違い。

728:726
03/09/18 23:20
>>727
レスどうもです。
726にも書きましたがFindRootでもできませんでした・・・

また、0. * tって0*tとは違うんですよね・・・？
0. ＝桁数の小さい小数ってことですか？

729:726
03/09/18 23:31
>>727

書き込んでくださった
FindRoot[NIntegrate[h[t], {t, 0, tk}] == 1, {tk, {1, 2}}]
でやってみたところできました。
FindRoot[Integrate[h[t], {t, 0, tk}] == 1, {tk, 1}]
でやったらできなかったのですが、なぜこれだとできなかったのでしょうか・・・？

730:１３２人目の素数さん
03/09/18 23:36
>>729
0.が常に0と区別できないRealsを表すのかどうかは知らない。
FullFormすればその0.の値はわかるけれど。

HelpのFindRootの項を読みなさい。

731:726
03/09/20 02:02
>>730
FindRootについて勉強してみます
ありがとうございました

732:１３２人目の素数さん
03/09/20 12:51
>>731
ヘルプ読むのに10分もかからんだろ。そして読んだら、
> FindRoot[Integrate[h[t], {t, 0, tk}] == 1, {tk, 1}]
でもできないとおかしいと気づくはず。
答えが大体わかってたから、数値計算だけでもとめられる{tk,{1,2}}の
指定をしただけだ。

{tk,1}と指定すると、ニュートン法を行おうとする。
Integrate[h[t], {t,0,tk}]の微分は計算できる(h[t])から、
ニュートン法が適用できるはずだ。

実際遅いだけで、(Ver. 4.2では)解ける。

733:１３２人目の素数さん
03/09/22 17:36
どなたか教えて頂けないでしょうか。ほとほと困り果てております。
「1カラム→実数、　2カラム→複素数」
のテキストファイルをリストとして読み込ませるためには、どのよう
にしたらよいのでしょうか？

734:supermathmania ◆ViEu89Okng
03/09/22 17:44
Re:>733 C言語なら楽勝だよ。

735:１３２人目の素数さん
03/09/22 17:59
>733
何のリストに読み込ませたいんだい？

736:１３２人目の素数さん
03/09/22 18:03
>733
Excelに貼り付けて文字列関数でCONCATENATEを使って結合すれば？
括弧の部分とかは、固定の文字列として入れればいい。

737:１３２人目の素数さん
03/09/22 18:43
>>735
Mathematicaで読み込ませたいです。

738:１３２人目の素数さん
03/09/22 18:45
リストはこんな感じです。
　　　　　↓
実数　複素数
1　　3+I2
2 　　4+I5
3 　　8+I9

739:１３２人目の素数さん
03/09/22 19:26
>>739
data.datの中身が、
1　　　3+2I 　
2 　　　4+5I 　
3 　　　8+9I
なら、
ReadList["data.dat", {Number, Expression}]

I2, I5, I9などとなっていたら、Symbolと理解されてしまうので、
あらかじめ加工しておくか、Stringで読み込んでMathematica内でパースする。

740:１３２人目の素数さん
03/09/23 10:48
>>739
本当にありがとうございます。これから試してみます！

741:１３２人目の素数さん
03/09/23 17:38
Readlist[#,Record]& で読み込み
Characters でばらす。

742:１３２人目の素数さん
03/09/25 00:45
灯台に再びサイトライセンスで導入されるようだな。
1年の解析Bを取る連中は、課題を解く手間がずいぶん少なくなるだろう。

743:１３２人目の素数さん
03/09/27 13:12
今入ってないのか

教官が授業で使っててずっけーって思ってた

744:１３２人目の素数さん
03/10/05 21:23
f[x_] :=
Print[b];
Return[x]

という関数を定義したとき
f[6]と入れても
bとプリントされるだけで、6が返ってきません。
どこが問題なのか分かる方教えてください。

745:744
03/10/05 21:37
f[x_] :=
Module[{},
Print[b];
Return[x]
]

こう定義し直したら
f[6]を実行した時
bがプリントされて、６が返ってくるようになりました。

どうしてよくなったかは分からないですが…

746:１３２人目の素数さん
03/10/05 22:00
>>745
>>602を見ろ。

747:744
03/10/05 23:02
>>746
ありがとうございます。
こう定義し直して、うまく行くことが分かりました。

f[x_] :=
(
Print[b];
Return[x]
)

748:１３２人目の素数さん
03/10/07 23:53
y^2=x^3-2 (-2<=x<=2)このグラフが書きたいのですが･･･
Plot[Sqrt[x^3 - 2], {x, -2, 2}]こう書くと上手くいきません。
どなたか教えてくださいませm(__)m

749:１３２人目の素数さん
03/10/08 02:02
>>748
そりゃあ、x^3-2<0の部分は書けないに決まってる。

750:１３２人目の素数さん
03/10/08 15:25
>>748
<<Graphics`ImplicitPlot`
ImplicitPlot[y^2 == x^3 - 2, {x, -2, 2}, AspectRatio -> 1]

751:748
03/10/08 21:53
>>749さん
>>750さん
（ﾟ´Д｀ﾟ）どうもありがとうございます。助かりました。

752:１３２人目の素数さん
03/10/12 18:49
だれかWebMathematicaを使ってWeb上で数式処理が無料でできるサイトを構築してください！
俺にはMathematicaを個人的に買える予算などないんです！学生じゃないし！

753:１３２人目の素数さん
03/10/13 02:23
おとなしくみゅーぱっどでも使っとれ

754:１３２人目の素数さん
03/10/15 23:37
>>753

プロ版じゃないと見栄えが悪いと言ってみる。

755:１３２人目の素数さん
03/10/16 09:39
じゃ、MAXIMA使えばぁ

756:１３２人目の素数さん
03/10/16 12:08
フリーウェアでほとんどの数式をグラフにしてくれるソフトあるよね。
どんな極方程式もグラフにしてくれるやつ。すげー楽しい

757:１３２人目の素数さん
03/10/19 14:52
Functionのコマンドについて質問です
ｘ＾２＋ｙ＾２が０になるときのｘを求めるもので
条件としてｙはすでにリストになっています（例えば、y[[1]]=1,y[[2]]=2）
そこで、functionを使ってｘについての方程式をつくり求めようとしました
が、
A=Table[0,2];
Do[
A[[i]]=Function[{x,y},x^2+y^2][x,y];,{i,1,2}
];
として、A[[1]][1]と出力した場合にx^2+1[1]となってしまい、ｘに１を代入してくれません
理想としては１＋１（=2）となってほしいのです
どのようにすれば、求めることが出来るのでしょうか？
よろしくおねがいします

758:１３２人目の素数さん
03/10/19 16:28
>>757
貼っても動かない上に全く意味不明だ。
Table[0,2]とはなんだ。
(x^2 + y^2)[1]でなにがやりたいのだろうか。

759:１３２人目の素数さん
03/10/19 16:38
x^2 + y^2 が0になるような整数は(0,0)しかない。

760:７５７
03/10/19 18:15
すいませんでした。実際ｘはもっと複雑な関数でして、わかりやすくするために
ｘにしてしまいました。
つまりやりたいことは、ある２つの変数（ｘ、ｙ）をもった式があります
条件としてｙはすでに決まっていてリスト化されています（例：ｙの１番目＝１、２番目＝２、ｎ番目・・・）
そこで、ｙがｎ番目の時に式＝０となるときのｘを求めたいのです

761:１３２人目の素数さん
03/10/19 20:33
y = Range[10];
A := Table[Function[x, x^2 + 　y[[i]]^2 // Evaluate], {i, 1, 10}];

A[[1]][1]

なんども書き込んでるんだけど反映されない…

762:１３２人目の素数さん
03/10/19 21:17
Plotを使ってグラフを描いたときに目盛りに書かれる数字を大きくする方法ってあるんでしょうか。
グラフを大きくしたいときに表示されている部分の角をマウスでドラッグして大きさを変えているんですが、
目盛りの数字が大きくならないんです。
最初に描かれるグラフの大きさも変えたいんですがこちらも分かりません。
全然数学な内容でなくて申し訳ありませんが教えてもらえないでしょうか。

763:757
03/10/19 22:29
ありがとうございます。そのやり方でできました。
あの、そこで例えばx＾2+y^2=100と置いた時に
x^2+1=100, x^2+4=100 ・・・ x^2+100=100と１０個のリスト化された式がでます
そこで、xを求めるためにFindRootを使ったのですがリスト化されたものに対して
答えを出そうとするとうまく行きません
答えをリストとして出すためにはどのようにすればいいのでしょうか
よろしくおねがいします

764:１３２人目の素数さん
03/10/19 23:09
少しは自分で考えろ。

765:１３２人目の素数さん
03/10/19 23:25
>>762
DefaultFont -> {"Bold", 10}

766:１３２人目の素数さん
03/10/19 23:50
>>765
ありがとうございます。明日早速試してみます。
>>764
すみません、Plot周りのオプションで探してはみていたのですが
「それじゃ見つかるわけがない」と猛反省しています。

767:772
03/10/20 14:05
自己解決いたしました。ありがとうございました

768:１３２人目の素数さん
03/10/22 20:19
mathematica5のStudent版買った人いる？

769:１３２人目の素数さん
03/10/26 20:25
買ったよ。パスワード申請が相変わらず(｀×´)丿ウザイ!!

770:１３２人目の素数さん
03/10/26 23:26
最近のMathematicaも
Windows版、Mac版、Linux版とかは一枚のCDで提供されているんですか？
少なくとも3.0の頃はNeXTとかも一緒に入っていて
プラットフォームの乗り換えの時、便利でしたが。

771:１３２人目の素数さん
03/10/27 00:45
Winnyで落としたんだけど、なんかパスワードだか必要で使えん
意味ねー

772:１３２人目の素数さん
03/10/27 01:08
>>771
keyGeneratorがついてるだろ

773:１３２人目の素数さん
03/10/27 01:23
>>772
そんなアドバイスしてどうする…

774:１３２人目の素数さん
03/10/27 02:52
>>769
ネットでできるようになったんじゃなかったけ？

775:１３２人目の素数さん
03/10/27 03:04
ImportやExportのデフォルトのフォルダを指定する方法ありませんか？
初期設定は、Mathematica.exeと同じフォルダになってるけど
そこだと毎回面倒なので、デスクトップとかマイドキュメントに変えたいです。

今はImport["C:\Documents and Settings\galois\My Documents\sound.wav"]
とか書いてます。

776:１３２人目の素数さん
03/10/27 08:51
今日アクティベーションが切れた。
来年から社会人だから糞高い値段かわんといけんのかと思うと鬱

777:１３２人目の素数さん
03/10/28 17:17
会社で買ってもらえ（ｗ

778:１３２人目の素数さん
03/10/28 20:59
Yahooオークションで安いの出てるよ
でもたぶん違法だと思うが

779:１３２人目の素数さん
03/10/30 00:57
高いねぇ、教員やっていても無茶苦茶高い。しかもバージョンアップが
毎年あって、その価格もとても高い。こんなのを学校で教育に使うという
ことは、ＭＡＴＨＥＭＡＴＩＣＡの会社に貢物をしているようなもので
正気じゃない。卒業生が馬鹿高いソフトを買うように仕込んで協力している
ようなものだよ。そんな金があるのなら、優等な学生に奨学金を出すべきだ。

780:眠い
03/10/30 01:29
残念なことに、知ってる範囲のMathematicaユーザは優等生を兼ねてるね
優等生は金持の息子が多い、生活に余裕がないと自由に勉強する余裕がないからそうなる

781:１３２人目の素数さん
03/10/30 20:19
貧乏人はフリーのMuPad,maximaを使えってことでつか
Mathematicaを持っているおいらはバージョンアップしないで
古いやつを大事にしまつ

782:１３２人目の素数さん
03/10/30 22:06
忘れるな、MuPadは無料だが中身はブラックボックスだ。その点Mathematicaと一緒。

それと古いMathematicaのバグや劣ったアルゴリズムは懐で温めても直らんよ。

783:１３２人目の素数さん
03/10/30 23:08
激しく既出だが、mupadはmathematicaよりmapleの方に近い。
ところで、mathematica4.0を持っているのだが、バージョンアップできるのは
5.0までか？それとも、5.1、5.2まで待てるか？

784:１３２人目の素数さん
03/10/30 23:33
4.0のupは5.0までだとDMにあったような

785:１３２人目の素数さん
03/10/31 23:29
オープンソースの数式処理ソフトって何?

786:１３２人目の素数さん
03/11/05 20:16
東西南北に行けるという2次元ランダムウォークをなんとか自力で組み立てた
んですが、格子のない（今いるところから半径１の円周上に動く）ランダムウォークが
どうしてもつくれないんですけど、どうしたら作れますか？アドバイス下さい。
当方まだmathematicaさわってまだ1ヶ月なもんでさっぱり知識ありません(^^;
自分で調べようにもいきなり学校でやれっていわれたもんなんで参考書すらないのです･･･
参考(?)までに格子のあるランダムウォークの肝心な所を載せます↓
Walk2D[n_] :=
FoldList[Plus, {0, 0}, {{1, 0}, {0, 1}, {0, -1}, {-1, 0}}
[[Table[Random[Integer, {1, 4}], {n}]]]]

いきなり長文＆質問すいませんです

787:１３２人目の素数さん
03/11/05 21:33
>>768
Walk2D[n_Integer] :=
　 FoldList[Plus, {0,0},
　　 {Cos[#], Sin[#]}& /@ Table[Random[Real,{0,2 Pi}], {n}]]

ListPlot[Walk2D[60], PlotJoined->True]

788:786
03/11/07 01:22
>>787
おぉ、すごい！！本当にランダムな角度で動いてますね！！！！
皆さんこんなの朝飯前ぐらいな問題ですか？

どーもありがとうございましたm(_ _)mﾍﾟｺ

789:１３２人目の素数さん
03/11/07 21:57
教えてつかあさい。

URLﾘﾝｸ(phong.informatik.uni-leipzig.de)
ここにあるMathGL3d for MacOS X
というのを使いたいのですが、
インストールできません

MacOS XのMathematicaはパッケージなんで
サブフォルダに必要なファイルを入れることができないんです
??

790:１３２人目の素数さん
03/11/08 00:04
>789
拡張子
.app
を取ると、フォルダになります。

それでいいのかわかりませんが

791:１３２人目の素数さん
03/11/08 13:26
SolveやNSolveなどで複素数の答えがでてしまう式があります。

答えをCases[%, _Real]などで実数の範囲内を出すことができますが、
答えを編集するのではなく
もともとの式の変数の範囲を固定して
計算の高速化なり、入力する式達の簡略化はできるのでしょうか？

速度は不満ではないのですが、少し気になったので。

792:１３２人目の素数さん
03/11/08 18:48
>789
コントロールキーを押しながら
Mathematicaのアイコンをクリック

793:１３２人目の素数さん
03/11/13 19:23
Mathematica でバイナリファイルを読み込もうと

In[1]:= Needs["Utilities`BinaryFiles`"]
In[2]:= ReadListBinary["filename",Int16]

としているんですが処理が全然終わらないんです。
webで検索して
URLﾘﾝｸ(library.wolfram.com)
をみつけたのですが、mccがうまく動いていないのか

% mcc binary.tm -o binary
"binary.tm", line 189.15: 1506-195 (S) Integral constant expression with a value greater than zero is required.
(このあともいっぱい似たようなのが表示されます)

となりビルドできません。
実は読もうとしているデータはエンディアンが違い、
読めた後も一工夫しなければいけなさそうでそちらを相談したかったんですが、
それ以前に読めなくて行き詰まってしまっています。
どなたかこの原因をご存知の方、対処法を教えていただけないでしょうか。
Mathematicaのバージョンは Mathematica 4.1 for IBM AIX です。

794:大学生
03/11/13 22:57
大学で課題がでたんですがみなさんの案で私を助けてください！

問題（例えば高校の参考書の問題や例題、大学の問題でも可）をあげてそれの解答の一部分をマスマティカを使って
視覚的に解説せよ。（アニメーションを使うと理想的）

ってのがでたんですが、イイ案ありませんか？人とはちがったのをやりたいんですが・・・
私には知識がありません。おねがいします。

アド載せとくんでマスマティカのソースファイルなんかを添付してくれれば一生感謝します。
どうかおねがいします！もちろん書き込みしてくれても感謝ですｍ（＿＿）ｍ

795:大学生
03/11/13 23:03
>>794です。アド載ってませんでした。

796:１３２人目の素数さん
03/11/14 02:54
y=-x/(x^2+2)のグラフとその接点と接線を書きたいのですが、グラフと接点をtableとshowを使って
動かすのまではうまくいくのですが、接線が動きません、てか接線だけすら表示できません。教えてください。

797:朝から呑んでる大学生
03/11/14 09:41
>>796
暇つぶしになんとなく
Do[{
bmp=Graphics[{RGBColor[1,0,0],PointSize[0.02],
Point[{x,x/(x^2+2)}],{RGBColor[0,1,0],
Line[Table[{k,k/(k^2+2)},{k,-10,10,.2}]]},{RGBColor[0,0,1],
Line[Table[{p,(2-x^2) p/(x^2+2)^2+2 x^3/(x^2+2)^2},{p,-10,
10,.2}]]}}];
Show[bmp]},{x,-10,10}]

798:１３２人目の素数さん
03/11/14 10:10
>>797
何呑んでるの？

799:１３２人目の素数さん
03/11/14 19:45
ｘ軸とｙ軸を描いてy=-x/(x^2+2)のグラフを固定し接線を動かすにはAxes->Trueとなにを使えばいいんですか？

800:１３２人目の素数さん
03/11/14 20:22
>>799
PlotRange

801:797
03/11/14 21:00
>>798
マサイの戦士

802:１３２人目の素数さん
03/11/14 23:21
>>801
「呑んでる」言うから酒かと思ったらソフトドリンクかい

803:１３２人目の素数さん
03/11/17 17:40
>>802
マサイの戦士は「ソフト」ドリンクですか？？

804:マティカの戦士
03/11/18 11:05
>>803
こんな飲み物
URLﾘﾝｸ(www.otsuka.co.jp)

805:狼
03/11/18 22:27
あのーサイクロイドをマスマティカで書きたいんですがどうすればいいですか？？
てかサイクロイドって円の一点を固定（？）して円を転がしてその一点の動いた軌跡じゃないですか？
私は円を転がしてその軌跡が描かれていく様子をアニメーションを使って表そうとしてるんですが、
うまくいきません。円と一点と軌跡をShowをつかってあらわしたいんです。
どうかだれか教えてください。（日本語下手ですいません）

806:１３２人目の素数さん
03/11/18 22:52
>>805
Mathematicaのヘルプにサンプルがあるだろ

807:狼
03/11/18 23:30
help英語でわかりません。コピペしていただけたらありがたいです

808:１３２人目の素数さん
03/11/18 23:59
XpでMathematica5を使ってると，ときどきカーネルが落ちるんだけど，
同じような人いる？

809:１３２人目の素数さん
03/11/19 00:16
>>808
重い計算させてりゃＸＰでなくてもカーネルは落ちる

810:１３２人目の素数さん
03/11/19 10:42
>>808
カーネルの中の人も大変だからな

811:supermathmania ◆ViEu89Okng
03/11/19 12:51
いいこと教えてあげよう。
Mathematicaを使うときは、なるべく他のアプリケーションは切る。
これを守れば今日からジンセイバラ色(?)

812:supermathmania ◆ViEu89Okng
03/11/19 12:54
私がいつかやってしまった事だが、
TeXのdviファイルのプレビューと、Mathmaticaを同時に動かしたとき、フリーズした。
気をつけよう。

813:１３２人目の素数さん
03/11/19 14:41
>>810
そういえば中の人などいないって聞かないね。
これも中の人がいるということが広く認知されたということか。

814:狼
03/11/19 15:41
a

815:１３２人目の素数さん
03/11/19 17:59

811 名前：supermathmania ◆ViEu89Okng ：03/11/19 12:51
いいこと教えてあげよう。
Mathematicaを使うときは、なるべく他のアプリケーションは切る。
これを守れば今日からジンセイバラ色(?)

　　　　　　　　　　　　　　ジンセイバラ色(?)

ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ　　ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ
　　　ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ　ﾊﾟｼｬ　　ﾊﾟｼｬ　ﾊﾟｼｬ　
　∧_∧　　　　　∧_∧　　　　 ∧_∧　　∧_∧　　　　∧_∧　　　　 ∧_∧
　(　　 )】　　　(　　 )】　　　 (　　 )】【(　　 )　　　【(　　 )　　　【(　　 )
　/　 /┘　.　　/　 /┘.　　　/　 /┘ └＼＼　　　└＼＼　　　└＼＼
ノ￣ゝ　　　　ノ￣ゝ　　　　ノ￣ゝ　　　　ノ￣ゝ　　　ノ￣ゝ　　　ノ￣ゝ

816:１３２人目の素数さん
03/11/19 19:48
>>811
おまいの環境がわかるわｗ

817:１３２人目の素数さん
03/11/22 02:47
行列を貼り付けたのですが
Dimensions[a]で実行したところ
Out[数字]＝｛100,100｝とならずに
｛1,100｝
Out[数字]＝｛100｝
と成ってしまいます。｛1,100｝ならわかるんですが、、

問題解決できるひといませんか？（これだけではわからないかな・・・）

818:１３２人目の素数さん
03/11/22 11:08
>817
行列ってのは
{ {a1 , a2 , ... } , { b1 , b2 , ... } , ... }

てな形なので、２つの階層のどっちかで
, コンマが抜けているのでは。。。

819:１３２人目の素数さん
03/11/22 17:09
supermathmaniaって実社会でも干されてんの？

820:１３２人目の素数さん
03/11/22 23:01
マセマティカでべき級数展開ってできますか？

821:１３２人目の素数さん
03/11/22 23:05
すいません、ちょっと質問なんですけど、
教科書で使われてるような図をMathematicaで作成したいのですけど、
ある領域を斜線で塗りつぶすような事ってできますか？

822:１３２人目の素数さん
03/11/22 23:55
>>821
液晶汚してもいいならできるよ

823:１３２人目の素数さん
03/11/23 00:17
>>821
色塗はできるが斜線は自分で引くしかないんじゃないか。

824:821
03/11/23 00:58
そうですか、わかりました～ありがとうございます。
自分で作ってみますね。

825:１３２人目の素数さん
03/11/23 22:21
>>807
URLﾘﾝｸ(www.synapse.ne.jp)

826:１３２人目の素数さん
03/11/25 13:17
>>818
ありがとうございます。違うところでの入力ミスでした。
でも、数百×数百の逆行列を計算しようとして、結果メモリー不足になり
計算できませんでした。普通のPCでこんな計算するのが間違ってましたｗ

827:１３２人目の素数さん
03/12/04 03:09
EmacsのMathematica-modeなんてあるのを知った。
フロントエンドよりマシな環境ができたらうれしいな～。

とりあえずコマンドの補完とか括弧の補完とか
それくらいやってほしいなぁ…

828:＿
03/12/05 03:31
windows でmaximaをtexmacsで起動できた人っている？
両方インストールした(texmacsのみcygwin)けどtexmacsでmaximaを起動しようとすると,
bad url in "complete"
というerrorが表示され終了されます｡できた人がいれば教えてください

829:１３２人目の素数さん
03/12/05 05:12
MATHEMATICAって値段が高過ぎ。生協価格が20万円を超えている。
ふざけるなって言いたい。しかも毎年バ-ジョンアップが出てて、
アップデ-トに半額以上払わされる。なんだかぼられているのじゃ
ないのかな？アメリカだと10分の1の値段だったりしない？

830:１３２人目の素数さん
03/12/05 05:51
>>829
アカデミック価格だと、まあまあ買える値段だよ。

831:１３２人目の素数さん
03/12/05 08:38
>828
環境が違うのでなんともいえないが
locate コマンドの db がまだ更新されていないのでは？
僕はそうでした。

>829
1/10 ということはない。まあ実質半分かな
向こうでは $2000 を超えていないはず。
日本は、日本語環境 5 万円に１年保守費３０％
強制付きだからね。
もう個人は買うなってこと。。。
１０年前は海外から３万円でアップデートして
くれたのにな

832:＿
03/12/06 06:13
>>831
レスthx。更新しても駄目でした｡
xmaximaは動くのですがmaximaをcygwinのxtermで動かす事ができなかったので,
その辺が原因だと考えてます｡誰か分かる人いたら教えてください｡
激しくすれ違いスマソ

833:１３２人目の素数さん
03/12/06 23:45
you should not ever use Japanese.

834:１３２人目の素数さん
03/12/07 10:07
{{a,b},{c,d},{e,f}}のようなリストを
{a,b,c,d,e,f}にする簡単な方法はありませんか？

835:１３２人目の素数さん
03/12/07 10:43
Flatten[%]でいけました。よごし失礼。

836:１３２人目の素数さん
03/12/07 18:02
>829
生協に商用版がおいてあるの?

837:１３２人目の素数さん
03/12/07 23:53
この関数を

fbbs = Flatten[Cases[
ReplaceAll[{u, t},
NSolve[{fbb[#1, #2, #3, #4], fbb[#5, #6, #7, #8]}, {u, t}]],
{_Real, _Real}]]&;

こんな↓感じにする、いい方法はないかな。
目的は可読性の向上。

NSolve[{fbb[#1, #2, #3, #4], fbb[#5, #6, #7, #8]}, {u, t}]
ReplaceAll[{u, t}, %]
Cases[%, {_Real, _Real}]
fbbst2 = Flatten[%]&

↑の方法だとうまくいかないのです。
Flatten[%]がそのままはいってしまいます。

838:１３２人目の素数さん
03/12/08 16:31
>>836
Student版が29000で売ってる
URLﾘﾝｸ(software.univcoop.or.jp)

839:１３２人目の素数さん
03/12/10 20:33
MATHEMATICA4.0をUNIXにインストールしようと思ったのですが、
パスワードだけ書き残していてライセンスIDをなくしてしまっていました。
さてここで問題です。
いったい私はどうしたら良いのでしょうか？

840:１３２人目の素数さん
03/12/10 20:43
ノーヒントですか？
相談なしですか？

841:１３２人目の素数さん
03/12/10 22:05
>>840
俺のライセンスＩＤなら・・・

842:１３２人目の素数さん
03/12/11 11:35
ライセンスIDってCD-ROMの袋に書いてなかったっけ？
ライセンスIDって無くしたら大変な気がするけど。。。

843:１３２人目の素数さん
03/12/11 12:27
誰かただでください！

844:１３２人目の素数さん
03/12/11 15:33
C言語から評価式と、入力したパラメータをMathematicaに送り，Mathematicaで計算，
結果をCプログラムに返して表示される、というものを作ろうとしています．
で，関数を書いてみたのですが，いくつかわからない点がありましたので質問させてください．

①MathKernel.exeのパスの指定はどのようにするのでしょうか？
CプログラムのほうからMathKernel.exeのパスを指定し，char変数PATHに格納してあるとすると，
link = MLOpenString(env, "-linklunch -linkname 'PATH'", &err);
でいいのでしょうか？

②パッケージの読み込み時に使うのは以下のようにMLPutStringで良いのでしょうか？
MLPutFunction(link, "Get", 1);
MLPutString(link, "Package");

③一時変数はC言語側で定義するのでしょうか？
たとえば，以下の評価式で変数y,zはCプログラムのほうから入力するとき，y,zはC言語側で定義しますが，一時変数xもC言語側で定義するのでしょうか？(用いる変数はMathmatica内部で使用するのみであってもすべてCで定義するのでしょうか？)
temp = y + z
x = temp^temp

845:844
03/12/11 15:34
④定義関数f[t_]=～を送信するのはどうすれば良いのでしょうか？
f[Pattern[t, Blank[]]から，以下のようにしてみたのですが・・・

MLPutFunction(link, f, 1); //←これでいいのか？
MLPutFunction(link, "Pattern", 2);
MLPutDouble(link, t);
MLPutFunction(link, "Blank");

⑤(x^y + z)のように関数Plusの引数に関数Powerが入っている場合，送信するのは
MLPutFanction(link, "Plus", 2);
MLPutFanction(link, "Power", 2); //←ちゃんとPlusの引数と見なされるのか？
MLPutInteger(link, x);
MLPutInteger(link, y);
MLPutInteger(link, z);
でいいのでしょうか？

長くなりましたが，よろしくお願いします m(_ _)m

846:844
03/12/11 15:36
③に関して・・・
一時変数xも→一時変数tempと結果を代入する変数xも
の間違いです

847:こてはん
03/12/11 19:35
>>842
それほんと？
探してみたら俺のも行方不明でした・・・。
ピンチ？

848:１３２人目の素数さん
03/12/11 22:06
>>843
ヤフオクに出てる違法コピー買って摘発されてくださいｗ

849:１３２人目の素数さん
03/12/11 22:29
今M2で今年で卒業なんだけど
卒業までにstudent版を買ってら、来年も問題なく使えますか？
それとも自動的にライセンスが切れる仕組みになってるの？
卒業までに残りの貯金でソフトを購入する覚悟はできたのですが。

850:837
03/12/12 00:30
>>844

E:\Program Files\Wolfram Research\Mathematica\4.0\AddOns\
MathLink\DevelopersKits\Windows\UnsupportedGoodies\VCFE\Source\
と
ヘルプのアドオンMathLink当たりにすべての答えがあると思います。

自作のprogramはwrapper classを作って
頭にMLの文字とMLINKの引数が無いのでそれを前提として読んで見てください。

１、これを渡していました。

"-linkname \'\"E:\\Program Files\\Wolfram Research\\Mathematica\\
4.0\\MathKernel.exe\" -mathlink\' -linkmode Launch";
err checkはしていませんでした。

> link = MLOpenString(env, "-linklunch -linkname 'PATH'", &err);
ちゅうかsprintfしないと……。

２、たぶん、EndPacket();が必要です。

851:837
03/12/12 00:30
３、y + zとtemp ^ temp を複数のPutFunctionでやる場合は結果を受け取る時に必要です。
それを一つの関数にしてしまいひとつのPutFunctionでやる場合は必要ありません。
F.E.
y + z
temp^temp
それぞれ送信する場合、それぞれ答えが帰ってくる。
x = (y + z) ^ (y + z)
これなら一つの結果しか返ってこない。
temp = y + z
x = temp^temp
これを一気に送信したら、２つの答えが帰ってくる。
temp = y + z;
x = temp^temp
たぶんこうして一気に送信したら一つだけだと思う。

４、初期化時に
char *型の配列を用意して関数を登録(VCFEのサンプルにあるEvaluateを呼び出し)
してそれをPutFunctionしている。
つまり
fx = f[Pattern[#1, Blank[]]&;
を登録して
PutFunction(fx, 1);
PutDouble(t);
EndPacket();

852:837
03/12/12 00:31
５、それはよくわからないからtry&errorで。
僕の場合は４の通り、使う関数をすべてあらかじめ登録してから使っています。

おまけ、
EndPacket後に、答え以外のパケットが帰ってくる場合の処理が面倒です。
それは試行錯誤してみてください。

たぶん例に出したような簡単な処理をするのではないと思いますが、
もし桁数を考えないで計算したいのであれば、多倍長ライブラリで検索して見てください。
GMP,NTLがおすすめ。

むむむ、質問に答える事で、自分の質問の答えがわかった。thank you。

次ページ