トップページ⇒math
973コメント287KB

〓 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
02632612008/12/17(水) 13:05:12
>>262
グラフを使って最小費用流問題をPrimal-Dual法で解きたいのですが
残余ネットワークの生成の仕方が分からないということです
0264132人目の素数さん2008/12/17(水) 23:17:02
>>263
それは >>262 の質問に対する答えに全くなってないよ。

「どういう実装」と聞いているのは、例えばどのようにデータを管理しているか、
とか、そういうことを聞いている(グラフをどう持っているかとか)。

「どの部分」と聞いているのは、残余ネットワークの定義が分からないのか、
残余ネットワークを数式でどう表したらいいかわからないのか、
定義も式も分かっているけど Mathematica での書き方が分からないのか、
とかそういうのを聞いている。
02652612008/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];


02662612008/12/18(木) 19:32:15
連投失礼します
残余ネットワークのどの部分が分からないかということに関しては
「残余ネットワークを数式でどう表したらいいかが分からない」です。

あともう一つ分からない所があるのですが、mathematicaのグラフの辺に
2つ以上の重みをつけることは可能なのでしょうか?
質問ばかりで申し訳ないですがよろしくお願いします
0267132人目の素数さん2008/12/18(木) 22:26:05
>>266
数式で書けない限りMathematicaでも書けない。
その部分は教科書なり何なりで勉強してらっしゃい。

二種類以上の重みは、「重みのペア」を一つの重みだと考えればいいよ。
02682612008/12/20(土) 02:34:50
>>267 お返事ありがとうございます。
もう少し自分で勉強してがんばってみます。
0269132人目の素数さん2008/12/20(土) 15:49:35
%ってひとつ前の出力だけど、
ひとつ前でなくてひとつ上の出力を参照する記号はありますか?
ctrl+shift+Lではなくて%みたいに短いと見やすいんですが、
%で繋いでドンドン積んでいって途中で間違えるとやり直すのが面倒だよぬ
0270132人目の素数さん2008/12/21(日) 01:56:56
%1など、n番前の出力結果というのがあるよ。
0271132人目の素数さん2008/12/21(日) 11:24:15
%1, %2などは、n番前ということではなく、n番目の出力結果なので、それでいいはず。
http://reference.wolfram.com/mathematica/ref/Out.html

でも、何度も使うようだったら、変数に記憶しておくほうがいいよ。
02722692008/12/21(日) 13:31:33
みなさんレスありがとう。使ってみます
0273132人目の素数さん2008/12/21(日) 22:07:49
7でアンドゥは立派になった?
0274132人目の素数さん2008/12/22(月) 16:40:24
6でフロントエンドのパーサがおかしくなった時は
新しいセルに手で打ち直すしかないのかな?
0275132人目の素数さん2008/12/22(月) 20:25:36
ドキュメントセンターのもっさり感は7で改善された?
0276132人目の素数さん2008/12/23(火) 13:14:39
みんな7に興味津々w
0277やんやん ◆jReFkq.CTY NGNG?2BP(0)
だって無料セミナー受けちゃったんだもん。
0278132人目の素数さん2008/12/23(火) 16:24:17
cpuの片方占領して重くなるのは何とかしてほしい
0279132人目の素数さん2008/12/23(火) 22:43:58
新しいバージョンだもん
もちろんバグがてんこ盛りだよん!
0280132人目の素数さん2008/12/26(金) 16:30:01
n番目の完全数を返す関数だと思うのですが4以上を入力すると上手くいきません
関数自体を自分で書き換えるしかないでしょうか?
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
>>280
動かしてないが見た感じ定義をそのまんま書いたっぽい
再帰が深すぎるんじゃない?
再帰の限界を環境変数でいぢればいい
0283132人目の素数さん2008/12/27(土) 17:28:10
平均m, 項数Nの二項分布をN→∞でポアソン分布になるという計算を
させようとしたのですが、

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
KETpic という、Mathematica の図を picture 環境にできる
ソフトがあるのはこの掲示板でも何回か見たので使ってみた
のですが、横軸の 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:59
>>283
ver6だと求まったよ
0286132人目の素数さん2008/12/30(火) 12:34:10
7が出るってメールが来たから何かと思ったら、ベクトルの可視化ってあの程度の事か。
わざわざやる需要あんの?
0287132人目の素数さん2008/12/30(火) 19:58:52
ver6がいかにも未完成だったから完成度を高めてくれるだけも意味がある。
0288132人目の素数さん2008/12/30(火) 19:59:24
× だけも
○ だけでも
0289132人目の素数さん2008/12/30(火) 21:03:43
いや、
さらにバグ増加です
0290132人目の素数さん2008/12/30(火) 21:49:39
結局、7はどうなの?インストする価値あり?
0291132人目の素数さん2008/12/30(火) 21:56:51
まずは買ってから悩めよw
0292132人目の素数さん2008/12/31(水) 04:16:20
プレミア だから
無料でくれるらしい
0293132人目の素数さん2008/12/31(水) 07:05:43
>>292
俺もプレミア入ってるがそんな案内まだきてないぞ?
どこの代理店?日本電子計算?HULINKS?
0294132人目の素数さん2009/01/01(木) 18:16:35
おれんとこにはwolfram researchから直接日本語のメールが来た。
0295 【小吉】 【623円】 2009/01/01(木) 22:07:00
「ぐだぐだ言わずに買わんかい!」って内容か
0296132人目の素数さん2009/01/02(金) 02:33:28
いや
「バージョンアップできるのは二つ前までで終わりだ
 二つ前はマイナーを入れて数えるんだぞ」
って奴
0297132人目の素数さん2009/01/07(水) 19:14:52
7の日本語版でたな。
英語版から1ヶ月経たずに出すとは翻訳チームもなかなかのもの。
ただし、誤字脱字やふさわしくない翻訳も散見されるが。

んで、肝心の内容はというと、俺に言わせれば素晴らしいの一言。
きれいなグラフがサクッと作れるし、並列計算機能が標準搭載されるようになったし。
個人的にびっくりした機能が数列を何項か与えると一般項を返す関数。
数列データベースを参照してるとのことで、例えばn次元球の体積だと
5項ではだめだけど6項与えたら一般項をちゃんと求めてきた。すごい。
0298132人目の素数さん2009/01/08(木) 20:09:04
それはすごい。クイズ解くのも楽になるなw
0299132人目の素数さん2009/01/08(木) 23:54:32
テーラー展開の一般項を求めるのにも使えそうだな。
0300132人目の素数さん2009/01/09(金) 00:25:49
Reduce関数も強化されてる?
0301132人目の素数さん2009/01/09(金) 11:00:09
誰か、mathematicaの起動時のメニューバーの長さを変更する方法を教えてくれ。
0302132人目の素数さん2009/01/09(金) 18:34:39
しごく
0303132人目の素数さん2009/01/09(金) 21:02:05
>>299
それ専用の関数がある
http://reference.wolfram.com/mathematica/ref/SeriesCoefficient.html
0304132人目の素数さん2009/01/09(金) 21:58:47
新機能、楽しそうなものが豊富じゃないか。
年度末調整で買うか。
0305132人目の素数さん2009/01/09(金) 22:58:17
torrentであるだろ。日本語版はどうかしらんが。
0306132人目の素数さん2009/01/09(金) 23:24:47
少しでも開発者にフィードバックするためにお金を払って買いたいよね。
0307132人目の素数さん2009/01/10(土) 02:50:26
それは賛成する
しかしアクティベーションがうざい
0308132人目の素数さん2009/01/11(日) 00:10:35
再インストールしたら使えなくなった。
0309132人目の素数さん2009/01/11(日) 03:33:50
数十万のソフトだからなあ。torrentでおとして万一ばれたら怖い。
0310132人目の素数さん2009/01/11(日) 10:50:41
そういえばv7のインストール時に
シングルローカルライセンスかネットワークライセンスを
聞いてこないや。
これが原因か?
0311132人目の素数さん2009/01/11(日) 14:24:10
これって?
0312132人目の素数さん2009/01/12(月) 06:07:42
むしろ数十万だからじゃないか?
0313132人目の素数さん2009/01/12(月) 17:36:15
Mathematica Lightバージョンとか、計算機能を一部制限して、安いのが出ればいいね。
20000円とか
0314132人目の素数さん2009/01/12(月) 17:42:59
学生なら生協で買えばそれくらいの値段だろ?
社会人?
0315132人目の素数さん2009/01/12(月) 17:50:37
学生で買う奴いるんだろうか。大抵、学校のパソコンに入ってるだろ。
0316132人目の素数さん2009/01/12(月) 18:15:28
だったら母校の生協いって買えばいんじゃね!?
0317132人目の素数さん2009/01/12(月) 18:43:25
パッケージで売ってるんだっけ?
0318132人目の素数さん2009/01/12(月) 19:52:39
売ってる
要組合員証
0319132人目の素数さん2009/01/14(水) 23:51:02
v7はかなり良い!

v4-もっさり
v5-やや改善
v5.2-サクサク!
v6-もっさり&メモリ消費
v7-高機能でサクサク!

これで、5.2&6.0両方使いだったが、v7だけに移行できる。
0320132人目の素数さん2009/01/15(木) 00:04:59
レポありがとう。やっとbtで落としたマテマテカをインストールする決心がついたよ。
週末に一念発起してインストする。
0321132人目の素数さん2009/01/15(木) 00:39:21
btって日本語あるか?
0322132人目の素数さん2009/01/16(金) 08:15:55
btのってstudent.verじゃないのであるっけ?
0323132人目の素数さん2009/01/16(金) 17:59:32
こんどのは日本語版を買う価値がある
ヘルプの日本語はよくできてる
0324132人目の素数さん2009/01/16(金) 18:01:46
やっぱ落とすやつのが多いのかw
そりゃそうだよな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:55
古いバージョンいれてると
v7入らないっぽい。
OS再インストールしないとだめかも。
0330132人目の素数さん2009/01/17(土) 00:50:59
Windows7β1にVer.7入れたらきちんと動いた
autorunのファイルでトロイを感知した
拾ってきたやつだからかなw
0331132人目の素数さん2009/01/17(土) 13:58:20
v7の学生価格っていくらでしょうか?
どなたかご存じですか?

生協で聞けば教えて
もらえるんでしょうか?
0332132人目の素数さん2009/01/17(土) 16:15:41
アクティベーションはクラックされないの?
0333132人目の素数さん2009/01/17(土) 17:01:22
不正使用に関する話は別のところでやってくれ
0334132人目の素数さん2009/01/17(土) 19:17:13
>>333
おれは学生だっつーの!
0335132人目の素数さん2009/01/17(土) 19:18:23
やはりMathematica使うのやめるわ。
Mathematica使ってるのって
思い出してみると、>>333のような
馬鹿ばっかりだもん。
0336132人目の素数さん2009/01/17(土) 19:40:11
>329
ver6と一緒に入れているけど、うちの環境では大丈夫。

ver6+画像処理アプリを使っており、ver7で統合されたのは良いのだが、コマンド名が結構変わっている・・・
同じコマンド名のものは2重定義されているとエラー出るし、アプリ部分は結構書き換えが必要。

それでもver6+アプリよりは快適なので、この際ver7に乗り換える!
0337132人目の素数さん2009/01/18(日) 16:19:30
Maxima使えばいいのに
0338132人目の素数さん2009/01/18(日) 17:19:15
Mathematicaの6,7 によって
わざわざMaximaなんてものを使う意味は無くなった

金出す価値がある
0339132人目の素数さん2009/01/18(日) 18:03:54
論文中の式の検証につかったりするので
商用のほうが若干安心できるんだよね.気持ちの問題が大きいけど.
0340132人目の素数さん2009/01/18(日) 18:19:35
企業がOracle使いたがるのと同じかw
0341132人目の素数さん2009/01/18(日) 18:45:40
>>336
画像処理アプリって何?ウルフラムが画像処理専用のアプリを出してるのか?
リンクはってくれ

>>339
研究者だったら所属する大学か組織が買ってくれないのか?
0342132人目の素数さん2009/01/18(日) 18:52:32
>>341
もちろん研究室でも買ってるよ。
0343132人目の素数さん2009/01/18(日) 19:01:30
       l  l    `′       ,、   `ー'´ / ヽ /`ヽ
        /  /          /フ | |  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
大学生協はv7の代理店じゃなくなるんだね。
どこが代理店になるんだろ?
価格上がっていくのかな?
0345132人目の素数さん2009/01/18(日) 22:44:05
v7からはダウンロード販売になるんだね!
0346132人目の素数さん2009/01/19(月) 01:34:36
>>344-345
ソースは何?
ほとんどの大学はMathematica導入してるから
生協が代理店じゃなくなったら、他の代理店はウハウハだな
日本電子計算とヒューリンクスぐらいしかないだろ
0347132人目の素数さん2009/01/19(月) 03:06:11
>>346
ネットで検索してみてください。
どこも代理店契約は今年の3月で終わります。

ただ、代理店じゃなくなっても販売は
継続すると生協のHPには書いてありますけど。

やはり今後はDL販売がメインになるみたいです。
StudentバージョンもDLで購入できるようですね。
0348132人目の素数さん2009/01/19(月) 03:22:13
>>347
学生かどうかの判断はどこでするんだろう?
0349132人目の素数さん2009/01/19(月) 12:02:07
学生証うp?
0350132人目の素数さん2009/01/20(火) 18:44:01
なんとなくパッケージであのスパイキーを拝まないと買った気になれないよな
生協の代理店契約が切れるからって、DL販売がメインになるなんてことはないだろ
そもそもDL販売なんてものに代理店なんて必要ないし
ウルフラムとの直接のやりとりなんだから
ということはやっぱり国内の大手代理店と契約することになるんじゃないか?
0351132人目の素数さん2009/01/20(火) 22:07:24
Mathematicaを全部日本語で購入できるようになればもっと売り上げが上がるだろうに
0352132人目の素数さん2009/01/20(火) 22:13:42
購入できないんだっけ?代理店通しても
つうか、Mathematica使える人は、購入するぐらいの英語は使えるだろ。
0353132人目の素数さん2009/01/21(水) 13:02:49
もしそうならわざわざ日本語のヘルプ作ったりしない
0354132人目の素数さん2009/01/21(水) 13:09:25
あ、購入するぐらいの、か
それでも敷居が低いに越したことは無いだろう
「どうしても欲しい」人は多少のことは何とかするだろうが
「なんとなく欲しいかな」ぐらいの人にとっては障壁は低ければ低いほどいい
0355132人目の素数さん2009/01/21(水) 20:14:17
生協が去れば
日本電子計算とヒューリンクスだけか
線香はだめだし
0356132人目の素数さん2009/01/22(木) 03:19:33
試しに拾ってきたものをインストールしてみたのですが、ライセンス番号・MathID を入力する画面になりません。
パスワードは keygen.exe があったので、これで作ると思うんですけど。
私は WAREZ 的なものはあまり詳しくないので分かりません。
これでは安心して購入できません。
教えてください。
0357132人目の素数さん2009/01/22(木) 08:17:19
>>352
ヨドバシカメラで売ってるよ。
(うちの近くのヨドバシには置いてあった)
0358132人目の素数さん2009/01/22(木) 08:22:23
あ、悪い。
うちの近くはビックカメラだった。
0359132人目の素数さん2009/01/22(木) 18:52:12
>>356

落ちているのはニセ物だよ
今回のは買わないとダメなのさ

0360132人目の素数さん2009/01/22(木) 20:31:59
一般用を一番安く買おうとしたらこの辺?
http://item.rakuten.co.jp/plusyu/4988727009970/
HULINKSは定価しか乗せてないけど、見積もり取ったら幾らぐらいに
なるんだろ。
0361132人目の素数さん2009/01/23(金) 03:38:05
3元連立2階非線形偏微分方程式ってマスマティカで解けますか?
解けるソフト教えてください。
0362132人目の素数さん2009/01/23(金) 04:21:04
そんなもの一般には解析的には解けないでしょ。
Mathematicaはある程度の範囲のものは解いてくれるけど、
それ以上は高望みしすぎだよ。
■ このスレッドは過去ログ倉庫に格納されています