- 1 名前：１３２人目の素数さん mailto:sage [2015/02/27(金) 10:38:04.85 ID:EbhLAWFK.net]
- _....._{{ 〃
, - ' ,..､､.ヾ{{フ'⌒`ヽ､
／ ,:', -‐‐` ´ '´⌒ヽ ヾ:､
. ,' ,'´ ,ィ ,ｨ ,' , ｀ヽ', ',-<
,' .i /|. /.| { i, i, }. }_,,）)
! | ! .,'-.{ ! !|; |`､.}ﾞ!.! |. ! ヽ.
', ', |Vｧ=､ﾞ､ ｀ﾞ､!-_:ﾄ,ﾘ', l ! | ﾞ',
ヽ､', l:!Kノ}. f:_.)iﾞi: ﾘ ! l ル
| l!iヽﾞ- ' , .!__:ﾉ ﾞ ,ﾘ l ﾘ'´
. ',|!!､ r‐┐ ｀ ノ'. /,ｲ ／￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
'i!ﾞ､ヽ､ ﾞｰ' _, ィ,:',:''´ ＜ Mathematica に関する話題はここに書いてね！
ﾞ:､ｨ､jヾｰ::: 'iﾍ .ノ',ﾘ. ＼＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
,､- '´ ヽ､ﾞ､ { ｀＞"､
/＼＼ ', } //｀ヽ
過去スレ
〓Mathematica〓
science2.2ch.net/test/read.cgi/math/985023298/
〓 Mathematica 2 〓
science3.2ch.net/test/read.cgi/math/1078534285/
〓 Mathematica 3 〓
science6.2ch.net/test/read.cgi/math/1121413040/
〓 Mathematica 四 〓
kamome.2ch.net/test/read.cgi/math/1197270001/ (鯖飛びでログ消滅)
mimizun.com/log/2ch/math/1197270001/
〓 Mathematica 5 〓
kamome.2ch.net/test/read.cgi/math/1285859504/
〓 Mathematica 伍 〓 (実質6)
wc2014.2ch.net/test/read.cgi/math/1320969748/
- 654 名前：￥ mailto:sage [2017/11/12(日) 14:21:22.07 ID:AbMINYSr.net]
- ￥
- 655 名前：￥ mailto:sage [2017/11/12(日) 14:21:39.65 ID:AbMINYSr.net]
- ￥
- 656 名前：￥ mailto:sage [2017/11/12(日) 14:21:56.49 ID:AbMINYSr.net]
- ￥
- 657 名前：￥ mailto:sage [2017/11/12(日) 14:22:14.02 ID:AbMINYSr.net]
- ￥
- 658 名前：￥ mailto:sage [2017/11/12(日) 14:22:32.20 ID:AbMINYSr.net]
- ￥
- 659 名前：￥ mailto:sage [2017/11/12(日) 14:22:50.66 ID:AbMINYSr.net]
- ￥
- 660 名前：￥ mailto:sage [2017/11/12(日) 14:23:11.78 ID:AbMINYSr.net]
- ￥
- 661 名前：￥ mailto:sage [2017/11/12(日) 14:23:32.14 ID:AbMINYSr.net]
- ￥
- 662 名前：￥ mailto:sage [2017/11/12(日) 14:23:50.88 ID:AbMINYSr.net]
- ￥
- 663 名前：￥ mailto:sage [2017/11/12(日) 14:24:15.58 ID:AbMINYSr.net]
- ￥
- 664 名前：１３２人目の素数さん mailto:sage [2017/11/12(日) 18:41:11.09 ID:I58c1yMw.net]
- >>642
そこでComplexExpandですよ。
- 665 名前：￥ mailto:sage [2017/11/13(月) 11:12:44.80 ID:tP2A7oah.net]
- ￥
- 666 名前：￥ mailto:sage [2017/11/13(月) 11:13:01.63 ID:tP2A7oah.net]
- ￥
- 667 名前：￥ mailto:sage [2017/11/13(月) 11:13:18.20 ID:tP2A7oah.net]
- ￥
- 668 名前：￥ mailto:sage [2017/11/13(月) 11:13:33.59 ID:tP2A7oah.net]
- ￥
- 669 名前：￥ mailto:sage [2017/11/13(月) 11:13:51.32 ID:tP2A7oah.net]
- ￥
- 670 名前：￥ mailto:sage [2017/11/13(月) 11:14:08.13 ID:tP2A7oah.net]
- ￥
- 671 名前：￥ mailto:sage [2017/11/13(月) 11:14:24.30 ID:tP2A7oah.net]
- ￥
- 672 名前：￥ mailto:sage [2017/11/13(月) 11:14:42.32 ID:tP2A7oah.net]
- ￥
- 673 名前：￥ mailto:sage [2017/11/13(月) 11:15:01.87 ID:tP2A7oah.net]
- ￥
- 674 名前：￥ mailto:sage [2017/11/13(月) 11:15:19.25 ID:tP2A7oah.net]
- ￥
- 675 名前：１３２人目の素数さん [2017/11/23(木) 13:32:42.42 ID:hLijP1Pt.net]
- 例えば、第 i 要素が、関数 x → x^i であるようなリストはどう作ればいいのでしょうか？
- 676 名前：￥ mailto:sage [2017/11/23(木) 13:46:59.63 ID:D/rydqaj.net]
- ￥
- 677 名前：￥ mailto:sage [2017/11/23(木) 13:47:15.79 ID:D/rydqaj.net]
- ￥
- 678 名前：￥ mailto:sage [2017/11/23(木) 13:47:30.64 ID:D/rydqaj.net]
- ￥
- 679 名前：￥ mailto:sage [2017/11/23(木) 13:47:45.69 ID:D/rydqaj.net]
- ￥
- 680 名前：￥ mailto:sage [2017/11/23(木) 13:48:01.47 ID:D/rydqaj.net]
- ￥
- 681 名前：￥ mailto:sage [2017/11/23(木) 13:48:19.60 ID:D/rydqaj.net]
- ￥
- 682 名前：￥ mailto:sage [2017/11/23(木) 13:48:38.39 ID:D/rydqaj.net]
- ￥
- 683 名前：￥ mailto:sage [2017/11/23(木) 13:48:55.03 ID:D/rydqaj.net]
- ￥
- 684 名前：￥ mailto:sage [2017/11/23(木) 13:49:13.26 ID:D/rydqaj.net]
- ￥
- 685 名前：￥ mailto:sage [2017/11/23(木) 13:49:30.92 ID:D/rydqaj.net]
- ￥
- 686 名前：１３２人目の素数さん [2017/11/23(木) 20:07:00.76 ID:5qOYMQSf.net]
- Table[x^i, {i, 1, 10}]
- 687 名前：１３２人目の素数さん [2017/11/23(木) 21:28:32.62 ID:hLijP1Pt.net]
- >>675
それは関数のリストではないですよね。
- 688 名前：１３２人目の素数さん [2017/11/23(木) 23:09:26.55 ID:Ybtb8UXa.net]
- FF[x_] :=Array[ff[x],{5}]
ff[x_][i_]:= x^i
FF[y] --->{y,y^2.y^3.y^4,y^5}
- 689 名前：￥ mailto:sage [2017/11/24(金) 01:27:15.45 ID:7RwNGOaZ.net]
- ￥
- 690 名前：￥ mailto:sage [2017/11/24(金) 01:27:33.19 ID:7RwNGOaZ.net]
- ￥
- 691 名前：￥ mailto:sage [2017/11/24(金) 01:27:50.96 ID:7RwNGOaZ.net]
- ￥
- 692 名前：￥ mailto:sage [2017/11/24(金) 01:28:08.71 ID:7RwNGOaZ.net]
- ￥
- 693 名前：￥ mailto:sage [2017/11/24(金) 01:28:26.48 ID:7RwNGOaZ.net]
- ￥
- 694 名前：￥ mailto:sage [2017/11/24(金) 01:28:44.23 ID:7RwNGOaZ.net]
- ￥
- 695 名前：￥ mailto:sage [2017/11/24(金) 01:29:02.03 ID:7RwNGOaZ.net]
- ￥
- 696 名前：￥ mailto:sage [2017/11/24(金) 01:29:19.57 ID:7RwNGOaZ.net]
- ￥
- 697 名前：￥ mailto:sage [2017/11/24(金) 01:29:37.92 ID:7RwNGOaZ.net]
- ￥
- 698 名前：￥ mailto:sage [2017/11/24(金) 01:29:53.68 ID:7RwNGOaZ.net]
- ￥
- 699 名前：１３２人目の素数さん mailto:age [2017/12/10(日) 16:22:50.14 ID:q7sw9xRM.net]
- 購入ページで，住所の入力が必要でしたが，何か郵便物が届く事があるんですか？
あれはDVDかなんかの物理媒体を注文した人の為のものですか？
- 700 名前：１３２人目の素数さん mailto:sage [2017/12/10(日) 17:41:23.18 ID:pKn40j8z.net]
- >>688
たとえば他人に譲渡に関して不正をしたら、
訴えることもできるよね。
購入者を知ることはなんにせよ基本だと思うけど。
- 701 名前：１３２人目の素数さん mailto:sage [2017/12/10(日) 17:45:29.14 ID:pKn40j8z.net]
- mathematicaも過疎ったソフトになってしまったのですか？
- 702 名前：686 mailto:age [2017/12/10(日) 18:53:37.13 ID:q7sw9xRM.net]
- >>689
何か届くとかいうことじゃない、ということでオッケーですか？
今日購入したんですが、マンション名と部屋番号を書き忘れてしまって…
- 703 名前：686 mailto:age [2017/12/11(月) 22:10:19.85 ID:PjMr7BzN.net]
- マンション名と部屋番号を追加するには
メールで連絡するしかないでしょうか？
そんなもんは別に放っておいてもいいんですか？
どなたかレスください
- 704 名前：１３２人目の素数さん [2017/12/12(火) 12:57:46.50 ID:ZWYA7jci.net]
- 多変数のテイラー多項式を計算するプログラムの例を以下に書いてください↓
- 705 名前：１３２人目の素数さん [2017/12/12(火) 13:12:02.24 ID:ZWYA7jci.net]
- 微分演算子の計算って直接サポートされていないんですか？
- 706 名前：１３２人目の素数さん [2017/12/12(火) 13:39:14.31 ID:ZWYA7jci.net]
- (x + y + z)^3 の CoefficientList の情報を利用するとかいう方法がすぐに思いつきますが。。。
- 707 名前：１３２人目の素数さん [2017/12/12(火) 13:40:08.76 ID:ZWYA7jci.net]
- (x*∂/∂x + y*∂/∂y + z*∂/∂z)^3 の場合。
- 708 名前：１３２人目の素数さん [2017/12/12(火) 22:05:25.94 ID:ZWYA7jci.net]
- たとえば、
l = {{1, 2}, {3, 4}}
というリストと
i = {1, 2}
というリストがあったときに、
l[[1, 2]]
の値を取り出すのに、 i を使って取り出す方法はありますか？
- 709 名前：１３２人目の素数さん [2017/12/12(火) 22:14:28.66 ID:ZWYA7jci.net]
- あ、Extractですね。
- 710 名前：１３２人目の素数さん [2017/12/12(火) 22:53:51.78 ID:ZWYA7jci.net]
- 関数を入力すると入力した関数がとる引数の個数を返すような関数はどうやって作ればいいのでしょうか？
- 711 名前：１３２人目の素数さん [2017/12/12(火) 23:55:20.67 ID:DfQwB48T.net]
- Position[{{1,2},{3,4}},{1,2}]
- 712 名前：１３２人目の素数さん [2017/12/13(水) 00:15:13.51 ID:1Nr7f0T9.net]
- Dimensions[f[x,y,z]]
- 713 名前：１３２人目の素数さん [2017/12/13(水) 07:47:01.44 ID:mmuQWU7a.net]
- f[x_, y_] := x * y;
g[x_, y_, z_] = x * y * z;
である場合、
argumentCount[f] == 2
argumentCount[g] == 3
となるような関数 argumentCount を作りたいです。
- 714 名前：１３２人目の素数さん [2017/12/13(水) 09:44:14.09 ID:mmuQWU7a.net]
- g[x_, y_, z_]
を
Derivative[1, 2, 3][g]
と偏微分するのと同じ結果を
l == {1, 2, 3}
が与えられたときに l を使って計算したいのですが、どうすればいいですか？
- 715 名前：１３２人目の素数さん mailto:sage [2017/12/13(水) 10:08:20.33 ID:HNTprpeX.net]
- ID:ZWYA7jci
ID: mmuQWU7a
基地外臭いｗ
- 716 名前：１３２人目の素数さん [2017/12/13(水) 10:13:48.88 ID:mmuQWU7a.net]
- 解決しました。
- 717 名前：１３２人目の素数さん [2017/12/13(水) 10:57:21.09 ID:mmuQWU7a.net]
- >>693
一応できたんですが、
多変数の多項式を次数の昇順に並び替えるにはどうすればいいのでしょうか？
- 718 名前：１３２人目の素数さん [2017/12/13(水) 11:02:24.56 ID:mmuQWU7a.net]
- x^0 * y^0 < x^1 * y^0 < x^0 * y^1 < x^2 * y^0 < x^1 * y^1 < x^0 * y^2
という順序で並べ替えたいです。
- 719 名前：１３２人目の素数さん [2017/12/13(水) 12:13:07.94 ID:mmuQWU7a.net]
- 解決しました。
- 720 名前：１３２人目の素数さん [2017/12/13(水) 12:18:26.23 ID:mmuQWU7a.net]
- 単項式のリストの形ではソートできたのですが、
多項式の形でそれを構成する単項式の表示順序を変更する方法はありますか？
- 721 名前：１３２人目の素数さん [2017/12/13(水) 12:38:38.87 ID:mmuQWU7a.net]
- Mathematica で松坂和夫著『解析入門3』の p.162 問題14.2.10 を解かせてみました。
多変数の Taylor 多項式の計算です。
https://i.imgur.com/ceMoL4L.jpg
- 722 名前：１３２人目の素数さん [2017/12/13(水) 13:06:38.79 ID:1Nr7f0T9.net]
- 綺麗でなくスマートでもないが,いそいでいるので
sss = Table[{RandomInteger[{0, 2}], RandomInteger[{0, 2}]}, {10}] （＊例＊）
sr = Flatten[Table[{i, # - 1} & /@ Range[(i + j - 1)], {i, 0, 3}], 1]；
Table[Position[sss, sr[[j]]], {j, 1, sr // Length}]//Union
Flatten[%,2]
sr[[%]]
- 723 名前：￥ mailto:sage [2018/01/21(日) 01:04:51.95 ID:oUqQkvBY.net]
- ￥
- 724 名前：￥ mailto:sage [2018/01/21(日) 01:05:11.56 ID:oUqQkvBY.net]
- ￥
- 725 名前：￥ mailto:sage [2018/01/21(日) 01:05:30.12 ID:oUqQkvBY.net]
- ￥
- 726 名前：￥ mailto:sage [2018/01/21(日) 01:05:47.42 ID:oUqQkvBY.net]
- ￥
- 727 名前：￥ mailto:sage [2018/01/21(日) 01:06:05.82 ID:oUqQkvBY.net]
- ￥
- 728 名前：￥ mailto:sage [2018/01/21(日) 01:06:23.46 ID:oUqQkvBY.net]
- ￥
- 729 名前：￥ mailto:sage [2018/01/21(日) 01:06:41.43 ID:oUqQkvBY.net]
- ￥
- 730 名前：￥ mailto:sage [2018/01/21(日) 01:06:59.12 ID:oUqQkvBY.net]
- ￥
- 731 名前：￥ mailto:sage [2018/01/21(日) 01:07:17.05 ID:oUqQkvBY.net]
- ￥
- 732 名前：￥ mailto:sage [2018/01/21(日) 01:07:35.10 ID:oUqQkvBY.net]
- ￥
- 733 名前：１３２人目の素数さん mailto:sage [2018/01/21(日) 19:02:16.87 ID:F4KMMcgf.net]
- また落ちこぼれが戻ってきたか
- 734 名前：１３２人目の素数さん mailto:sage [2018/02/04(日) 18:19:29.09 ID:UVSnEAiw.net]
- b^2/a^4 を (b/a^2)^2 に変形するみたいなのってどういうコマンド使えば良いんだろ？
- 735 名前：１３２人目の素数さん mailto:sage [2018/02/06(火) 22:05:14.25 ID:/fhWuMMPh]
- 数値積分したいんだが,被積分関数の振動が激しいみたいでWorkingPrecisionとMaxRecursionの数値を大きくしても警告されるんだがこういうときどうすればええんや...積分則の問題なの？
解決策教えていただけないでしょうか...
- 736 名前：１３２人目の素数さん [2018/02/06(火) 22:21:02.68 ID:/fhWuMMPh]
- age
- 737 名前：１３２人目の素数さん mailto:sage [2018/02/26(月) 04:03:35.30 ID:MCMBGUFd.net]
- test
- 738 名前：１３２人目の素数さん mailto:sage [2018/02/26(月) 04:04:54.61 ID:MCMBGUFd.net]
- test
- 739 名前：１３２人目の素数さん [2018/03/01(木) 10:19:27.67 ID:lbQF5biV.net]
- 数値最小化で
NMinimize[目的関数、制約条件]、変数]
というとき、たとえば制約条件がλ_1＞0、λ_2＞0、・・・、λ_100＞0のとき、
λ_k＞0,{k,1,100}と表したいのですが、うまくいきません。
制約条件の数が少なければλ_1＞0、λ_2＞0、・・・でよいですが、
1個ずつ入れるには多すぎるのです。
ご教示の程よろしくお願いいたします。
- 740 名前：724 [2018/03/01(木) 10:41:53.02 ID:lbQF5biV.net]
- 自己解決したでござるよ
Tableを使って
Table[λ_k, k] >= 0, {k, 1, 100}]}
でござるな
- 741 名前：１３２人目の素数さん mailto:っっｄ [2018/03/01(木) 17:24:32.97 ID:hDu+GmUm.net]
- {(a : Blank[1]) > 0, (a : Blank[2]) > 0, (a : Blank[3]) >
0, (a : Blank[4]) > 0, (a : Blank[5]) > 0, (a : Blank[6]) >
0, (a : Blank[7]) > 0, (a : Blank[8]) > 0, (a : Blank[9]) >
0, (a : Blank[10]) > 0}
- 742 名前：１３２人目の素数さん mailto:っっｄ [2018/03/01(木) 17:55:56.
]
- [ここ壊れてます]
- 743 名前：01 ID:hDu+GmUm.net mailto: Sum[λ_k,{k,1,10}]=15
λ_k は自然数とする。
このとき解の個数を求めよ [] - [ここ壊れてます]
- 744 名前：１３２人目の素数さん mailto:sage [2018/03/01(木) 21:37:04.43 ID:Gjdrkmqo.net]
- >>731
Flatten[Permutations /@ IntegerPartitions[15, {10}], 1] // Length
-> 2002
かな。
- 745 名前：１３２人目の素数さん mailto:っっｄ [2018/03/01(木) 22:43:48.54 ID:hDu+GmUm.net]
- >>732
素晴らしいですね。
わたしは頭を使うのが苦手で
n100 = 10; A = Array[a, {n100}];
Solve[({(A // Total) == 15, Table[a[ll] > 0, {ll, 1, n100}]}) //
Flatten, A, Integers] // Length
でやりました。
貴君のほうが早く答えが出ますね。
ありがとうございました。
- 746 名前：１３２人目の素数さん mailto:sage [2018/03/20(火) 15:29:07.55 ID:+gdkzcOY.net]
- Enterキーのみで評価開始しちゃうときがあるんだけど、
これを止める方法誰かおしえてー
- 747 名前：１３２人目の素数さん mailto:sage [2018/03/20(火) 19:17:24.13 ID:Eapek+9I.net]
- >>734
シフトキー周りをエアダスターで掃除
- 748 名前：１３２人目の素数さん mailto:sage [2018/03/20(火) 23:23:46.92 ID:+gdkzcOY.net]
- >>735
掃除したけどダメでしたぁッ
- 749 名前：１３２人目の素数さん [2018/03/24(土) 22:33:23.86 ID:OYP/uuWm.net]
- キーボードを新しくしなさい。
- 750 名前：￥ mailto:sage [2018/04/06(金) 01:03:54.23 ID:I+Mybrk/.net]
- ￥
- 751 名前：￥ mailto:sage [2018/04/06(金) 01:04:13.94 ID:I+Mybrk/.net]
- ￥
- 752 名前：￥ mailto:sage [2018/04/06(金) 01:04:31.50 ID:I+Mybrk/.net]
- ￥
- 753 名前：￥ mailto:sage [2018/04/06(金) 01:04:50.26 ID:I+Mybrk/.net]
- ￥
- 754 名前：￥ mailto:sage [2018/04/06(金) 01:05:11.63 ID:I+Mybrk/.net]
- ￥
|
 |
