[問題] 矩陣取代元素問題

看板Mathematica作者 (TOEFL_5!)時間12年前 (2012/09/23 20:56), 編輯推噓0(0022)
留言22則, 3人參與, 最新討論串1/1
f1 = Table[,{i,1,10,1},{i,1,10,1}] ; Do[ Do[ Q = Replace[f1,i,{i,j}] ,{i,1,10,1} ] ,{j,1,10,1} ] 可是Q跑出來都顯示 Null... 為什麼會這樣@@?... -- -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 111.248.161.7

09/23 20:57, , 1F
可是打在Do迴圈外面就可以作取代動作
09/23 20:57, 1F

09/23 21:00, , 2F
你的f1的index怎麼兩個都是i??
09/23 21:00, 2F

09/23 21:01, , 3F
可是跑出來會產生一個方陣@@
09/23 21:01, 3F

09/23 21:02, , 4F
我覺得那個應該只是個dummy variable
09/23 21:02, 4F

09/23 21:06, , 5F
Mathematica 的matrix 裡面的元素要迴圈取代真的好麻煩QQ
09/23 21:06, 5F

09/23 21:09, , 6F
Replace用法看起來怪怪的
09/23 21:09, 6F

09/23 21:11, , 7F
怎說@@,但是獨立開的的就不會這樣耶...
09/23 21:11, 7F

09/23 21:13, , 8F
一來你的f1應該是個10x10的Null矩陣
09/23 21:13, 8F

09/23 21:13, , 9F
二來你並沒有說要把這個Null取代成什麼
09/23 21:13, 9F

09/23 21:15, , 10F
有阿,我說f1,在(i,j)位置的元素用i取代值
09/23 21:15, 10F

09/23 21:16, , 11F
看help的用法 好像要有個箭頭?!
09/23 21:16, 11F

09/23 21:19, , 12F
另外一個是迴圈中每次都是取代f1 可是取代後的結果沒有存到
09/23 21:19, 12F

09/23 21:20, , 13F
給下一次使用所以看起來你最後的Q矩陣應該是只有{10,10}的位
09/23 21:20, 13F

09/23 21:21, , 14F
置是10 其他還是Null
09/23 21:21, 14F

09/23 21:22, , 15F
感謝chtm大大的指點!!給我一個當頭棒喝!!
09/23 21:22, 15F

09/23 22:00, , 16F
f1 = Table[{i, j}, {i, 10}, {j, 10}]
09/23 22:00, 16F

09/23 22:00, , 17F
f1[[#]][[All, 1]] & /@ Range[10]
09/23 22:00, 17F

09/23 22:00, , 18F
Map[#[[1]] &, f1, {2}]
09/23 22:00, 18F

09/23 22:00, , 19F
f1 /. {i_, j_} :> i
09/23 22:00, 19F

09/23 22:00, , 20F
Table[i, {i, 10}, {j, 10}]
09/23 22:00, 20F

09/23 22:02, , 21F
既然要學Mathematica,盡量少用Do While For這些函數
09/23 22:02, 21F

09/23 23:51, , 22F
是喔QQ...
09/23 23:51, 22F
文章代碼(AID): #1GNmRlMj (Mathematica)
文章代碼(AID): #1GNmRlMj (Mathematica)