[問題] 我的perl不會算數?

看板Perl作者 (HOW)時間13年前 (2010/12/25 15:56), 編輯推噓3(301)
留言4則, 4人參與, 最新討論串1/2 (看更多)
原po設了一個雜湊,是希望把每一種胺基酸(key)對應到它的hydrophobicity(value), %hpho=( "I"=> 4.5,"V"=> 4.2,"L"=> 3.8,"F"=> 2.8,"C"=> 2.5, "M"=> 1.9,"A"=> 1.8,"G"=> -0.4,"T"=> -0.7,"W"=> -0.9, "S"=> -0.8,"Y"=> -1.3,"P"=> -1.6,"H"=> -3.2,"Q"=> -3.5, "E"=> -3.5,"D"=> -3.5,"N"=> -3.5,"K"=> -3.9,"R"=> -4.5, ); 在這之前, 原po一直生出一組9個胺基酸的短序列, 然後再依據剛剛說的雜湊, 把9個胺基酸的hydrophobicity加總起來, 可是...... 雖然有正負之別, 但明明都是小數點下一位的加總, 9個hydrophobicity加總之後居然有1.33227e-015 等等少數幾個不可能的答案, 而多數的答案卻又都正常。 真相在這:http://ppt.cc/ySPj 請問有可能是哪裡出的問題呢? -- ※ 發信站: 批踢踢實業坊(ptt.cc) ※ 編輯: kzvito 來自: 120.126.33.164 (12/25 15:57)

12/25 20:13, , 1F
有沒有可能因為答案是0 ?
12/25 20:13, 1F
但是我手算(其實是計算機算)的結果是"-1"......

12/25 23:04, , 2F
用 Math::BigFloat 看看?
12/25 23:04, 2F

12/25 23:40, , 3F
先用整數加總再除以10看看結果吧,不過應該是浮點數誤差
12/25 23:40, 3F

12/26 14:48, , 4F
有辦法附上程式碼嗎?
12/26 14:48, 4F
謝謝大家的建議, 我想我先試試看frank大的建議, 對我來說程度上比較適合。 另外我也把程式碼回文在下一篇, 因為原po還是新手, 希望大家可以賜教。 ※ 編輯: kzvito 來自: 111.235.195.181 (12/26 17:41)
文章代碼(AID): #1D5QERGN (Perl)
文章代碼(AID): #1D5QERGN (Perl)