Write float arrays to a text file: Difference between revisions
m
Added Raven code for Write float arrays to a text file
No edit summary |
m (Added Raven code for Write float arrays to a text file) |
||
Line 883:
y <- sqrt(x)
writexy('test.txt', x, y, yp=5)</lang>
=={{header|Raven}}==
<lang Raven>3 as $xprecision
5 as $yprecision
[ ] as $results
[ 1 2 3 1e11 ] as $a
group
$a each sqrt
list as $b
# generate format specifier "%-8.3g %.5g\n"
"%%-8.%($xprecision)dg %%.%($yprecision)dg\n" as $f
define print2 use $v1, $v2, $f
$v2 1.0 prefer $v1 1.0 prefer $f format $results push
4 each as $i
$f $b $i get $a $i get print2
$results "" join "results.dat" write</lang>
{{out}}
results.dat file contains:
<pre>1 1
2 1.4142
3 1.7321
1e+11 3.1623e+05</pre>
=={{header|RLaB}}==
| |||