mantao/Plots.jl
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

bar fix for horizontal orientation

Browse Source
This commit is contained in:
Thomas Breloff 2016-07-06 16:10:01 -04:00
parent 6fe87c4c69
commit d5e9340f8f
1 changed files with 10 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
src/recipes.jl
View File

@ -393,13 +393,8 @@ end
# create a bar plot as a filled step function # create a bar plot as a filled step function
@recipe function f(::Type{Val{:bar}}, x, y, z) @recipe function f(::Type{Val{:bar}}, x, y, z)
# if horizontal, switch x/y
if !isvertical(d)
x, y = y, x
end
nx, ny = length(x), length(y) nx, ny = length(x), length(y)
centers = if nx == ny x = if nx == ny
x x
elseif nx == ny + 1 elseif nx == ny + 1
diff(x) + x[1:end-1] diff(x) + x[1:end-1]
@ -407,11 +402,17 @@ end
error("bar recipe: x must be same length as y (centers), or one more than y (edges).\n\t\tlength(x)=$(length(x)), length(y)=$(length(y))") error("bar recipe: x must be same length as y (centers), or one more than y (edges).\n\t\tlength(x)=$(length(x)), length(y)=$(length(y))")
end end
# # if horizontal, switch x/y
# if !isvertical(d)
# x, y = y, x
# # nx, ny = ny, nx
# end
bw = d[:bar_width] bw = d[:bar_width]
hw = if bw == nothing hw = if bw == nothing
0.5mean(diff(centers)) 0.5mean(diff(x))
else else
Float64[0.5cycle(bw,i) for i=1:length(centers)] Float64[0.5cycle(bw,i) for i=1:length(x)]
end end
# make fillto a vector... default fills to 0 # make fillto a vector... default fills to 0
@ -423,7 +424,7 @@ end
# create the bar shapes by adding x/y segments # create the bar shapes by adding x/y segments
xseg, yseg = Segments(), Segments() xseg, yseg = Segments(), Segments()
for i=1:ny for i=1:ny
ci = centers[i] ci = x[i]
hwi = cycle(hw,i) hwi = cycle(hw,i)
yi = y[i] yi = y[i]
fi = cycle(fillto,i) fi = cycle(fillto,i)