[問題] 多維矩陣內取非零元素

看板Mathematica作者 (TOEFL_5!)時間12年前 (2012/09/24 00:31), 編輯推噓0(005)
留言5則, 1人參與, 最新討論串1/1
請問有這種方法嗎QQ... ArrayRules 排列方法又好奇怪... 例如 m = {{{1,2},{0,0}},{{0,0},{4,5}},{{3,4},{0,0}},...} 用ArrayRules 會產生一堆奇怪的List...還會重複給... 不知道有沒有一種指令Q Q[m] Q = {{1,2},{4,5},{3,4},...} @@? -- -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 111.248.161.7

09/24 08:30, , 1F
Q[m_?EvenQ] := Partition[Range[m], 2]
09/24 08:30, 1F

09/24 08:30, , 2F
Q[10]
09/24 08:30, 2F

09/24 08:31, , 3F
Partition還有很多好用的用法,?Partition
09/24 08:31, 3F

09/24 09:18, , 4F
上面好像文不對題,sorry
09/24 09:18, 4F

09/24 09:21, , 5F
Q[m_]:= Cases[m,{i_,j_}/;i!=0&&i!=0,Infinity]
09/24 09:21, 5F
文章代碼(AID): #1GNpbu1m (Mathematica)
文章代碼(AID): #1GNpbu1m (Mathematica)