Re: [請益] 有辦法解方程式嗎?

看板Perl作者 (care about everyone)時間15年前 (2009/04/27 02:19), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串2/2 (看更多)
※ 引述《subtropical (風大雨大)》之銘言: : 請問版大 : 現在要處理很多多元一次方程式,看起來都是有解的,但是很難算 : 不知道perl有沒有辦法用在解方程式呢? : 舉一個正在手算的例子 : 307+208c=14d : 66.33+28d=104c+2e : 9.33+4e=14d+f : 10.67+2f=2e : 求c,d,e,f : 如果能用電腦解就好了:) 你可以考慮安裝巨大的 PDL module http://en.wikipedia.org/wiki/Perl_Data_Language 再加上 PDL::Lib::Linear::Solve http://search.cpan.org/~shlomif/PDL-Lib-Linear-Solve-0.002/ use PDL; use PDL::Lib::Linear::Solve; my $coeffs = pdl([[1,1],[0,1]]); my $values = pdl([[5],[2]]); my ($new_coeffs, $new_values) = linear_solve($coeffs, $values); Math::GSL::Linalg 也是可以考慮的模組 http://search.cpan.org/~leto/Math-GSL-0.18/pod/Linalg.pod 這裡有 Math::GSL 的 talk http://leto.net/code/Math-GSL/2008/10/mathgsl-podcast-from-pdxpm.html Yung-chung Lin -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 59.112.35.166
文章代碼(AID): #19zAMx8q (Perl)
文章代碼(AID): #19zAMx8q (Perl)