2012年11月22日 星期四

mathematica 陣列 放入 自訂變數函數

被括號搞死{ }

c1[{Lx_, Ly_, Lz_, beta1_, beta2_}] := (Lx*Ly*Lz)^(1/3)/beta1
c2[{Lx_, Ly_, Lz_, beta1_, beta2_}] := (Lx*Ly*Lz)^(1/3)/beta2
J3ab = {32, 32, 44, 15.25, 15.342};
J3c = {32, 32, 44, 15.25, 15.45};
J325 = {24, 24, 32, 11.35, 11.45};
J35 = {34, 34, 46, 15.95, 16.05};
J375 = {22, 22, 30, 10.22, 10.32};
J4 = {32, 32, 44, 14.48, 15.18};

c1[J3ab] 收工
但應該有更聰明的辦法

沒有留言:

張貼留言