np/embddr-scheme-library
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Exact numbers is not supported by gnuplot. Fix it

Browse Source
This commit is contained in:
Nikolay Puzanov 2024-06-06 12:48:19 +03:00
parent 1487382015
commit 53408f7bdf
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
embddr/gnuplot.scm
View File

@ -66,7 +66,10 @@
(lambda () (lambda ()
(for-each (for-each
(cut >> <>) (cut >> <>)
(map (lambda (sample) (string-join (map (cut format #f "~a" <>) sample) " ")) (map (lambda (sample) (string-join (map
(lambda (x) (number->string
(exact->inexact x)))
sample) " "))
(apply zip (cons ((first plots) 'x) (apply zip (cons ((first plots) 'x)
(map (lambda (plot) (plot 'y)) plots))))))) (map (lambda (plot) (plot 'y)) plots)))))))
(close-port file-port) (close-port file-port)