1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
module Rubyvis
def self.histogram(data,f=nil)
Rubyvis::Histogram.new(data,f)
end
class Histogram
module Bin
attr_accessor :x, :dx, :y
end
attr_accessor :frequency
attr_reader :data
attr_reader :f
def initialize(data,f=nil)
@data=data
@f=f
@frequency=true
end
def bins(ticks=nil)
x=Rubyvis.map(data,f)
bins=[]
ticks||=Rubyvis::Scale.linear(x).ticks()
# Initialize the bins
(ticks.size-1).times {|i|
bin=bins[i]=[]
bin.extend Bin
bin.x=ticks[i]
bin.dx=ticks[i+1]-ticks[i]
bin.y=0
}
x.size.times {|i|
j=Rubyvis.search_index(ticks, x[i])-1
bin=bins[ [0,[bins.size-1,j].min].max]
bin.y+=1
bin.push(data[i])
}
if !@frequency
bins.each {|b|
b.y=b.y/x.size.to_f
}
end
bins
end
end
end
|
