my $data = GD::Graph::Data->new([
    [@word @word_recip], 
    [@count_word],
    [@count_word_recip], 
]) or die GD::Graph::Data->error;