作者neocc (neo)
看板Visual_Basic
標題[VBA ] 列出矩陣內所有排列組合的值
時間Sat Nov 10 14:53:18 2012
請問我要怎麼列印出矩陣裡面的值 所有排列組合的狀況呢?
ex: M={(1,2),(3,4)} 印出 col1 col2
row1 1 2
row2 1 4
row3 3 2
row4 3 4
共有四種 印到儲存格裡面
M={(1,2),(3,4),(5,6)} 會有9種組合
這是簡單的情況..
我的矩陣內 情形是這樣 M是7*7, 裡面會有0值與非零值 以下是舉例
M={(1,2,0,0..,0),(9,5,3,1,0..0),(7,6,3,0,0..0),(0,0,0...0)....(0,0,...0)}
我印出來的條件 :
1, 遇到有 組合裡面有0的就不印 例如(1,3,7,0,0,0,0)這種組合
==========如果能達到第一條件寫出這樣小弟已經很佩服..以下是附加條件
2, (1,2,x,y,z,a,b),和 (2,1,x,y,z,a,b)這種組合 是一樣的
(第1和2數字互調視為相同)
3, (1,x,y,2,z,a,b),和 (2,x,y,1,z,a,b)這組合 是不一樣的
就是第一, 第二數字 彼此互調 視為相同組合
其他位置的數字互調 都算不同組合
==========全部達到的話我覺得是神人了>< 我想超久阿!!
想了好久...想不出來= =
敬請高手幫忙!!!
--
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 123.193.71.35
※ 編輯: neocc 來自: 123.193.71.35 (11/10 15:06)
※ 編輯: neocc 來自: 123.193.71.35 (11/10 15:12)
※ 編輯: neocc 來自: 123.193.71.35 (11/10 15:15)
1F：推 chrisjon:把第1和2個字排列，然後check 1和2 有沒有相同 這樣呢? 11/10 19:17
2F：→ yauhh:最前面row1有寫錯嗎? 1 2 ?? 11/10 21:59
3F：→ MOONRAKER:想了好久 想到了什麼 寫出來瞧瞧 11/10 22:37
4F：→ MOONRAKER:這個元素檢查簡單得很。湊元素排列還難一點。 11/10 22:42
5F：→ neocc:謝謝各位^^ 11/11 00:20