[問題] 如何切割與分配數列

看板Mathematica作者 (空鴞)時間12年前 (2013/01/05 02:19), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串1/2 (看更多)
想問個在大家眼中可能很簡單的問題(版上的文章好多看不懂ˊˋ 如題 但應該不能只用Partition或Flatten做到 假設我一開始畫了一個30X30的數列 A = RandomChoice[{-1, 1}, {30, 30}]; s[i_, j_] := A[[i, j]]; 每個都有標號s(1,1)、s(1,2)、...、s(2,1)、...、s(30,30) 然後每個都有對應的值(1或-1) 現在我想要把格子變大但是大小不變 也就是變成10X10 新的格自各自對應的質變成本來的9個值的相加 我不知道怎麼去重新分配我的格子 舉個簡單的例子像 ┌ ┬ ┬ ┬ ┬ ┬ ┬ ┬ ┬ ┐ 1 1 1 2 2 2 3 3 3 ├ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┤ 1 1 1 2 2 2 3 3 3 ├ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┤ 1 1 1 2 2 2 3 3 3 ├ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┤ ┌ ┬ ┬ ┐ 4 4 4 5 5 5 6 6 6 09 18 27 ├ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┤ ├ ┼ ┼ ┤ 4 4 4 5 5 5 6 6 6 => 36 45 54 ├ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┤ ├ ┼ ┼ ┤ 4 4 4 5 5 5 6 6 6 63 72 81 ├ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┤ └ ┴ ┴ ┘ 7 7 7 8 8 8 9 9 9 ├ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┤ 7 7 7 8 8 8 9 9 9 ├ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┼ ┤ 7 7 7 8 8 8 9 9 9 └ ┴ ┴ ┴ ┴ ┴ ┴ ┴ ┴ ┘ 因為後來希望能跑60X60或是90X90的情況 在如何分配每個格子的問想了很久卻還是沒有想到 不知道這樣說的夠不夠清楚 懇請版上前輩指導一下 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 36.229.243.148
文章代碼(AID): #1GvnqX_r (Mathematica)
文章代碼(AID): #1GvnqX_r (Mathematica)