zhangyiss/feedgnuplot
1
0
Fork 0
mirror of https://github.com/dkogan/feedgnuplot.git synced 2025-05-05 22:11:12 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

added "tuplesize" tests

Browse Source
This commit is contained in:
Dima Kogan 2021-02-08 23:03:15 -08:00
parent f1901ecde1
commit c9384f5f63
3 changed files with 91 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

39
t/error-bars-using-tuplesize-tuplesizeall.ref Normal file
View File

@ -0,0 +1,39 @@
+-------------------------------------------------------------------------------------------+
| + + + + + + + |
| |
| |
5 |-+ +-|
| |
| |
| *|
| *** |
| * |
|# * |
4 |#+ A +-|
|# * |
| * |
| *** |
| |
| *** |
| # # * |
3 |-+ #########B## A +-|
| # # * |
| *** |
| |
| |
| |
| *** # # |
2 |-+ A ##############B### +-|
| * # # |
| *** |
| |
| |
| |
| # # |
1 |*+ ##################B##### +-|
|* # # |
| |
| + + + + + + + |
+-------------------------------------------------------------------------------------------+
1 1.5 2 2.5 3 3.5 4 4.5 5

39
t/error-bars-using-tuplesize.ref Normal file
View File

@ -0,0 +1,39 @@
5.5 +-----------------------------------------------------------------------------------------+
| + + + + + + + |
| |
| |
5 |-+ +-|
| |
| |
4.5 |-+ +*|
| *** |
| * |
| * |
4 |-+ A +-|
| * |
| * |
3.5 |-+ *** +-|
| |
| *** |
| * |
3 |-+ A +-|
| * |
| *** |
| |
2.5 |-+ +-|
| |
| *** |
2 |-+ A +-|
| * |
| *** |
| |
1.5 |-+ +-|
| |
| |
1 |*+ +-|
|* |
| |
| + + + + + + + |
0.5 +-----------------------------------------------------------------------------------------+
1 1.5 2 2.5 3 3.5 4 4.5 5

14
t/plots.t
View File

@ -39,7 +39,7 @@ BEGIN {
}
}
use Test::More tests => 58;
use Test::More tests => 60;
use File::Temp 'tempfile';
use IPC::Run 'run';
use String::ShellQuote;
@ -163,6 +163,11 @@ tryplot( testname => 'Error bars (using rangesizeall)',
qw(--rangesizeall 2 --with errorbars)],
refplot => 'error-bars-using-rangesizeall.ref' );
tryplot( testname => 'Error bars (using tuplesize)',
cmd => q{seq 5 | gawk '{print $1,$1,$1/10}'},
options => [qw(--domain),
qw(--tuplesizeall 3 --with errorbars)],
refplot => 'error-bars-using-tuplesize.ref' );
tryplot( testname => 'Error bars (using rangesize, rangesizeall)',
cmd => q{seq 5 | gawk '{print $1,"vert",$1,$1/10,"horiz",5-$1,$1-$1/5,$1+$1/20}'},
@ -171,6 +176,13 @@ tryplot( testname => 'Error bars (using rangesize, rangesizeall)',
qw(--xmin 1 --xmax 5 --ymin 0.5 --ymax 5.5)],
refplot => 'error-bars-using-rangesize-rangesizeall.ref' );
tryplot( testname => 'Error bars (using tuplesize, tuplesizeall)',
cmd => q{seq 5 | gawk '{print $1,"vert",$1,$1/10,"horiz",5-$1,$1-$1/5,$1+$1/20}'},
options => [qw(--domain --dataid),
qw(--tuplesize vert 3 --tuplesizeall 4 --with xerrorbars --style vert), 'with errorbars',
qw(--xmin 1 --xmax 5 --ymin 0.5 --ymax 5.5)],
refplot => 'error-bars-using-tuplesize-tuplesizeall.ref' );
SKIP:
{