〓 Mathematica 四 〓
■ このスレッドは過去ログ倉庫に格納されています
0001132人目の素数さん
2007/12/10(月) 16:00:01, - ' ,..、、.ヾ{{フ'⌒`ヽ、
/ ,:', -‐‐` ´ '´⌒ヽ ヾ:、
. ,' ,'´ ,ィ ,ィ ,' , `ヽ', ',-<
,' .i /|. /.| { i, i, }. }_,,))
! | ! .,'-.{ ! !|; |`、.}゙!.! |. ! ヽ.
', ', |Vァ=、゙、 `゙、!-_:ト,リ', l ! | ゙',
ヽ、', l:!Kノ}. f:_.)i゙i: リ ! l ル
| l!iヾ- ' , .!__:ノ ゙ ,リ l リ'´
. ',|!!、 r‐┐ ` ノ'. /,イ / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
'i!゙、ヽ、 ゙ー' _, ィ,:',:''´ < Mathematica に関する話題はここに書いてね!
゙:、ィ、jヾー::: 'iヘ .ノ',リ. \___________________
,、- '´ ヽ、゙、 { `>"、
/\\ ', } //`ヽ
過去スレ
>>2
0263261
2008/12/17(水) 13:05:12グラフを使って最小費用流問題をPrimal-Dual法で解きたいのですが
残余ネットワークの生成の仕方が分からないということです
0264132人目の素数さん
2008/12/17(水) 23:17:02それは >>262 の質問に対する答えに全くなってないよ。
「どういう実装」と聞いているのは、例えばどのようにデータを管理しているか、
とか、そういうことを聞いている(グラフをどう持っているかとか)。
「どの部分」と聞いているのは、残余ネットワークの定義が分からないのか、
残余ネットワークを数式でどう表したらいいかわからないのか、
定義も式も分かっているけど Mathematica での書き方が分からないのか、
とかそういうのを聞いている。
0265261
2008/12/18(木) 19:24:32一応今の所は下のような感じになっています
g0 = {{1, 2}, {2, 3}, {1, 3}, {1, 4}, {4, 3}, {4, 5}, {3, 5}};
g = FromOrderedPairs[g0];
h0 = Table[Random[Integer, {1, 100}], {7}]
h1 = SetEdgeWeights[g, h0];
h2 = SetEdgeLabels[g, GetEdgeWeights[h1]];
capacity = Table[Random[Integer, {2, 15}], {7}]
h3 = SetEdgeWeights[g, capacity];
costlist = {h0, ToOrderedPairs[g]};
TableForm[costlist];
capacitylist = {capacity, ToOrderedPairs[g]};
TableForm[capacitylist];
flowlist = {Table[flow, {Length[g0]}], ToOrderedPairs[g]};
TableForm[flowlist];
0266261
2008/12/18(木) 19:32:15残余ネットワークのどの部分が分からないかということに関しては
「残余ネットワークを数式でどう表したらいいかが分からない」です。
あともう一つ分からない所があるのですが、mathematicaのグラフの辺に
2つ以上の重みをつけることは可能なのでしょうか?
質問ばかりで申し訳ないですがよろしくお願いします
0267132人目の素数さん
2008/12/18(木) 22:26:05数式で書けない限りMathematicaでも書けない。
その部分は教科書なり何なりで勉強してらっしゃい。
二種類以上の重みは、「重みのペア」を一つの重みだと考えればいいよ。
0269132人目の素数さん
2008/12/20(土) 15:49:35ひとつ前でなくてひとつ上の出力を参照する記号はありますか?
ctrl+shift+Lではなくて%みたいに短いと見やすいんですが、
%で繋いでドンドン積んでいって途中で間違えるとやり直すのが面倒だよぬ
0270132人目の素数さん
2008/12/21(日) 01:56:560271132人目の素数さん
2008/12/21(日) 11:24:15http://reference.wolfram.com/mathematica/ref/Out.html
でも、何度も使うようだったら、変数に記憶しておくほうがいいよ。
0272269
2008/12/21(日) 13:31:330273132人目の素数さん
2008/12/21(日) 22:07:490274132人目の素数さん
2008/12/22(月) 16:40:24新しいセルに手で打ち直すしかないのかな?
0275132人目の素数さん
2008/12/22(月) 20:25:360276132人目の素数さん
2008/12/23(火) 13:14:390278132人目の素数さん
2008/12/23(火) 16:24:170279132人目の素数さん
2008/12/23(火) 22:43:58もちろんバグがてんこ盛りだよん!
0280132人目の素数さん
2008/12/26(金) 16:30:01関数自体を自分で書き換えるしかないでしょうか?
f[n_] :=
Nest[If[
If[# == 0, 0,
If[
Mod[#2, #] ==
0, # + #0[# - 1, #2], #0[# - 1, #2]]] &[#, #] ==
2*#, #, #0[# + 1]] &[# + 1] &, 1, #] &@n
0281132人目の素数さん
2008/12/26(金) 22:07:34まずどっからもってきた関数なのか説明しろ
0282132人目の素数さん
2008/12/26(金) 22:37:29動かしてないが見た感じ定義をそのまんま書いたっぽい
再帰が深すぎるんじゃない?
再帰の限界を環境変数でいぢればいい
0283132人目の素数さん
2008/12/27(土) 17:28:10させようとしたのですが、
Limit[Binomial[N, r](m/N)^r (1 - m/N)^(N - r), N -> Infinity]
とすると
Gamma[1/N+1+O[N]^3]で真性特異点が見つかりましたと言われて計算できません
Binomial関数を階乗になおしても同じです。
MathematicaではGamma関数を含むと極限計算ができないんですか?
それともなにか工夫をすれば上記計算ができるようになりますか?
0284132人目の素数さん
2008/12/29(月) 14:20:42ソフトがあるのはこの掲示板でも何回か見たので使ってみた
のですが、横軸の 1 と縦軸の 1 が同じ長さになってしまいます。
Mathematica に入力したのは以下のようなものです。
Get[ "・・・/ketpic6.m"]
Get[ "・・・/ketpicapp6.m"]
XMIN = 0;
XMAX = 5;
g1 = Plot[x^2, {x, XMIN, XMAX}];
setwindow[{XMIN, XMAX}, {0, 25}];
openfile["foo.tex"]
openpicture["0.5cm"];
drwline[g1];
closepicture[1];
closefile[]
・・・のところは本当は ketpic6.m, ketpicapp6.m
のディレクトリの絶対パスです。
TeX では input で読み込んでいるだけなのですが
図は縦横比が 25 : 5 で縦長になっています。
Mathematica では AspectRatio というコマンドで変えるので
ketpic6.m, ketpicapp6.m の AspectRatio->Automatic
という部分を消してみたのですが変わりませんでした。
使っている人がいたら教えてください。
0285132人目の素数さん
2008/12/29(月) 20:45:59ver6だと求まったよ
0286132人目の素数さん
2008/12/30(火) 12:34:10わざわざやる需要あんの?
0287132人目の素数さん
2008/12/30(火) 19:58:520288132人目の素数さん
2008/12/30(火) 19:59:24○ だけでも
0289132人目の素数さん
2008/12/30(火) 21:03:43さらにバグ増加です
0290132人目の素数さん
2008/12/30(火) 21:49:390291132人目の素数さん
2008/12/30(火) 21:56:510292132人目の素数さん
2008/12/31(水) 04:16:20無料でくれるらしい
0293132人目の素数さん
2008/12/31(水) 07:05:43俺もプレミア入ってるがそんな案内まだきてないぞ?
どこの代理店?日本電子計算?HULINKS?
0294132人目の素数さん
2009/01/01(木) 18:16:350296132人目の素数さん
2009/01/02(金) 02:33:28「バージョンアップできるのは二つ前までで終わりだ
二つ前はマイナーを入れて数えるんだぞ」
って奴
0297132人目の素数さん
2009/01/07(水) 19:14:52英語版から1ヶ月経たずに出すとは翻訳チームもなかなかのもの。
ただし、誤字脱字やふさわしくない翻訳も散見されるが。
んで、肝心の内容はというと、俺に言わせれば素晴らしいの一言。
きれいなグラフがサクッと作れるし、並列計算機能が標準搭載されるようになったし。
個人的にびっくりした機能が数列を何項か与えると一般項を返す関数。
数列データベースを参照してるとのことで、例えばn次元球の体積だと
5項ではだめだけど6項与えたら一般項をちゃんと求めてきた。すごい。
0298132人目の素数さん
2009/01/08(木) 20:09:040299132人目の素数さん
2009/01/08(木) 23:54:320300132人目の素数さん
2009/01/09(金) 00:25:490301132人目の素数さん
2009/01/09(金) 11:00:090302132人目の素数さん
2009/01/09(金) 18:34:390303132人目の素数さん
2009/01/09(金) 21:02:05それ専用の関数がある
http://reference.wolfram.com/mathematica/ref/SeriesCoefficient.html
0304132人目の素数さん
2009/01/09(金) 21:58:47年度末調整で買うか。
0305132人目の素数さん
2009/01/09(金) 22:58:170306132人目の素数さん
2009/01/09(金) 23:24:470307132人目の素数さん
2009/01/10(土) 02:50:26しかしアクティベーションがうざい
0308132人目の素数さん
2009/01/11(日) 00:10:350309132人目の素数さん
2009/01/11(日) 03:33:500310132人目の素数さん
2009/01/11(日) 10:50:41シングルローカルライセンスかネットワークライセンスを
聞いてこないや。
これが原因か?
0311132人目の素数さん
2009/01/11(日) 14:24:100312132人目の素数さん
2009/01/12(月) 06:07:420313132人目の素数さん
2009/01/12(月) 17:36:1520000円とか
0314132人目の素数さん
2009/01/12(月) 17:42:59社会人?
0315132人目の素数さん
2009/01/12(月) 17:50:370316132人目の素数さん
2009/01/12(月) 18:15:280317132人目の素数さん
2009/01/12(月) 18:43:250318132人目の素数さん
2009/01/12(月) 19:52:39要組合員証
0319132人目の素数さん
2009/01/14(水) 23:51:02v4-もっさり
v5-やや改善
v5.2-サクサク!
v6-もっさり&メモリ消費
v7-高機能でサクサク!
これで、5.2&6.0両方使いだったが、v7だけに移行できる。
0320132人目の素数さん
2009/01/15(木) 00:04:59週末に一念発起してインストする。
0321132人目の素数さん
2009/01/15(木) 00:39:210322132人目の素数さん
2009/01/16(金) 08:15:550323132人目の素数さん
2009/01/16(金) 17:59:32ヘルプの日本語はよくできてる
0324132人目の素数さん
2009/01/16(金) 18:01:46そりゃそうだよなw
0325132人目の素数さん
2009/01/16(金) 21:21:56落とす奴のほうが多くなったら開発なんて続かない.
落としたやつも開発者への感謝の気持ちは忘れんなよ.
0326132人目の素数さん
2009/01/16(金) 22:21:53俺もVer3持ってるけどアカデミック版だからこそ買えた。
97年だったけど初めてインターネットのありがたさを実感したわ。
それまでどこで売っているかさえわからなかったから。
0327132人目の素数さん
2009/01/16(金) 22:23:45ドングリだっけ? LW3Dのやつとか
0328132人目の素数さん
2009/01/16(金) 23:40:36あんなものはすぐクラックされる
悪血が最狂
アドビをみろ
0329132人目の素数さん
2009/01/16(金) 23:47:55v7入らないっぽい。
OS再インストールしないとだめかも。
0330132人目の素数さん
2009/01/17(土) 00:50:59autorunのファイルでトロイを感知した
拾ってきたやつだからかなw
0331132人目の素数さん
2009/01/17(土) 13:58:20どなたかご存じですか?
生協で聞けば教えて
もらえるんでしょうか?
0332132人目の素数さん
2009/01/17(土) 16:15:410333132人目の素数さん
2009/01/17(土) 17:01:220334132人目の素数さん
2009/01/17(土) 19:17:13おれは学生だっつーの!
0335132人目の素数さん
2009/01/17(土) 19:18:23Mathematica使ってるのって
思い出してみると、>>333のような
馬鹿ばっかりだもん。
0336132人目の素数さん
2009/01/17(土) 19:40:11ver6と一緒に入れているけど、うちの環境では大丈夫。
ver6+画像処理アプリを使っており、ver7で統合されたのは良いのだが、コマンド名が結構変わっている・・・
同じコマンド名のものは2重定義されているとエラー出るし、アプリ部分は結構書き換えが必要。
それでもver6+アプリよりは快適なので、この際ver7に乗り換える!
0337132人目の素数さん
2009/01/18(日) 16:19:300338132人目の素数さん
2009/01/18(日) 17:19:15わざわざMaximaなんてものを使う意味は無くなった
金出す価値がある
0339132人目の素数さん
2009/01/18(日) 18:03:54商用のほうが若干安心できるんだよね.気持ちの問題が大きいけど.
0340132人目の素数さん
2009/01/18(日) 18:19:350341132人目の素数さん
2009/01/18(日) 18:45:40画像処理アプリって何?ウルフラムが画像処理専用のアプリを出してるのか?
リンクはってくれ
>>339
研究者だったら所属する大学か組織が買ってくれないのか?
0342132人目の素数さん
2009/01/18(日) 18:52:32もちろん研究室でも買ってるよ。
0343132人目の素数さん
2009/01/18(日) 19:01:30/ / /フ | | r-、 `ー' `ー′
L__/ r"> // | | ヽヽ
,.._ / / { { || 〉〉 ,-、
// { { い | | /ノ / / ,、
{ { ヽヽ、 ヽ`'二_二' / / / / ノ
/7 ヽヽ、 `'-ニ,/´_=;;;;=_ ヽ`ニノ / /
{ { `ー-`ニニ /r'゙_ ヽ / _`',`ー-‐'´ノ r'7
ヽヽ、 _,.ノl=・=-.∴.-=・=!'-ニ二__//
「`! `'-`ニニ二-ァ | `ー'_ !」 _ー' |ヾー―---‐'´ ,-、
l ! ,. -'´ri |l ‘~`ー'~′ l| r‐`ニニ'ー- 、_//
ヽ、ヽ--―'ニ ‐'´ {ヾ ! ,r;'ニーニヽ、!l/}ヽ、 ``ー‐'´_
__ ``'' ''´ /,トミ! ir,!-┴-!、ヾ, !'/\ヽ、_ /ノ
い、 ///ハ||′-―-、`|||' l ヽ `ヽ、二./ >>61こらまんじゃ夫馬いっちょ
\`ー―'ニ´‐',/ ! ||!/ ヽl|| lヽ \ ,-、 おまんじゃえーじゃよなw
,、 ̄ ,. -'_/ ! ||!______l|| l \`ー‐'´ ノ
── = ニ /=、。。。。。。。。。。。。。。。。r=、ヽ
─ =ニ三 (◎ ヽ-─────(◎ )
ノ◎、 |\ \ / / | /◎、
(_,rへ `ソ /> ◎) (◎く| レ' ,rへ )
─ = ニ \◎'/ / \ ヽ、◎/
ノ / \ ヽ
─ =ニ三 ( ◎( ) ◎)
─ = ー、_ら ⊂、_,r´
0344132人目の素数さん
2009/01/18(日) 22:35:14どこが代理店になるんだろ?
価格上がっていくのかな?
0345132人目の素数さん
2009/01/18(日) 22:44:050346132人目の素数さん
2009/01/19(月) 01:34:36ソースは何?
ほとんどの大学はMathematica導入してるから
生協が代理店じゃなくなったら、他の代理店はウハウハだな
日本電子計算とヒューリンクスぐらいしかないだろ
0347132人目の素数さん
2009/01/19(月) 03:06:11ネットで検索してみてください。
どこも代理店契約は今年の3月で終わります。
ただ、代理店じゃなくなっても販売は
継続すると生協のHPには書いてありますけど。
やはり今後はDL販売がメインになるみたいです。
StudentバージョンもDLで購入できるようですね。
0348132人目の素数さん
2009/01/19(月) 03:22:13学生かどうかの判断はどこでするんだろう?
0349132人目の素数さん
2009/01/19(月) 12:02:070350132人目の素数さん
2009/01/20(火) 18:44:01生協の代理店契約が切れるからって、DL販売がメインになるなんてことはないだろ
そもそもDL販売なんてものに代理店なんて必要ないし
ウルフラムとの直接のやりとりなんだから
ということはやっぱり国内の大手代理店と契約することになるんじゃないか?
0351132人目の素数さん
2009/01/20(火) 22:07:240352132人目の素数さん
2009/01/20(火) 22:13:42つうか、Mathematica使える人は、購入するぐらいの英語は使えるだろ。
0353132人目の素数さん
2009/01/21(水) 13:02:490354132人目の素数さん
2009/01/21(水) 13:09:25それでも敷居が低いに越したことは無いだろう
「どうしても欲しい」人は多少のことは何とかするだろうが
「なんとなく欲しいかな」ぐらいの人にとっては障壁は低ければ低いほどいい
0355132人目の素数さん
2009/01/21(水) 20:14:17日本電子計算とヒューリンクスだけか
線香はだめだし
0356132人目の素数さん
2009/01/22(木) 03:19:33パスワードは keygen.exe があったので、これで作ると思うんですけど。
私は WAREZ 的なものはあまり詳しくないので分かりません。
これでは安心して購入できません。
教えてください。
0357132人目の素数さん
2009/01/22(木) 08:17:19ヨドバシカメラで売ってるよ。
(うちの近くのヨドバシには置いてあった)
0358132人目の素数さん
2009/01/22(木) 08:22:23うちの近くはビックカメラだった。
0359132人目の素数さん
2009/01/22(木) 18:52:12落ちているのはニセ物だよ
今回のは買わないとダメなのさ
0360132人目の素数さん
2009/01/22(木) 20:31:59http://item.rakuten.co.jp/plusyu/4988727009970/
HULINKSは定価しか乗せてないけど、見積もり取ったら幾らぐらいに
なるんだろ。
0361132人目の素数さん
2009/01/23(金) 03:38:05解けるソフト教えてください。
0362132人目の素数さん
2009/01/23(金) 04:21:04Mathematicaはある程度の範囲のものは解いてくれるけど、
それ以上は高望みしすぎだよ。
■ このスレッドは過去ログ倉庫に格納されています