line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
use Moose; |
2
|
1
|
|
|
1
|
|
10
|
use MooseX::ExtraArgs; |
|
1
|
|
|
|
|
9
|
|
|
1
|
|
|
|
|
6
|
|
3
|
1
|
|
|
1
|
|
5444
|
use Moose::Util::TypeConstraints qw(enum union); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
11
|
|
4
|
1
|
|
|
1
|
|
1735
|
if ( !defined Moose::Util::TypeConstraints::find_type_constraint('PDL') ) { |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
6
|
|
5
|
|
|
|
|
|
|
Moose::Util::TypeConstraints::type('PDL'); |
6
|
|
|
|
|
|
|
} |
7
|
|
|
|
|
|
|
|
8
|
|
|
|
|
|
|
our $VERSION = '0.042'; # VERSION |
9
|
|
|
|
|
|
|
|
10
|
|
|
|
|
|
|
# ABSTRACT: This attribute is one of the possible options for the trace funnel. |
11
|
|
|
|
|
|
|
|
12
|
|
|
|
|
|
|
my $self = shift; |
13
|
|
|
|
|
|
|
my $extra_args = $self->extra_args // {}; |
14
|
0
|
|
|
0
|
1
|
|
my $meta = $self->meta; |
15
|
0
|
|
0
|
|
|
|
my %hash = %$self; |
16
|
0
|
|
|
|
|
|
for my $name ( sort keys %hash ) { |
17
|
0
|
|
|
|
|
|
my $attr = $meta->get_attribute($name); |
18
|
0
|
|
|
|
|
|
if ( defined $attr ) { |
19
|
0
|
|
|
|
|
|
my $value = $hash{$name}; |
20
|
0
|
0
|
|
|
|
|
my $type = $attr->type_constraint; |
21
|
0
|
|
|
|
|
|
if ( $type && $type->equals('Bool') ) { |
22
|
0
|
|
|
|
|
|
$hash{$name} = $value ? \1 : \0; |
23
|
0
|
0
|
0
|
|
|
|
} |
24
|
0
|
0
|
|
|
|
|
} |
25
|
|
|
|
|
|
|
} |
26
|
|
|
|
|
|
|
%hash = ( %hash, %$extra_args ); |
27
|
|
|
|
|
|
|
delete $hash{'extra_args'}; |
28
|
0
|
|
|
|
|
|
if ( $self->can('type') && ( !defined $hash{'type'} ) ) { |
29
|
0
|
|
|
|
|
|
$hash{type} = $self->type(); |
30
|
0
|
0
|
0
|
|
|
|
} |
31
|
0
|
|
|
|
|
|
return \%hash; |
32
|
|
|
|
|
|
|
} |
33
|
0
|
|
|
|
|
|
|
34
|
|
|
|
|
|
|
has dtickrange => ( |
35
|
|
|
|
|
|
|
is => "rw", |
36
|
|
|
|
|
|
|
isa => "ArrayRef|PDL", |
37
|
|
|
|
|
|
|
documentation => |
38
|
|
|
|
|
|
|
"range [*min*, *max*], where *min*, *max* - dtick values which describe some zoom level, it is possible to omit *min* or *max* value by passing *null*", |
39
|
|
|
|
|
|
|
); |
40
|
|
|
|
|
|
|
|
41
|
|
|
|
|
|
|
has enabled => ( |
42
|
|
|
|
|
|
|
is => "rw", |
43
|
|
|
|
|
|
|
isa => "Bool", |
44
|
|
|
|
|
|
|
documentation => |
45
|
|
|
|
|
|
|
"Determines whether or not this stop is used. If `false`, this stop is ignored even within its `dtickrange`.", |
46
|
|
|
|
|
|
|
); |
47
|
|
|
|
|
|
|
|
48
|
|
|
|
|
|
|
has name => ( |
49
|
|
|
|
|
|
|
is => "rw", |
50
|
|
|
|
|
|
|
isa => "Str", |
51
|
|
|
|
|
|
|
documentation => |
52
|
|
|
|
|
|
|
"When used in a template, named items are created in the output figure in addition to any items the figure already has in this array. You can modify these items in the output figure by making your own item with `templateitemname` matching this `name` alongside your modifications (including `visible: false` or `enabled: false` to hide it). Has no effect outside of a template.", |
53
|
|
|
|
|
|
|
); |
54
|
|
|
|
|
|
|
|
55
|
|
|
|
|
|
|
has templateitemname => ( |
56
|
|
|
|
|
|
|
is => "rw", |
57
|
|
|
|
|
|
|
isa => "Str", |
58
|
|
|
|
|
|
|
documentation => |
59
|
|
|
|
|
|
|
"Used to refer to a named item in this array in the template. Named items from the template will be created even without a matching item in the input figure, but you can modify one by making an item with `templateitemname` matching its `name`, alongside your modifications (including `visible: false` or `enabled: false` to hide it). If there is no template or no matching item, this item will be hidden unless you explicitly show it with `visible: true`.", |
60
|
|
|
|
|
|
|
); |
61
|
|
|
|
|
|
|
|
62
|
|
|
|
|
|
|
has value => ( is => "rw", |
63
|
|
|
|
|
|
|
isa => "Str", |
64
|
|
|
|
|
|
|
documentation => "string - dtickformat for described zoom level, the same as *tickformat*", |
65
|
|
|
|
|
|
|
); |
66
|
|
|
|
|
|
|
|
67
|
|
|
|
|
|
|
__PACKAGE__->meta->make_immutable(); |
68
|
|
|
|
|
|
|
1; |
69
|
|
|
|
|
|
|
|
70
|
|
|
|
|
|
|
|
71
|
|
|
|
|
|
|
=pod |
72
|
|
|
|
|
|
|
|
73
|
|
|
|
|
|
|
=encoding utf-8 |
74
|
|
|
|
|
|
|
|
75
|
|
|
|
|
|
|
=head1 NAME |
76
|
|
|
|
|
|
|
|
77
|
|
|
|
|
|
|
Chart::Plotly::Trace::Funnel::Marker::Colorbar::Tickformatstop - This attribute is one of the possible options for the trace funnel. |
78
|
|
|
|
|
|
|
|
79
|
|
|
|
|
|
|
=head1 VERSION |
80
|
|
|
|
|
|
|
|
81
|
|
|
|
|
|
|
version 0.042 |
82
|
|
|
|
|
|
|
|
83
|
|
|
|
|
|
|
=head1 SYNOPSIS |
84
|
|
|
|
|
|
|
|
85
|
|
|
|
|
|
|
use Chart::Plotly; |
86
|
|
|
|
|
|
|
use Chart::Plotly::Plot; |
87
|
|
|
|
|
|
|
use JSON; |
88
|
|
|
|
|
|
|
use Chart::Plotly::Trace::Funnel; |
89
|
|
|
|
|
|
|
|
90
|
|
|
|
|
|
|
# Example from https://github.com/plotly/plotly.js/blob/b93e3a5a83b6561ac6258a59f274b5fc87630c3e/test/image/mocks/funnel_11.json |
91
|
|
|
|
|
|
|
my $trace1 = Chart::Plotly::Trace::Funnel->new({'orientation' => 'v', 'marker' => {'color' => 'rgb(255, 102, 97)', }, 'y' => [13.23, 22.7, 26.06, ], 'x' => ['Half Dose', 'Full Dose', 'Double Dose', ], 'name' => 'Orange Juice', }); |
92
|
|
|
|
|
|
|
|
93
|
|
|
|
|
|
|
my $trace2 = Chart::Plotly::Trace::Funnel->new({'name' => 'Vitamin C', 'marker' => {'color' => 'rgb(0, 196, 200)', }, 'y' => [7.98, 16.77, 26.14, ], 'x' => ['Half Dose', 'Full Dose', 'Double Dose', ], 'orientation' => 'v', }); |
94
|
|
|
|
|
|
|
|
95
|
|
|
|
|
|
|
my $trace3 = Chart::Plotly::Trace::Funnel->new({'name' => 'Std Dev - OJ', 'x' => ['Half Dose', 'Full Dose', 'Double Dose', ], 'y' => [1.4102837, 1.236752, 0.8396031, ], 'visible' => JSON::false, 'orientation' => 'v', }); |
96
|
|
|
|
|
|
|
|
97
|
|
|
|
|
|
|
my $trace4 = Chart::Plotly::Trace::Funnel->new({'y' => [0.868562, 0.7954104, 1.5171757, ], 'x' => ['Half Dose', 'Full Dose', 'Double Dose', ], 'name' => 'Std Dev - VC', 'orientation' => 'v', 'visible' => JSON::false, }); |
98
|
|
|
|
|
|
|
|
99
|
|
|
|
|
|
|
|
100
|
|
|
|
|
|
|
my $plot = Chart::Plotly::Plot->new( |
101
|
|
|
|
|
|
|
traces => [$trace1, $trace2, $trace3, $trace4, ], |
102
|
|
|
|
|
|
|
layout => |
103
|
|
|
|
|
|
|
{'autosize' => JSON::false, 'hidesources' => JSON::false, 'plot_bgcolor' => 'rgb(217, 217, 217)', 'font' => {'color' => '#000', 'size' => 12, 'family' => 'Arial, sans-serif', }, 'width' => 600, 'separators' => '.,', 'legend' => {'xanchor' => 'left', 'font' => {'size' => 16, 'family' => '', 'color' => 'rgb(0, 0, 0)', }, 'bgcolor' => 'rgba(255, 255, 255, 0)', 'bordercolor' => 'rgba(0, 0, 0, 0)', 'yanchor' => 'auto', 'x' => 1.02, 'y' => 0.931907250442406, 'borderwidth' => 1, 'traceorder' => 'normal', }, 'funnelgroupgap' => 0, 'funnelgap' => 0.2, 'annotations' => [{'tag' => '', 'yatype' => 'linear', 'showarrow' => JSON::false, 'xanchor' => 'auto', 'bgcolor' => 'rgba(0,0,0,0)', 'arrowhead' => 1, 'yref' => 'paper', 'ax' => -10, 'align' => 'center', 'yanchor' => 'auto', 'xatype' => 'category', 'bordercolor' => '', 'ref' => 'paper', 'text' => '<b>Supplement</b>', 'x' => 1.3479735318445, 'y' => 0.998214285714286, 'opacity' => 1, 'arrowwidth' => 0, 'font' => {'size' => 18, 'family' => '', 'color' => '', }, 'ay' => -26.7109375, 'arrowcolor' => '', 'borderpad' => 1, 'borderwidth' => 1, 'xref' => 'paper', 'arrowsize' => 1, }, ], 'height' => 440, 'dragmode' => 'zoom', 'hovermode' => 'x', 'paper_bgcolor' => '#fff', 'boxmode' => 'overlay', 'showlegend' => JSON::true, 'titlefont' => {'family' => '', 'size' => 16, 'color' => '', }, 'title' => 'Grouped Funnel Chart', 'margin' => {'r' => 0, 't' => 80, 'b' => 80, 'l' => 80, 'autoexpand' => JSON::true, 'pad' => 2, }, 'yaxis' => {'gridcolor' => 'rgb(255, 255, 255)', 'autotick' => JSON::true, 'ticks' => '', 'tickfont' => {'color' => '', 'size' => 16, 'family' => '', }, 'mirror' => JSON::true, 'tickangle' => 0, 'domain' => [0, 1, ], 'anchor' => 'x', 'showgrid' => JSON::true, 'exponentformat' => 'e', 'tick0' => 0, 'showticklabels' => JSON::true, 'nticks' => 0, 'zerolinewidth' => 1, 'zeroline' => JSON::false, 'position' => 0, 'range' => [0, 29.1128165263158, ], 'dtick' => 5, 'showexponent' => 'all', 'showline' => JSON::false, 'linecolor' => '#000', 'type' => 'linear', 'linewidth' => 0.1, 'overlaying' => JSON::false, 'ticklen' => 5, 'rangemode' => 'normal', 'tickwidth' => 1, 'tickcolor' => '#000', 'title' => 'Length', 'autorange' => JSON::true, 'titlefont' => {'size' => 16, 'family' => '', 'color' => '', }, 'zerolinecolor' => '#000', 'gridwidth' => 1.9, }, 'funnelmode' => 'group', 'xaxis' => {'ticks' => '', 'autotick' => JSON::true, 'gridcolor' => 'rgb(255, 255, 255)', 'tickfont' => {'color' => '', 'family' => '', 'size' => 16, }, 'mirror' => JSON::true, 'anchor' => 'y', 'tickangle' => 0, 'domain' => [0, 1, ], 'showgrid' => JSON::true, 'exponentformat' => 'e', 'tick0' => 0, 'showticklabels' => JSON::true, 'range' => [-0.5, 2.5, ], 'nticks' => 0, 'zerolinewidth' => 1, 'zeroline' => JSON::false, 'position' => 0, 'showexponent' => 'all', 'dtick' => 1, 'showline' => JSON::false, 'type' => 'category', 'linecolor' => '#000', 'overlaying' => JSON::false, 'linewidth' => 0.1, 'ticklen' => 5, 'rangemode' => 'normal', 'titlefont' => {'size' => 16, 'family' => '', 'color' => '', }, 'autorange' => JSON::true, 'title' => 'Dose (mg)', 'tickwidth' => 1, 'tickcolor' => '#000', 'gridwidth' => 1.9, 'zerolinecolor' => '#000', }, } |
104
|
|
|
|
|
|
|
); |
105
|
|
|
|
|
|
|
|
106
|
|
|
|
|
|
|
Chart::Plotly::show_plot($plot); |
107
|
|
|
|
|
|
|
|
108
|
|
|
|
|
|
|
=head1 DESCRIPTION |
109
|
|
|
|
|
|
|
|
110
|
|
|
|
|
|
|
This attribute is part of the possible options for the trace funnel. |
111
|
|
|
|
|
|
|
|
112
|
|
|
|
|
|
|
This file has been autogenerated from the official plotly.js source. |
113
|
|
|
|
|
|
|
|
114
|
|
|
|
|
|
|
If you like Plotly, please support them: L<https://plot.ly/> |
115
|
|
|
|
|
|
|
Open source announcement: L<https://plot.ly/javascript/open-source-announcement/> |
116
|
|
|
|
|
|
|
|
117
|
|
|
|
|
|
|
Full reference: L<https://plot.ly/javascript/reference/#funnel> |
118
|
|
|
|
|
|
|
|
119
|
|
|
|
|
|
|
=head1 DISCLAIMER |
120
|
|
|
|
|
|
|
|
121
|
|
|
|
|
|
|
This is an unofficial Plotly Perl module. Currently I'm not affiliated in any way with Plotly. |
122
|
|
|
|
|
|
|
But I think plotly.js is a great library and I want to use it with perl. |
123
|
|
|
|
|
|
|
|
124
|
|
|
|
|
|
|
=head1 METHODS |
125
|
|
|
|
|
|
|
|
126
|
|
|
|
|
|
|
=head2 TO_JSON |
127
|
|
|
|
|
|
|
|
128
|
|
|
|
|
|
|
Serialize the trace to JSON. This method should be called only by L<JSON> serializer. |
129
|
|
|
|
|
|
|
|
130
|
|
|
|
|
|
|
=head1 ATTRIBUTES |
131
|
|
|
|
|
|
|
|
132
|
|
|
|
|
|
|
=over |
133
|
|
|
|
|
|
|
|
134
|
|
|
|
|
|
|
=item * dtickrange |
135
|
|
|
|
|
|
|
|
136
|
|
|
|
|
|
|
range [*min*, *max*], where *min*, *max* - dtick values which describe some zoom level, it is possible to omit *min* or *max* value by passing *null* |
137
|
|
|
|
|
|
|
|
138
|
|
|
|
|
|
|
=item * enabled |
139
|
|
|
|
|
|
|
|
140
|
|
|
|
|
|
|
Determines whether or not this stop is used. If `false`, this stop is ignored even within its `dtickrange`. |
141
|
|
|
|
|
|
|
|
142
|
|
|
|
|
|
|
=item * name |
143
|
|
|
|
|
|
|
|
144
|
|
|
|
|
|
|
When used in a template, named items are created in the output figure in addition to any items the figure already has in this array. You can modify these items in the output figure by making your own item with `templateitemname` matching this `name` alongside your modifications (including `visible: false` or `enabled: false` to hide it). Has no effect outside of a template. |
145
|
|
|
|
|
|
|
|
146
|
|
|
|
|
|
|
=item * templateitemname |
147
|
|
|
|
|
|
|
|
148
|
|
|
|
|
|
|
Used to refer to a named item in this array in the template. Named items from the template will be created even without a matching item in the input figure, but you can modify one by making an item with `templateitemname` matching its `name`, alongside your modifications (including `visible: false` or `enabled: false` to hide it). If there is no template or no matching item, this item will be hidden unless you explicitly show it with `visible: true`. |
149
|
|
|
|
|
|
|
|
150
|
|
|
|
|
|
|
=item * value |
151
|
|
|
|
|
|
|
|
152
|
|
|
|
|
|
|
string - dtickformat for described zoom level, the same as *tickformat* |
153
|
|
|
|
|
|
|
|
154
|
|
|
|
|
|
|
=back |
155
|
|
|
|
|
|
|
|
156
|
|
|
|
|
|
|
=head1 AUTHOR |
157
|
|
|
|
|
|
|
|
158
|
|
|
|
|
|
|
Pablo Rodríguez González <pablo.rodriguez.gonzalez@gmail.com> |
159
|
|
|
|
|
|
|
|
160
|
|
|
|
|
|
|
=head1 COPYRIGHT AND LICENSE |
161
|
|
|
|
|
|
|
|
162
|
|
|
|
|
|
|
This software is Copyright (c) 2022 by Pablo Rodríguez González. |
163
|
|
|
|
|
|
|
|
164
|
|
|
|
|
|
|
This is free software, licensed under: |
165
|
|
|
|
|
|
|
|
166
|
|
|
|
|
|
|
The MIT (X11) License |
167
|
|
|
|
|
|
|
|
168
|
|
|
|
|
|
|
=cut |