Chris@1294: require 'rexml/document' Chris@1294: require 'SVG/Graph/BarBase' Chris@1294: Chris@1294: module SVG Chris@1294: module Graph Chris@1294: # === Create presentation quality SVG horitonzal bar graphs easily Chris@1294: # Chris@1294: # = Synopsis Chris@1294: # Chris@1294: # require 'SVG/Graph/BarHorizontal' Chris@1294: # Chris@1294: # fields = %w(Jan Feb Mar) Chris@1294: # data_sales_02 = [12, 45, 21] Chris@1294: # Chris@1294: # graph = SVG::Graph::BarHorizontal.new({ Chris@1294: # :height => 500, Chris@1294: # :width => 300, Chris@1294: # :fields => fields, Chris@1294: # }) Chris@1294: # Chris@1294: # graph.add_data({ Chris@1294: # :data => data_sales_02, Chris@1294: # :title => 'Sales 2002', Chris@1294: # }) Chris@1294: # Chris@1294: # print "Content-type: image/svg+xml\r\n\r\n" Chris@1294: # print graph.burn Chris@1294: # Chris@1294: # = Description Chris@1294: # Chris@1294: # This object aims to allow you to easily create high quality Chris@1294: # SVG horitonzal bar graphs. You can either use the default style sheet Chris@1294: # or supply your own. Either way there are many options which can Chris@1294: # be configured to give you control over how the graph is Chris@1294: # generated - with or without a key, data elements at each point, Chris@1294: # title, subtitle etc. Chris@1294: # Chris@1294: # = Examples Chris@1294: # Chris@1294: # * http://germane-software.com/repositories/public/SVG/test/test.rb Chris@1294: # Chris@1294: # = See also Chris@1294: # Chris@1294: # * SVG::Graph::Graph Chris@1294: # * SVG::Graph::Bar Chris@1294: # * SVG::Graph::Line Chris@1294: # * SVG::Graph::Pie Chris@1294: # * SVG::Graph::Plot Chris@1294: # * SVG::Graph::TimeSeries Chris@1294: # Chris@1294: # == Author Chris@1294: # Chris@1294: # Sean E. Russell Chris@1294: # Chris@1294: # Copyright 2004 Sean E. Russell Chris@1294: # This software is available under the Ruby license[LICENSE.txt] Chris@1294: # Chris@1294: class BarHorizontal < BarBase Chris@1294: # In addition to the defaults set in BarBase::set_defaults, sets Chris@1294: # [rotate_y_labels] true Chris@1294: # [show_x_guidelines] true Chris@1294: # [show_y_guidelines] false Chris@1294: def set_defaults Chris@1294: super Chris@1294: init_with( Chris@1294: :rotate_y_labels => true, Chris@1294: :show_x_guidelines => true, Chris@1294: :show_y_guidelines => false Chris@1294: ) Chris@1294: self.right_align = self.right_font = 1 Chris@1294: end Chris@1294: Chris@1294: protected Chris@1294: Chris@1294: def get_x_labels Chris@1294: maxvalue = max_value Chris@1294: minvalue = min_value Chris@1294: range = maxvalue - minvalue Chris@1294: top_pad = range == 0 ? 10 : range / 20.0 Chris@1294: scale_range = (maxvalue + top_pad) - minvalue Chris@1294: Chris@1294: scale_division = scale_divisions || (scale_range / 10.0) Chris@1294: Chris@1294: if scale_integers Chris@1294: scale_division = scale_division < 1 ? 1 : scale_division.round Chris@1294: end Chris@1294: Chris@1294: rv = [] Chris@1294: maxvalue = maxvalue%scale_division == 0 ? Chris@1294: maxvalue : maxvalue + scale_division Chris@1294: minvalue.step( maxvalue, scale_division ) {|v| rv << v} Chris@1294: return rv Chris@1294: end Chris@1294: Chris@1294: def get_y_labels Chris@1294: @config[:fields] Chris@1294: end Chris@1294: Chris@1294: def y_label_offset( height ) Chris@1294: height / -2.0 Chris@1294: end Chris@1294: Chris@1294: def draw_data Chris@1294: minvalue = min_value Chris@1294: fieldheight = field_height Chris@1294: Chris@1294: unit_size = (@graph_width.to_f - font_size*2*right_font ) / Chris@1294: (get_x_labels.max - get_x_labels.min ) Chris@1294: bargap = bar_gap ? (fieldheight < 10 ? fieldheight / 2 : 10) : 0 Chris@1294: Chris@1294: bar_height = fieldheight - bargap Chris@1294: bar_height /= @data.length if stack == :side Chris@1294: y_mod = (bar_height / 2) + (font_size / 2) Chris@1294: Chris@1294: field_count = 1 Chris@1294: @config[:fields].each_index { |i| Chris@1294: dataset_count = 0 Chris@1294: for dataset in @data Chris@1294: value = dataset[:data][i] Chris@1294: Chris@1294: top = @graph_height - (fieldheight * field_count) Chris@1294: top += (bar_height * dataset_count) if stack == :side Chris@1294: # cases (assume 0 = +ve): Chris@1294: # value min length left Chris@1294: # +ve +ve value.abs - min minvalue.abs Chris@1294: # +ve -ve value.abs - 0 minvalue.abs Chris@1294: # -ve -ve value.abs - 0 minvalue.abs + value Chris@1294: length = (value.abs - (minvalue > 0 ? minvalue : 0)) * unit_size Chris@1294: left = (minvalue.abs + (value < 0 ? value : 0)) * unit_size Chris@1294: Chris@1294: @graph.add_element( "rect", { Chris@1294: "x" => left.to_s, Chris@1294: "y" => top.to_s, Chris@1294: "width" => length.to_s, Chris@1294: "height" => bar_height.to_s, Chris@1294: "class" => "fill#{dataset_count+1}" Chris@1294: }) Chris@1294: Chris@1294: make_datapoint_text( Chris@1294: left+length+5, top+y_mod, value, "text-anchor: start; " Chris@1294: ) Chris@1294: dataset_count += 1 Chris@1294: end Chris@1294: field_count += 1 Chris@1294: } Chris@1294: end Chris@1294: end Chris@1294: end Chris@1294: end