+# Selectricity: Voting Machinery for the Masses
+# Copyright (C) 2007, 2008 Benjamin Mako Hill <mako@atdot.cc>
+# Copyright (C) 2007 Massachusetts Institute of Technology
+#
+# This program is free software. Please see the COPYING file for
+# details.
+
require 'date'
class GraphController < ApplicationController
class GruffGraff
-
+
+ COLORS = ['#74CE00', '#005CD9', '#DC0D13', '#131313', '#A214A4', '#EFF80E',
+ '#90E5E6', '#F58313', '#437D3D', '#0E026C']
+ BACKGROUND_COLORS = ['#74CE00', '#FFFFFF'] #for green and white background
+
def initialize(options)
- size = "700x400"
+ size = options[:size] ? options[:size] : "400x300" #allow custom sizing
@graph = options[:graph_type].new(size)
-
- @graph.theme = { :colors => ['#000000', '#00FFFF', '#FFCC00', '#990033'],
- :background_colors => ['#74ce00', '#ffffff'] }
+
+ @graph.no_data_message = "No Voters"
+
+ @graph.theme = { :colors => COLORS,
+ :background_colors => ['#e5e5e5', '#FFFFFF'] }
@graph.font = File.expand_path('/usr/X11R6/lib/X11/fonts/TTF/Vera.ttf',
RAILS_ROOT)
+ if options[:legend_font_size]
+ @graph.legend_font_size = options[:legend_font_size]
+ end
+
+ if options[:title_font_size]
+ @graph.title_font_size = options[:title_font_size]
+ end
+
+ #marker count doesn't include minimum value line, default is 4
+ @graph.marker_count = options[:marker_count] if options[:marker_count]
+
+ @graph.marker_font_size = options[:marker_font_size] if options[:marker_font_size]
+
+ @graph.marker_color = options[:marker_color] if options[:marker_color]
+
# fill in the data with the optional data name
#Check to see if multiple datasets, if so, fill them all!
#Sort by biggest first piece of data.
end
else #one dimensional array, just pass it in
@graph.data( options.fetch(:data_name, "Data"), options[:data] )
+ @graph.hide_legend = true
end
# set the labels or create an empty hash
@election = Election.find(params[:id])
data, labels, scale = get_votes_per_interval_data(@election)
+ hide_legend = true
+
graph = GruffGraff.new( :graph_type => Gruff::Line,
:data_name => @election.name,
:data => data,
:interval_labels => labels,
:title => "Voters Over Time",
+ :size => "330x232",
+ :legend_font_size => 40,
+ :title_font_size => 50,
+ :marker_count => 2,
+ :marker_font_size => 30,
+ :marker_color => '#999999',
:x_axis_label => scale,
:y_axis_label => "Number of Votes")
send_data(*graph.output)
@election.results unless @election.borda_result
data, labels = get_borda_points(@election.borda_result)
- graph = GruffGraff.new( :graph_type => Gruff::Bar,
+ size = "400x300"
+ #size = "580x300" if @election.candidates.size >= 5
+ size = sprintf "580x%d", @election.candidates.size*22 \
+ if @election.candidates.size >= 5
+
+ if @election.candidates.size >= 5
+ marker_font_size = 17
+ else
+ marker_font_size = 20
+ end
+
+ graph = GruffGraff.new( :graph_type => Gruff::SideBar,
:data_name => @election.name,
:data => data,
:interval_labels => labels,
+ :size => size,
:title => "Points Per Candidate",
- :y_axis_label => "Points",
- :x_axis_label => "Candidate")
+ :marker_color => '#999999',
+ :marker_font_size => marker_font_size,
+ :x_axis_label => "Points",
+ :y_axis_label => "Candidates")
send_data(*graph.output)
end
#Acording to Tufte, small, concomparitive, highly labeled data sets usually
legend = Hash.new
alldata, labels = get_positions_info(@election)
@election.results unless @election.condorcet_result || @election.ssd_result
+ ranked_candidates = @election.condorcet_result.ranked_candidates.flatten
names = Hash.new
candidates = @election.candidates.sort.collect {|candidate| candidate.id}
names[candidate]= (Candidate.find(candidate)).name
end
- ranked_candidates = @election.condorcet_result.ranked_candidates.flatten
ranked_candidates.each_with_index \
{|candidate, index| legend[names[candidate]] = alldata[index]}
send_data(*graph.output)
end
+ def plurality_pie
+ @election = Election.find(params[:id])
+ @election.results unless @election.plurality_result || @election.approval_result
+ votes = @election.votes.size
+ data = Hash.new
+ names = @election.names_by_id
+
+ @election.plurality_result.points.each do |candidate, votes|
+ data[names[candidate]] = votes
+ end
+ size = "400x300"
+ size = "520x300" if @election.candidates.size >= 8
+
+ if @election.candidates.size >= 8
+ marker_font_size = 20
+ legend_font_size = 17
+ else
+ marker_font_size = 17
+ legend_font_size = 17
+ end
+
+ pie = GruffGraff.new( :graph_type => Gruff::Pie,
+ :title => "Percentage of First Place Votes",
+ :size => size,
+ :marker_font_size => marker_font_size,
+ :legend_font_size => legend_font_size,
+ :data => data)
+ send_data(*pie.output)
+
+ end
+
private
def get_positions_info(election)
buckets = Hash.new
# Create the hash for the labels. Each graph has ten columns, and three
# will be labeled
if timedelta < 2.hours #under two hours use minutes for labels
- labels_hash[0] = starttime.min.to_s
- labels_hash[(numcols/2)-1] = (starttime + (timedelta/2)).min.to_s
- labels_hash[numcols-1] = Time.now.min.to_s
- interval_type = "Minute of the Hour"
+ labels_hash[0] = "Start"
+ labels_hash[(numcols/2)-1] = fmt_decimal((timedelta/120)) #halfway
+ labels_hash[numcols-1] = fmt_decimal((timedelta/60))
+ interval_type = "Minutes After Start"
elsif timedelta < 2.days #more than 2 hours means use hours for labels
- labels_hash[0] = starttime.hour.to_s
- labels_hash[(numcols/2)-1] = (starttime + (timedelta/2)).hour.to_s
- labels_hash[numcols-1] = Time.now.hour.to_s
- interval_type = "Hour of the Day on 24 hour scale"
+ labels_hash[0] = "Start"
+ labels_hash[(numcols/2)-1] = fmt_decimal((timedelta/7200))
+ labels_hash[numcols-1] = fmt_decimal((timedelta/3600))
+ interval_type = "Hours After Start (Up to 48)"
else #more than 2 days means use dates for labels
labels_hash[0] = (Date.parse(starttime.to_s)).to_s
labels_hash[(numcols/2)-1] = (Date.parse((starttime + (timedelta/2)).to_s)).to_s
return total_per_interval, labels_hash, interval_type
end
+ def fmt_decimal(number)
+ sprintf( "%0.1f", number)
+ end
+
def get_borda_points(result)
points = Array.new
labels = Hash.new
end
return preference_tally
end
-
end