=pod

=encoding utf8

=head1 名称

L<SimpleR::Reshape::ChartData>

=head1 说明

将统计数据转换为画图数据，让SimpleCall::ChartDirector调用

=head1 函数

=begin html

实例参考 <a href="xt/">xt子文件夹</a>

=end html

=head2 read_chart_data_dim2

   my ($r, %opt) = read_chart_data_dim2('01.dim2.csv', 
        skip_head=> 1, 
        label => [0], 
        data => [1], 
        sep=> ','
    );
  #$r = [4, 3, 5],
  #%opt = ("legend", [
    #"\xE6\x9D\x8E\xE5\xAD\x90",
    #"\xE6\xA1\x83\xE5\xAD\x90",
    #"\xE8\x8B\xB9\xE6\x9E\x9C", ],
  #"label", [
    #"\xE6\x9D\x8E\xE5\xAD\x90",
    #"\xE6\xA1\x83\xE5\xAD\x90",
    #"\xE8\x8B\xB9\xE6\x9E\x9C", ], )
  
=begin html

<img src="xt/01.dim2.png"></img>

=end html

=head2  read_chart_data_dim3

    my ($r, %opt) = read_chart_data_dim3('02.dim3.csv', 
        skip_head=> 1, 
        label => [0], 
        legend => [1], 
        data => [2], 
        sep=> ',', 
        charset => 'utf8', 
    );
    #$r = [[3, 2], [0, 1], [3, 0]],
    #%opt = ("legend",
    #["\xE4\xBC\x98", "\xE5\xB7\xAE", "\xE8\x89\xAF"],
    #"label",
    #["\xE7\x94\xB5\xE4\xBF\xA1", "\xE8\x81\x94\xE9\x80\x9A"], )
  
=begin html

<img src="xt/02.dim3.png"></img>

=end html


=head2  read_chart_data_dim3_horizon

    my ($r, %opt) = read_chart_data_dim3_horizon('03.dim3_horizon.csv', 
        skip_head=> 1, 
        label => [0], 
        legend => [1 .. 3], 
        names => [ qw/time good normal bad/ ], 
        sep=> ','
    );
    #$r = [[1, 4, 3, 7], [3, 2, 2, 9], [4, 2, 3, 8]],
    #%opt = ("legend",
    #["bad", "good", "normal"],
    #"label",
    #["2013-08-01", "2013-08-02", "2013-08-03", "2013-08-04"],)

=begin html

<img src="xt/03.dim3_horizon.png"></img>

=end html

=cut
