[問題] Export的精度問題

看板Mathematica作者 (若自礌)時間10年前 (2014/09/03 15:09), 編輯推噓2(2012)
留言14則, 4人參與, 最新討論串1/1
Export["x_axil.txt", Table[-1.030 + 0.005 i, {i, 1, 400}]] 我要執行上面這行程式並輸出一個陣列的文字文件 結果因為浮點數的關係後面總是會出現精度問題 請問各位高手該如何解決? -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 140.113.76.221 ※ 文章網址: http://www.ptt.cc/bbs/Mathematica/M.1409728173.A.3EA.html

09/03 16:05, , 1F
-1.030`10 ←指定這個 -1.030 有十位小數精確
09/03 16:05, 1F

09/03 16:06, , 2F
` 這個鍵在 1 的左邊
09/03 16:06, 2F

09/03 16:07, , 3F
不過這樣會印出很多零就是了...
09/03 16:07, 3F

09/03 16:08, , 4F
另一種方法是寫成分數再掛 N[], 如 N[-103/100 + 5/1000*i]
09/03 16:08, 4F

09/03 16:44, , 5F
樓上的方法我不論加`還是掛N都無效...
09/03 16:44, 5F

09/04 01:05, , 6F
唔嗯, 看來沒實際試過真的不能說死...後來試出來可行的方式
09/04 01:05, 6F

09/04 01:06, , 7F
是 4F 的方法加上指定 N 的精度, 像是這樣:
09/04 01:06, 7F

09/04 01:07, , 8F
Table[N[-103/100 + 5/1000*i, 5], {i,1,400}]
09/04 01:07, 8F

09/04 01:07, , 9F
這樣檔案裡面除了尾巴的 `5 之外應該是 OK了
09/04 01:07, 9F

09/04 02:39, , 10F
QQ不能去掉嗎,這樣感覺比原來的還醜耶
09/04 02:39, 10F

09/05 10:45, , 11F
ToString?
09/05 10:45, 11F

09/05 19:03, , 12F
樓上大大可以說的詳盡一些嗎?
09/05 19:03, 12F

09/05 22:11, , 13F
ToString[-1.030 + 0.005 i] 把數字轉為文字再輸出
09/05 22:11, 13F

09/06 21:45, , 14F
耶成功了感謝!很簡潔很美!
09/06 21:45, 14F
文章代碼(AID): #1K1hwjFg (Mathematica)
文章代碼(AID): #1K1hwjFg (Mathematica)