package require Plotchart
pack [canvas .cnv -background white -width 400 -height 200]

::Plotchart::plotconfig vertbars leftaxis font "Helvetica 10 italic"
::Plotchart::plotconfig vertbars background outercolor steelblue3
::Plotchart::plotconfig vertbars bottomaxis ticklength -5

set s [::Plotchart::createBarchart .cnv {A B C D E} {0.0 10.0 2.0} 2.5]

$s plot series1 {1.0 4.0 6.0 1.0 7.0} red bottom-up
$s plot series2 {0.0 3.0 7.0 9.3 2.0} green top-down dark

$s legend series1 "Series 1"
$s legend series2 "Series 2"

$s title "Arbitrary data"


