Re: [問題] 把不同組數據匯集在一起

看板Mathematica作者 (▽.(▽×▽φ)=0)時間8年前 (2016/03/22 01:20), 8年前編輯推噓3(303)
留言6則, 3人參與, 最新討論串2/2 (看更多)
※ 引述《qazwsx150 (魂牽孟盈)》之銘言: : 大家好,想請問一下 : 如果我有三組數值 : {x1,x2,x3,...,xn} : {y1,y2,y3,...,yn} : {z1,z2,z3,...,zn} : 我希望把他們整理成{{x1,y1,z1},{x2,y2,z2},{x3,y3,z3},...,{xn,yn,zn}} : 想問問我可以怎麼做,謝謝大家 a=Table[x[n],{n,1,4}] b=Table[y[n],{n,1,4}] c=Table[z[n],{n,1,4}] {a,b,c}//Transpose (下列為執行結果) {{x[1],y[1],z[1]},{x[2],y[2],z[2]},{x[3],y[3],z[3]},{x[4],y[4],z[4]}} Table[{a[[n]],b[[n]],c[[n]]},{n,1,4}] (下列為執行結果) {{x[1],y[1],z[1]},{x[2],y[2],z[2]},{x[3],y[3],z[3]},{x[4],y[4],z[4]}} Table[{a[[n]],b[[n]],c[[n]]},{n,1,3}] (下列為執行結果) {{x[1],y[1],z[1]},{x[2],y[2],z[2]},{x[3],y[3],z[3]}} Table[{a[[n]],b[[n]],c[[n]]},{n,2,3}] (下列為執行結果) {{x[2],y[2],z[2]},{x[3],y[3],z[3]}} Table[({a,b,c}//Transpose)[[n]],{n,2,3}] (下列為執行結果) {{x[2],y[2],z[2]},{x[3],y[3],z[3]}} -- 所謂理論,就是我們知道為什麼,但是什麼都行不通; 所謂實務,就是我們不知道為什麼,但是都行得通; 本實驗室理論與實務已經結合為一:什麼事都行不通,而且沒有人知道為什麼 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.163.106.179 ※ 文章網址: https://www.ptt.cc/bbs/Mathematica/M.1458580814.A.7D6.html ※ 編輯: Frobenius (1.163.106.179), 03/22/2016 01:25:21

03/22 03:55, , 1F
補一個 In := Table[{a, b, c}[[All, n]], {n, 2, 3}]
03/22 03:55, 1F

03/22 03:55, , 2F
Out = {{x[2], y[2], z[2]}, {x[3], y[3], z[3]}}
03/22 03:55, 2F

03/22 03:56, , 3F
在 [[]] (Part) 裡用 All 即是把那一維全部切片下來
03/22 03:56, 3F

03/22 06:27, , 4F
謝謝你喔,我等等去試試看
03/22 06:27, 4F

03/22 08:55, , 5F
考慮到其他語言的zip/pack都有支援將不同長度的list合
03/22 08:55, 5F

03/22 08:56, , 6F
並在一起的功能,可以加上PadRight
03/22 08:56, 6F
文章代碼(AID): #1My2rEVM (Mathematica)
討論串 (同標題文章)
文章代碼(AID): #1My2rEVM (Mathematica)