jro_apps/redmine Files · lib/SVG/Graph/BarHorizontal.rb

r18596@gaspard (orig r1860): nbc | 2008-09-14 21:03:46 +0200...

r18596@gaspard (orig r1860): nbc | 2008-09-14 21:03:46 +0200 bugfix r18597@gaspard (orig r1861): winterheart | 2008-09-15 17:14:34 +0200 #1902, translation for zh-tw r18598@gaspard (orig r1862): winterheart | 2008-09-15 17:16:53 +0200 #1907, translation for zh r18599@gaspard (orig r1863): winterheart | 2008-09-15 17:19:51 +0200 fixed #1905, patch for Hungarian language r18600@gaspard (orig r1864): winterheart | 2008-09-15 17:22:53 +0200 Minor typo, fixed #1897, thank Denis Tomashenko for reporting. r18601@gaspard (orig r1865): winterheart | 2008-09-15 18:07:30 +0200 Catalan translation (#1822), thanks to Joan Duran for contribuition. Some strings has wrong quoting, I fixed that. r18602@gaspard (orig r1866): nbc | 2008-09-15 21:37:43 +0200 * reposman can create git repository with "--scm git" option * light refactoring r18603@gaspard (orig r1867): jplang | 2008-09-16 23:54:53 +0200 Use RDoc.usage r18604@gaspard (orig r1868): jplang | 2008-09-16 23:56:02 +0200 mailhandler: fixes exit status and adds an explicit message if response code is 403. r18605@gaspard (orig r1869): winterheart | 2008-09-17 17:31:35 +0200 Patch #1909, updates for ru.yml r18606@gaspard (orig r1870): jplang | 2008-09-17 18:39:23 +0200 Render the commit changes list as a tree (#1896). r18607@gaspard (orig r1871): jplang | 2008-09-17 18:48:04 +0200 Fixed: http links containing parentheses fail to reder correctly (#1591). Patch by Paul Rivier. r18608@gaspard (orig r1872): jplang | 2008-09-17 19:18:05 +0200 Removes unused image references in stylesheets (#1914). r18609@gaspard (orig r1873): jplang | 2008-09-17 19:23:08 +0200 Fixed custom query sidebar links broken by r1797 (#1899). git-svn-id: http://redmine.rubyforge.org/svn/branches/nbc@1874 e93f8b46-1217-0410-a6f0-8f06a7374b81

Jean-Philippe Lang - - Load All Authors

File last commit:

r377:0ef114e00641


                r1872:54433282d3e7

Download file

             BarHorizontal.rb
        
                    136 lines
            
             | 3.8 KiB
            
                | text/x-ruby
            
             |
                RubyLexer
            
             / lib / SVG / Graph / BarHorizontal.rb
          
                    History
                
                 |
                  Source
                 | Raw
                 |Copy content
                 |Copy permalink

        Jean-Philippe Lang
    
added simple svn statistics graphs, rendered using SVG::Graph...

              r377
            
      require 'rexml/document'

      require 'SVG/Graph/BarBase'

      module SVG

        module Graph

          # === Create presentation quality SVG horitonzal bar graphs easily

          # 

          # = Synopsis

          # 

          #   require 'SVG/Graph/BarHorizontal'

          #   

          #   fields = %w(Jan Feb Mar)

          #   data_sales_02 = [12, 45, 21]

          #   

          #   graph = SVG::Graph::BarHorizontal.new({

          #     :height => 500,

          #     :width => 300,

          #     :fields => fields,

          #   })

          #   

          #   graph.add_data({

          #     :data => data_sales_02,

          #     :title => 'Sales 2002',

          #   })

          #   

          #   print "Content-type: image/svg+xml\r\n\r\n"

          #   print graph.burn

          # 

          # = Description

          # 

          # This object aims to allow you to easily create high quality

          # SVG horitonzal bar graphs. You can either use the default style sheet

          # or supply your own. Either way there are many options which can

          # be configured to give you control over how the graph is

          # generated - with or without a key, data elements at each point,

          # title, subtitle etc.

          # 

          # = Examples

          # 

          # * http://germane-software.com/repositories/public/SVG/test/test.rb

          # 

          # = See also

          # 

          # * SVG::Graph::Graph

          # * SVG::Graph::Bar

          # * SVG::Graph::Line

          # * SVG::Graph::Pie

          # * SVG::Graph::Plot

          # * SVG::Graph::TimeSeries

          #

          # == Author

          #

          # Sean E. Russell <serATgermaneHYPHENsoftwareDOTcom>

          #

          # Copyright 2004 Sean E. Russell

          # This software is available under the Ruby license[LICENSE.txt]

          #

          class BarHorizontal < BarBase

            # In addition to the defaults set in BarBase::set_defaults, sets

            # [rotate_y_labels] true

            # [show_x_guidelines] true

            # [show_y_guidelines] false

            def set_defaults

              super

              init_with( 

                :rotate_y_labels    => true,

                :show_x_guidelines  => true,

                :show_y_guidelines  => false

              )

              self.right_align = self.right_font = 1

            end

            protected

            def get_x_labels

              maxvalue = max_value

              minvalue = min_value

              range = maxvalue - minvalue

              top_pad = range == 0 ? 10 : range / 20.0

              scale_range = (maxvalue + top_pad) - minvalue

              scale_division = scale_divisions || (scale_range / 10.0)

              if scale_integers

                scale_division = scale_division < 1 ? 1 : scale_division.round

              end

              rv = []

              maxvalue = maxvalue%scale_division == 0 ? 

                maxvalue : maxvalue + scale_division

              minvalue.step( maxvalue, scale_division ) {|v| rv << v}

              return rv

            end

            def get_y_labels

              @config[:fields]

            end

            def y_label_offset( height )

              height / -2.0

            end

            def draw_data

              minvalue = min_value

              fieldheight = field_height

              fieldwidth = (@graph_width.to_f - font_size*2*right_font ) /

                              (get_x_labels.max - get_x_labels.min )

              bargap = bar_gap ? (fieldheight < 10 ? fieldheight / 2 : 10) : 0

              subbar_height = fieldheight - bargap

              subbar_height /= @data.length if stack == :side

              field_count = 1

              y_mod = (subbar_height / 2) + (font_size / 2)

              @config[:fields].each_index { |i|

                dataset_count = 0

                for dataset in @data

                  y = @graph_height - (fieldheight * field_count)

                  y += (subbar_height * dataset_count) if stack == :side

                  x = (dataset[:data][i] - minvalue) * fieldwidth

                  @graph.add_element( "path", {

                    "d" => "M0 #{y} H#{x} v#{subbar_height} H0 Z",

                    "class" => "fill#{dataset_count+1}"

                  })

                  make_datapoint_text( 

                    x+5, y+y_mod, dataset[:data][i], "text-anchor: start; "

                    )

                  dataset_count += 1

                end

                field_count += 1

              }

            end

          end

        end

      end

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages

Jean-Philippe Lang added simple svn statistics graphs, rendered using SVG::Graph...	r377	require 'rexml/document'
		require 'SVG/Graph/BarBase'

		module SVG
		module Graph
		# === Create presentation quality SVG horitonzal bar graphs easily
		#
		# = Synopsis
		#
		# require 'SVG/Graph/BarHorizontal'
		#
		# fields = %w(Jan Feb Mar)
		# data_sales_02 = [12, 45, 21]
		#
		# graph = SVG::Graph::BarHorizontal.new({
		# :height => 500,
		# :width => 300,
		# :fields => fields,
		# })
		#
		# graph.add_data({
		# :data => data_sales_02,
		# :title => 'Sales 2002',
		# })
		#
		# print "Content-type: image/svg+xml\r\n\r\n"
		# print graph.burn
		#
		# = Description
		#
		# This object aims to allow you to easily create high quality
		# SVG horitonzal bar graphs. You can either use the default style sheet
		# or supply your own. Either way there are many options which can
		# be configured to give you control over how the graph is
		# generated - with or without a key, data elements at each point,
		# title, subtitle etc.
		#
		# = Examples
		#
		# * http://germane-software.com/repositories/public/SVG/test/test.rb
		#
		# = See also
		#
		# * SVG::Graph::Graph
		# * SVG::Graph::Bar
		# * SVG::Graph::Line
		# * SVG::Graph::Pie
		# * SVG::Graph::Plot
		# * SVG::Graph::TimeSeries
		#
		# == Author
		#
		# Sean E. Russell <serATgermaneHYPHENsoftwareDOTcom>
		#
		# Copyright 2004 Sean E. Russell
		# This software is available under the Ruby license[LICENSE.txt]
		#
		class BarHorizontal < BarBase
		# In addition to the defaults set in BarBase::set_defaults, sets
		# [rotate_y_labels] true
		# [show_x_guidelines] true
		# [show_y_guidelines] false
		def set_defaults
		super
		init_with(
		:rotate_y_labels => true,
		:show_x_guidelines => true,
		:show_y_guidelines => false
		)
		self.right_align = self.right_font = 1
		end

		protected

		def get_x_labels
		maxvalue = max_value
		minvalue = min_value
		range = maxvalue - minvalue
		top_pad = range == 0 ? 10 : range / 20.0
		scale_range = (maxvalue + top_pad) - minvalue

		scale_division = scale_divisions \|\| (scale_range / 10.0)

		if scale_integers
		scale_division = scale_division < 1 ? 1 : scale_division.round
		end

		rv = []
		maxvalue = maxvalue%scale_division == 0 ?
		maxvalue : maxvalue + scale_division
		minvalue.step( maxvalue, scale_division ) {\|v\| rv << v}
		return rv
		end

		def get_y_labels
		@config[:fields]
		end

		def y_label_offset( height )
		height / -2.0
		end

		def draw_data
		minvalue = min_value
		fieldheight = field_height
		fieldwidth = (@graph_width.to_f - font_size2right_font ) /
		(get_x_labels.max - get_x_labels.min )
		bargap = bar_gap ? (fieldheight < 10 ? fieldheight / 2 : 10) : 0

		subbar_height = fieldheight - bargap
		subbar_height /= @data.length if stack == :side

		field_count = 1
		y_mod = (subbar_height / 2) + (font_size / 2)
		@config[:fields].each_index { \|i\|
		dataset_count = 0
		for dataset in @data
		y = @graph_height - (fieldheight * field_count)
		y += (subbar_height * dataset_count) if stack == :side
		x = (dataset[:data][i] - minvalue) * fieldwidth

		@graph.add_element( "path", {
		"d" => "M0 #{y} H#{x} v#{subbar_height} H0 Z",
		"class" => "fill#{dataset_count+1}"
		})
		make_datapoint_text(
		x+5, y+y_mod, dataset[:data][i], "text-anchor: start; "
		)
		dataset_count += 1
		end
		field_count += 1
		}
		end
		end
		end
		end