Re: [請益] 有辦法解方程式嗎?
※ 引述《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
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):